关于INI读取问题. ( 积分: 50 )

我的INI结构是这样的:<br>[user1]<br>password=YES<br>password1=NO<br>password2=OK<br>password3=HAO<br>password4=BA<br>下面是我的代码部分.&nbsp;&nbsp;<br>&nbsp;&nbsp;s1:=&nbsp;TStringList.Create;<br>&nbsp;&nbsp;ini&nbsp;:=&nbsp;Tinifile.Create(extractfilepath(application.exename)+'myini.ini');<br>&nbsp;&nbsp;A:=ini.ReadString('user1','password','无此值');//测试部分,取到YES正常.<br>&nbsp;&nbsp;showmessage(A);<br>&nbsp;&nbsp;try<br>&nbsp;&nbsp;ini.ReadSection('user1',s1);//读每个section下的value<br>&nbsp;&nbsp;&nbsp;&nbsp;for&nbsp;i&nbsp;:=&nbsp;0&nbsp;to&nbsp;s1.Count&nbsp;-&nbsp;1&nbsp;do<br>&nbsp;&nbsp;&nbsp;&nbsp;begin<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Showmessage(s1);//取到password,password1等也正常.<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Space:=ini.ReadString('user1','s1','无此值');//全部为空?打印出来'无此值'.为什么?<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;showmessage(Space);<br>&nbsp;&nbsp;&nbsp;&nbsp;end;<br>&nbsp;&nbsp;finally<br>&nbsp;&nbsp;&nbsp;&nbsp;ini.Free;<br>&nbsp;&nbsp;&nbsp;&nbsp;s1.Free;<br>&nbsp;&nbsp;end;<br>end;<br><br>问题我在注释里面写好了,帮忙看下,为什么出现那种情况?谢谢啊

我自己顶哦,没人吗?

Space:=ini.ReadString('user1','s1','无此值');&nbsp;&nbsp;其中's1'&nbsp;不能加单引号<br>再试试.....

就是，楼主你这句写错了。<br>Space:=ini.ReadString('user1','s1','无此值');//全部为空?打印出来'无此值'.为什么?<br>把's1'引号去掉就可以了。给你试过了。

废话！<br>Space:=ini.ReadString('user1','s1','无此值');//<br>你这写的肯定不对了；<br>你傻了？<br>应该是<br>Space:=ini.ReadString('user1',[blue]s1[/blue],'无此值');//

多人接受答案了。

我倒死.就这么送分了.

看来你的人跟问题是完全相提并论的.就连分配分数也没个分寸!