HI,ich habe ein problem bei einem meiner Programme und Würde mich über eine antwort freuen
Delphi-Quellcode:
procedure Hauptform1.Speichern1Click(Sender: TObject);
var Zeilen, Spalten, i, j: Integer;
Tabelle: TStringList;
begin
savedialog.execute;
// Stringliste erzeugen
Tabelle := TStringList.Create;
Zeilen := stringgrid1.colcount;
Spalten := stringgrid1.rowcount;
for i := 0 to Zeilen-1 do
begin
for j := 0 to Spalten-1 do
begin
Tabelle.Strings[i*Spalten+j] := StringGrid1.Cells[j,i] ;
end;
end;
Tabelle.savetoFile (savedialog.filename+'.tab');
end;
er sagt mir dann immer wenn ich dan button klicke
"Listenindex überschreitet das Maximum(0)" wie kann ich das Maximum höher setzen
,Danke im Vorraus