大家给点建议:我想用XML格式替代传统的数据文件,存储数据,实现读、写等操作,怎么样?(50分)

  • 主题发起人 天与地
  • 开始时间

天与地

Unregistered / Unconfirmed
GUEST, unregistred user!
内容如题。
 
我们现在的项目就是这样用的,完全可以
 
效率跟不上吧?
 
用XML的优点都有哪些?
to:土土, 能贴点读、写的源程序我参考一下吗?
 
通用嘛,
do
c := TXMLDocument.Create(nil);
do
c.Active :=true;
do
c.Encoding := 'gb2312';
node :=do
c.AddChild('期初数');
node := ANode.AddChild('期初数表');
nr_node := node.AddChild('域编码链');
nr_node.Text := dm_bml;
nr_Node := Node.AddChild('结算项目编码');
nr_Node.text := jsxm_bm;
nr_Node := Node.AddChild('余额方向');
nr_Node.text := IntToStr(yefx);

if (flys <> nil) then
begin
flys.WriteToXML(Node);
end;

nr_node := node.AddChild('借方累计');
nr_node.Text := FloatToStr(jflj);

nr_node := node.AddChild('贷方累计');
nr_node.Text := FloatToStr(dflj);
nr_node := node.AddChild('金额');
nr_node.Text := FloatToStr(je);
 
to:土土
再问一句,我想实现下面的一种数据存储方式。打个比方:
一个描述学生的记录:
{姓名
性别
年龄
优点1
优点2
。。。

每个学生一记录,但每个学生优点的条数是不定的,用XML可以实现读,写吗?


 
散分了,最后的问题,土土大侠,再关注一下吧。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
949
SUNSTONE的Delphi笔记
S
S
回复
0
查看
770
SUNSTONE的Delphi笔记
S
S
回复
0
查看
1K
SUNSTONE的Delphi笔记
S
顶部