Okay ich sollte mal lieber das Problem etwas ausführlicher erklären.
Also ich habs jetzt geschafft, dass er die Werte ordentlich in die ini abspeichert.
Wenn ich nun das Programm erneut starten will klick ich auf den "Laden"-Button und will meine StringGrid nach den Werten einrichten. Da hab ich mir überlegt, dass die Zeilenanzahl der Anzahl der Werte in der ini entsprechen muss (nur halt +1 wegen der tabelle).
Das Ganze hab ich dann so umgesetzt:
Delphi-Quellcode:
procedure TForm1.ladenClick(Sender: TObject);
var i : TListBox;
z,a : integer;
sl: TStringlist;
begin
begin
sl := TStringList.Create;
try
Ini.ReadSectionValues('Titel',sl);
z := sl.Count;
finally
FreeAndNil(sl);
end;
ini := TIniFile.Create(ExtractFilePath( ParamStr(0))+'data.ini');
a:=1;
grid.RowCount:=z+1;
for a:=1 to z do
begin
grid.Cells[0,a]:=ini.ReadSection('Titel', IntToStr(a), '');
end;
end;
Jetzt meckert er an folgender Stelle:
grid.Cells[0,a]:=ini.ReadSection('Titel', IntToStr(a), '');
MFG Subsidenz