有关TIniFile的一个小问题(50分)

  • 主题发起人 主题发起人 JOL
  • 开始时间 开始时间
J

JOL

Unregistered / Unconfirmed
GUEST, unregistred user!
我定义了一个函数,是将ini文件的section和value写到listview里面去的
procedure TForm1.WriteToListView;
var
ListItem:TListItem;
s : TStrings;
begin
IniFile.ReadSection ('Server',s);
for i:= 0 to s.Count -1 do
begin
ListItem := ListView1.Items.Add ;
ListItem.Caption := s.Names;
ListItem.SubItems.Add (IniFile.ReadString ('Server',s.Names,''));
end;

当执行IniFile.ReadSection('Server',s)就出错了,错误是:
Access violation at address 77df3a27 in module 'user32.dll',write of address
00450bcc
不是知道是什么原因,请大虾指教!!!
 
IniFile:=TIniFile.create;
 
use inifile;
begin
IniFile:=TIniFile.create;
 
我在Form1.Create的时候已经初始化了,我的IniFile使全局变量
 
s:=tstringlist.create;
 
thank you very much!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

所有分都给你了:)
 
后退
顶部