[Setup]
Address=192.168.0.1
Address=192.168.0.2
Port=8889
如何分别读出两个Address的内容?不要管这样两个Address存在的合理性。
Address=192.168.0.1
Address=192.168.0.2
Port=8889
如何分别读出两个Address的内容?不要管这样两个Address存在的合理性。
解决方案 »
- 如何用delphi 把Excel,Word文件中生成到PDF文件
- 很菜的问题:ScrollBox滚轮事件
- DELPHI程序(XP下编译完移植到2000上)连接MS SQL 2000的问题!
- 急~~~~~~``请问日期加减的代码如何写啊????解决既揭贴
- 很简单又很奇怪的问题!!!!!!!!!!!!!!!!
- 关于word的问题,如何在delphi5中运用?
- 怎样显示一个窗体,三秒后自动关闭??有没有办法用一个字段值来存储字体的属性???
- 关于换行的Caption
- 请问怎样实现点击一个图片弹出一个菜单
- 关于ComboBox和DBLookupComboBox多步操作产生错误的问题
- 怎样让窗体保持在最前?急!!!
- 如何将TLabel,TEdit及TButton封装成一个组件?
Port=8889
var
configini:TiniFile;
temstr:TStringList;
i:integer;
begin
try
tempstr:=TStringList.Create;
ConfigIni:=TiniFile.Create('FileName.ini');
ConfigIni.ReadSetionValues('Setup',TempStr);
for i:=0 to TempStr.Count-1 do
Begin
//读出Address的内容
if Pos('Address',TempStr.Strings[i])<>0 Then
ShowMessage(Copy(TempStr.Strings[i],Pos('=',TempStr.Strings[i])+1,MaxInt)) End;end;
Finally
ConfigIni.Destory;
TempStr.Destory;
End;
建议:
[Setup]
Address_Count = 2 //定义地址的个数
Address_1=192.168.0.1
Address_2=192.168.0.2
Port=8889
写程序时只要先读出 Address_Count的值,然后根据这个值,用个For循环读入各Address值即可