Zie http://wiki.freepascal.org/Using_INI_Files
Ik denk dat er dit bedoeld wordt:
Code:
[Spelers]
Speler1=Leo
Speler2=Mariette
Speler3=Felix
Speler4=Rita
Delphi Code:
uses IniFiles;
procedure TForm1.FormCreate(Sender: TObject);
var
INI: TINIFile;
begin
INI := TINIFile.Create('Spelers.ini');
try
vSpeler1Naam:= INI.ReadString('Spelers','Speler1','');
vSpeler2Naam:= INI.ReadString('Spelers','Speler2','');
vSpeler3Naam:= INI.ReadString('Spelers','Speler3','');
vSpeler4Naam:= INI.ReadString('Spelers','Speler4','');
finally
INI.Free;
end;
StringGrid1.Cells[1, 0]:= vSpeler1Naam;
StringGrid1.Cells[2, 0]:= vSpeler2Naam;
StringGrid1.Cells[3, 0]:= vSpeler3Naam;
StringGrid1.Cells[4, 0]:= vSpeler4Naam;
end;
Bookmarks