如何将ini文件中小节中所有值读入stringgrid
例如以下student小节
[student]
name1=joan
name2=mike
name3=bill
......
但是关键字的个数是不定的,实际操作中有可能增加,也可能删除。我要做的是在下一次打开应用程序的时候将student小节中所有的值读入stringgrid中(一列n行)显示出来,帮忙给个代码。谢谢!
[解决办法]
uses IniFiles;
procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
NameList:TStringList;
ini: TIniFile;
begin
ini:=TiniFile.Create('c:\FileName.ini');
NameList:=TStringList.Create;
ini.ReadSectionValues('Student',NameList);
StringGrid1.RowCount:=NameList.Count+1;
for i:=0 to NameList.Count-1 do
StringGrid1.Cells[0,i+1]:=Copy(NameList.Strings[i],Pos('=',NameList.Strings[i])+1,100);
end;