采
采果小盗
Unregistered / Unconfirmed
GUEST, unregistred user!
procedure TForm1.N10Click(Sender: TObject);
var
list:Tinifile;
filename:string;
begin
Filename:=ExtractFilePath(Paramstr(0))+'config.ini';
list:=Tinifile.Create(filename);
list.ReadSection(listbox1.Items);
list.Free;
end;
出现[Error] Unit1.pas(56): Incompatible types: 'String' and 'TStringList'错误,我找了很多答案,但是还是不会解决
var
list:Tinifile;
filename:string;
begin
Filename:=ExtractFilePath(Paramstr(0))+'config.ini';
list:=Tinifile.Create(filename);
list.ReadSection(listbox1.Items);
list.Free;
end;
出现[Error] Unit1.pas(56): Incompatible types: 'String' and 'TStringList'错误,我找了很多答案,但是还是不会解决