读文件内容与写文件件内容

liujiuhua 2008-01-03 11:28:41
如文件名为MSIC.INI 内容如下
[CONFIG]
MEDIA=1
ISWAN=0
COMPORT=1
[1]
NAME=1
IP=172.25.10.4
PORT=3001
PHONE=
[2]
NAME=2
IP=172.25.10.3
PORT=3001
PHONE=
[3]
NAME=3
IP=172.25.10.2
PORT=3001
PHONE=
怎么把里面的NAME,IP,PORT,PHONE读出来.
同时我想按上面规格增加NAME=4,IP=172.25.10.1,PORT=3001,PHONE= 要怎样增加请高手指点
...全文
103 7 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
雪狼__ 2008-01-04
  • 打赏
  • 举报
回复
读写ini文件,是以[] 括号来区分段落的;
1楼说的已经足够了
ljq900 2008-01-04
  • 打赏
  • 举报
回复
似乎不能再简单了
trainbox 2008-01-04
  • 打赏
  • 举报
回复
送分贴
moklee 2008-01-03
  • 打赏
  • 举报
回复

//uses 添加这个IniFiles
uses IniFiles;

//声明变量
var
PWDFile:TIniFile;

//注意filename 为路径+文件名
Filename:=ExtractFilePath(Paramstr(0))+'MSIC.INI';
//此时Filename为你的 可执行文件所在目录 + 'MSIC.INI'
PWDFile:=TIniFile.Create(Filename);

//下面是读[1]的NAME,IP,PORT,PHONE,其他的类似。
Edit1.Text:=PWDFile.ReadString('1','NAME','');
Edit2.Text:=PWDFile.ReadString('1','IP','');
Edit3.Text:=PWDFile.ReadString('1','PORT','');
Edit4.Text:=PWDFile.ReadString('1','PHONE','');

//下面是写[4]的NAME,IP,PORT,PHONE,其他的类似。
PWDFile.WriteString('4', 'NAME', '4');
PWDFile.WriteString('4', 'IP', '172.25.10.1');
PWDFile.WriteString('4', 'PORT', '3001');
PWDFile.WriteString('4', 'PHONE', '');


moklee 2008-01-03
  • 打赏
  • 举报
回复
晕,注释也够详细了吧,给你的代码还不懂吗???
liujiuhua 2008-01-03
  • 打赏
  • 举报
回复
up
liujiuhua 2008-01-03
  • 打赏
  • 举报
回复
大家UP呀

1,594

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 网络通信/分布式开发
社区管理员
  • 网络通信/分布式开发社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧