文章正文

读Ini文件中的值放到TStrings中去，为什么和我想的不一样，请进来看，，，在线等,不够还可以加分

类型：转载责任编辑：asp 日期：2007/03/01

var
amini:tinifile; i:integer; defsection:tstrings;
begin
amini:=tinifile.create(setam.ini);
defsection:=tstringlist.create;
defsection.text:=amini.readstring(server,defaultitem,);
for i:= 0 to defsection.count - 1 do
showmessage(defsection[i]);
defsection.free;
amini.free;
end;

[server]
defaultitem=host#$d#$aport

这样做为什么不可以啊？？？？？？？？？？？、
defsection:tstrings中理论上应该是两个值host和server为什么，是一个字符串啊????

推荐阅读

是充电器还是飞碟苹果配件不一般 [详细内容]

关于闹钟 [详细内容]

绝对值得关注五款3500元级热门机型导购 [详细内容]

经典在延续!升技NV8再到货价格更实惠 [详细内容]

苏宁电器10股送2.5股 [详细内容]

全静音设计技嘉6600GT AGP狂降380元 [详细内容]

INTEL明年第二季度正式推出965芯片组 [详细内容]

网友回答:

网友：hammer_shi

o ,你加一个memo控件，随后将ini文件读到memo,再tstring:=memo.text行么？

网友：shadowfish

一个是pchar型的，一个是string的，用strpas函数就可以了

unit：
sysutils

function strpas(const str: pchar): string;

网友：ghostmirror

tinifile.readstring(.....)好象是一读就读出一行，直到有 #13为止
我前段时间写程序也遇到ini文件的问题了

网友：redhf

ghostmirror(mirror) 说的有道理，你应该把#$d#$a改成另外的字符，然后你通过自己的代码解析！

网友：stweiguo

为什么defsection:tstrings;不定义成string;
用defsection:=amini.readstring(server,defaultitem,);
试试

站内导航：

IT热门资讯：