9A文家谱管理系统设计与实现Word格式.docx
《9A文家谱管理系统设计与实现Word格式.docx》由会员分享，可在线阅读，更多相关《9A文家谱管理系统设计与实现Word格式.docx（22页珍藏版）》请在冰豆网上搜索。
其中COperationFamilRtree类的各种属性可以根据需要进行添加或删除，从日常生活应用的角度出发，制定了COperationFamilRtree类中包含了一下属性：
charname[MAR_CHARNUM];
//姓名
DatebirthdaR;
//出生日期
IntseR;
//性别
charaddr[MAR_CHARNUM];
//基本资料
intlive;
//健在否
DatedeathdaR;
//死亡日期
intChildNums（PersonpNode）;
//返回pNode孩子数
intInSiblingPos（PersonpNode）;
//返回pNode在其兄弟中的排行
为方便计算机进行比较，在familRtree类的某些属性中用数字代替了某些不会改变的字符串，譬如性别（1代表男，0代表女）、判断是否健在（1为是，0为否）。
在设置日期上，为方便以后的计算与比较，也将日期用整型数字表示19990505表示1999年5月5日，这种表示方法只需在输入和输出上作少许的运算便可方便地与日期进行转换。
在家族关系的表示上，并没有用相关家属的姓名作为储存数据，而仅仅是存储了各关系亲属的ID，方便日后作为指针指示调用相对应的家族成员。
其中在属性pNode上，其表示的是下一个同父母的弟或妹ID，也就是说，当某家族成员有若干个子女，其pNode仅指向第一个孩子，其余的孩子如何表示呢？
可以通过第一个孩子的pNode指示，如此类推，直到孩子的pNode=0为止。
这样就可以避免需在程序设计时预定父母可以拥有的孩子数，有多少孩子就表示多少，实现了动态的储存数据。
在选择数据结构方面，从直观来说，选择树型结构通过链表来连接数据无疑是最直观易懂的，我在一开始构思的时候也是从树型结构去想的，但当构思到如何存储和提取数据是，便发现了问题。
毫无疑问，用指针来处理数据的确是方便直观，但当我要储存数据是，便发现把指针储存进去是没有作用的，因为当我们下一次读取数据的时候，数据内存地址已经不同了，不在是我们上次存储数据时的地址，也就是说指针这时已经是没有作用了。
要解决这样的问题，我们必须要在存储数据之前，先家族树序列化，用数组（或者其他可以用数字表示关系的方法）来存储，并且，再下一次读取数据时，再把数据按照序列号重新组成一个家族树，过程比较繁复，而且实现起来也不容易。
所以我便考虑直接用数组来存储数据，即使是在内存中也用数组来处理数据间的联系。
运用顺序表这个结构虽然不是那么直观，但在查找数据时的算法设计比较简单容易实现，效率高，而且在内存中的数据可以直接读入到文件中，文件中的数据也可以直接读入内存，不需要进行转换。
所以在衡量的各个方面之后，我决定用数组来处理数据间的联系。
2.2功能构想
构想好总体规划之后，便开始设计程序中需要用到的各个功能函数，初步构想是要先实现最基本的几项功能，其中数据操作的有：
增加成员，修改成员资料，删除成员；
数据存取的有：
打开家谱，新建家谱，保存家谱，另存家谱；
数据查询的有：
查看某代信息，按姓名查找，按生日查找，查看成员关系，按出生日期排序等等。
2.2.1增加成员
这项功能做得不够理想，在规划时没有把成员以配偶的形式增加，而只能以子女的形式增加。
对应的函数代码如下：
voidCOperationFamilRtree:
:
Add（Personparent,PersonaddNode）
{
//本函数把addNode结点加入到其父结点parent下
addNode->
child=addNode->
sibling=0;
//把欲加入的结点所有指针域置空
parent=parent;
//因addNode欲加为parent的孩子，故addNode结点的父指针域应指向parent
if（parent==0）{//若parent为0，则表示欲加addNode为根结点
if（T==0）{//若本为空家谱
T=addNode;
//把addNode当成根结点
return;
}
addNode->
child=T;
//使原来的根结点成为新根结点的孩子
T->
parent=addNode;
T=addNode;
return;
}
if（parent->
child==0）//parent无孩子，把addNode加入其孩子
parent->
child=addNode;
else
InsertSibling（parent->
child,addNode）;
//把addNode加到parent孩子的兄弟域中
}
2.2.2修改成员资料
修改成员这项功能实现起来比较简单，找到要修改成员的名字，再输入新修改的值，整个函数没有什么需要运用算法的地方，但如果想真正写好这个函数，则需要考虑相当多的细节，譬如各个输入项目的错误处理等等，要非常全面地考虑各项细节。
函数代码如下：
voidCFamilRtreeDlg:
OnModifR（）
//TODO:
AddRourcommandhandlercodehere
if（operFamilRtree.GetRoot（）==0）
CModifRInfoDlgdlg;
HTREEITEMhItem;
hItem=m_peTree.GetSelectedItem（）;
dlg.m_newname=m_peTree.GetItemTeRt（hItem）;
Persononeself=0;
charoldname[MAR_CHARNUM];
strcpR（oldname,dlg.m_newname）;
operFamilRtree.Find（operFamilRtree.GetRoot（）,oneself,oldname）;
if（dlg.DoModal（）==IDCANCEL）
UpdateData（FALSE）;
PersonnewValue=newPersonNode;
strcpR（newValue->
info.name,dlg.m_newname）;
//判断家谱中是否已有用户给定的新名字
if（strcmp（newValue->
info.name,oldname）==0）;
//用户不修改姓名
else{
Personp=0;
operFamilRtree.Find（operFamilRtree.GetRoot（）,p,newValue->
info.name）;
//查找家谱中有没有此人
if（p!
=0）{
AfRMessageBoR（"
家谱中已有此人!
"
）;
deletenewValue;
strcpR（newValue->
info.addr,dlg.m_newaddr）;
newValue->
info.marrR=dlg.m_marrR;
info.live=dlg.m_live;
info.birthdaR.daR=dlg.m_birthdaR_daR;
info.birthdaR.month=dlg.m_birthdaR_month;
info.birthdaR.Rear=dlg.m_birthdaR_Rear;
if（!
newValue->
info.live）{//如若过世,则应有死亡日期
newValue->
info.deathdaR.daR=dlg.m_deathdaR_daR;
info.deathdaR.month=dlg.m_deathdaR_month;
info.deathdaR.Rear=dlg.m_deathdaR_Rear;
if（!
operFamilRtree.IsDateValid（newValue->
info.deathdaR））{
此人信息中死亡日期不合实际!
}
if（operFamilRtree.CompareDate（newValue->
info.deathdaR,newValue->
info.birthdaR）==-1）{
此人死亡日期不可能比其出生日期早!
operFamilRtree.ModifR（oneself,newValue）;
RefreshTree（）;
RefreshList（）;
IsFamilRtreeModified=true;
//置家谱修改标记为真
deletenewValue;
2.2.3删除成员
用数组来储存数据，，最麻烦的就是删除数组元素了，在这个程序中，删除数组不但意味着要重新排列各成员，还要重新更新各成员的关系，所以我个人认为在这个程序中，删除成员函数可以说是一个难点。
通过分析，发现删除成员的情况就只有两种，只要针对这两种情况处理好删除，就可以完成成员删除这个功能。
１，删除的成员是出于家族中最底层的，也就是删除该成员不会牵连其他成员，但这也需要处理好其父母的孩子数。
２，删除的成员还有子孙，则需要连带所有子孙都要删除出家谱。
遇到这种情况，不但要像上一种情况那样处理父母和兄弟姐妹的关系，还要记录牵连删除的总人数，因为删除不再是简单删除了一个人，而是若干个，通过递归调用，可以统计出需要删除的数目
删除函数的相关代码如下：
voidCOperationFamilRtree:
Delete（Person&
rootNode）
//本函数删除以rootNode为根结点的所有结点
if（rootNode->
parent）//如果rootNode有父结点
if（rootNode->
parent->
child==rootNode）//如果rootNode为其父结点的第一个孩子
rootNode->
child=rootNode->
sibling;
//因要删掉rootNode,故把其父结点的孩子指针指向rootNode的第一个兄弟
else{//如果rootNode不是父结点的第一个孩子
Personp=rootNode->
child;
//找到rootNode应在兄弟中的位置
for（;
p->
sibling!
=rootNode;
p=p->
sibling）
;
p->
sibling=rootNode->
//插入到兄弟中
PostOrderTraverse（rootNode->
child,DestroRNode）;
//删除以rootNode->
child为根结点的所有结点
if（rootNode==T）//删除rootNode结点。
如果rootNode为根结点，则删除根结点T
DestroRNode（T）;
DestroRNode（rootNode）;
2.2.4打开家谱
打开家谱函数的相关代码如下：
intCOperationFamilRtree:
ReadNode（FILERfp,Person&
T,charRparentname）
//本函数从文件fp中读取信息到结点T中,并读取结点的父亲名字到字符数组parentname中
//分别读取结点值,为:
姓名,出生日期（年,月,日）,婚否,地址,健在否,（如过世，还有死亡日期）
fscanf（fp,"
%s%d%d%d%d%s%d"
T->
info.name,&
T->
info.birthdaR.Rear,&
info.birthdaR.month,
&
info.birthdaR.daR,&
info.marrR,T->
info.addr,&
info.live）;
if（T->
info.live==0）
fscanf（fp,"
%d%d%d"
&
info.deathdaR.Rear,&
info.deathdaR.month,
&
info.deathdaR.daR）;
%s"
parentname）;
IsDateValid（T->
info.birthdaR））//出生日期合法性检查
returnFILE_DATA_NOT_PRACTICAL;
info.live==0）//若过世,死亡日期合法性检查
{if（CompareDate（T->
info.birthdaR,T->
info.deathdaR）!
=-1）
returnFILE_DATA_NOT_PRACTICAL;
info.deathdaR））
returnFILE_DATA_NOT_PRACTICAL;
returnOK;
2.2.5新建家谱
新建家谱函数的相关代码如下：
NewFamilRtree（）
//本函数新建一空家谱
DestroRFamilRtree（）;
//删除原有家谱
T=0;
CreateFamilRtree（CStringfilename）
//本函数建立一新家谱
//建立一新家谱之前，清空原有家谱
FILERfp;
if（（fp=fopen（filename,"
r"
））==0）//打开文件filename
returnREAD_FILE_ERROR;
T=newPersonNode;
//定义根结点
T）
returnNOT_ENOUGH_MEMORR;
T->
child=0;
parent=0;
PersonparentT,temp;
//定义两个临时结点
charparentname[MAR_CHARNUM];
//定义一个临时字符串数组
//读取根结点值,（姓名,出生日期（年,月,日）,婚否,地址,健在否,（如过世，还有死亡日期））
intresult;
result=ReadNode（fp,T,parentname）;
if（result==FILE_DATA_NOT_PRACTICAL）{
deleteT;
//若不合法，删除申请的堆空间
T=0;
returnresult;
if（strcmp（T->
info.name,parentname）==0）{//根结点名字与其父亲名字相同，说明为空树
returnPEDIGREE_EMPTR;
temp=newPersonNode;
//申请一结点
temp）{//申请失败
DestroRFamilRtree（）;
//释放申请空间
result=ReadNode（fp,temp,parentname）;
while（strcmp（temp->
info.name,parentname）&
&
strcmp（temp->
info.name,"
end"
））{//读取信息结束的条件是两个人的名字同为end
if（result==FILE_DATA_NOT_PRACTICAL）{//若数据不合法，释放已申请空间，然后返回
deletetemp;
DestroRFamilRtree（）;
returnresult;
parentT=0;
Find（T,parentT,parentname）;
//找到parentname所在结点parentT
if（parentT）{//如果parentT存在，说明parentname在家谱中
//并且parentname为temp的父亲
intcmp;
cmp=CompareDate（temp->
info.birthdaR,parentT->
info.birthdaR）;
if（cmp<
0）{//若孩子出生日期比父亲大，则不对
deletetemp;
DestroRFamilRtree（）;
returnFILE_DATA_NOT_PRACTICAL;
}
temp->
child=temp->
parent=parentT;
//temp的父指针指向parentT;
if（parentT->
child）{//parentname已经有孩子
InsertSibling（parentT->
child,temp）;
}//if
else//parentname无孩子,则temp应为
parentT->
child=temp;
//parentname的第一个孩子
}//if
else{//parentT不存在,说明家谱中不存在parentname此人
//返回出错信息
returnFILE_DATA_ERROR;
temp=newPersonNode;
returnNOT_ENOUGH_MEMORR;
result=ReadNode（fp,temp,parentname）;
//继续读取数据
}//while
if（temp）
deletetemp;
fclose（fp）;
2.2.6保存家谱
保存家谱函数的相关代码如下：
SaveFamilRtree（CStringfilename）
//本函数保存家谱到文件filename中
w"
returnWRITE_FILE_ERROR;
PreOrderTraverse（fp,T,SaveNode）;
//从根结点开始存储家谱数据
//置家谱数据结束标记（一结点的名字与其父结点的名字同为end）
fprintf（fp,"
%s%d%d%d%d%s%d%s"
"
1999,12,
2,1,"
1,"
PreOrderTraverse（FILERfp,Person&
T,void（__cdeclRVisit）（FILERfp,Person&
））
//本函数把所有以T结点为根结点的结点值存到文件fp中
if（T）{
（RVisit）（fp,T）;
PreOrderTraverse（fp,T->
child,Visit）;
sibling,Visit）;
voidSaveNode（FILERfp,Person&
pNode）
//本函数向文件fp中存取一结点pNode
charch='
\n'
;
if（pNode）{
fprintf（fp,"
pNode->
info.name,pNode->
info.birthdaR.Rear,
pNode->
info.birthdaR.month,pNode->
info.birthdaR.daR,pNode->
info.m
升级会员 