类似*.ini文件那种格式的文本文件,怎样读取的? 不用自己一个个字符读进来,再判断出关键字的吧? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 uses iniFiles;var test : TiniFiles; procedure TForm1.FormCreate(Sender: TObject);begin test := TIniFile.Create('filename'); test.ReadString.........end;使用TINIFILES类,方法和属性简单明了,相信你自己可以解决。 uses Inifiles;var MyIniFile:TIniFile;procedure TForm1.FormCreate(Sender: TObject);begin MyIniFile:=TIniFile.Create('.\con.ini'); param1:=MyIniFile.ReadString('System','param1','...'); ... end;con.ini[System]param1 = ....... 在delphi编辑环境按下F1输入TInifile然后查看详细说明. :) TINIFile的readstring和writestring两个函数可以搞定 AllocMem 怎么使用 避免内存泄露,对象安全释放的问题 关于ADODataset的Locate() seek() TColor是什么类型的? 如何隐藏命令按钮??? 为什么在delphi5下的调用dbtables库单元,可以使用prepare?delphi7下? dll调用问题? 新年大礼包 初学者的API问题.应该很简单. 谁能谈一下TApplication.HandleMessage函数 最后60分,求和DBGrid 功能一样甚至功能更强的控件。 Web Server 的一个简单问题,真的很简单
test : TiniFiles;
procedure TForm1.FormCreate(Sender: TObject);
begin
test := TIniFile.Create('filename');
test.ReadString.........
end;使用TINIFILES类,方法和属性简单明了,相信你自己可以解决。
MyIniFile:TIniFile;procedure TForm1.FormCreate(Sender: TObject);
begin
MyIniFile:=TIniFile.Create('.\con.ini');
param1:=MyIniFile.ReadString('System','param1','...');
...
end;
con.ini[System]
param1 = ...
....
输入TInifile
然后查看详细说明. :)