Anfängerfrage, TStringGrid - Rows[Row]

[SaFu]

Hiermit kannst du du alle Spalten und Zeilen an die StringList überegeben

Delphi-Quellcode:

Vertrpl:= TStringlist.Create;   // Stringliste erzeugen
    Vertrpl.Add(IntToStr(StringGrid1.Colcount));
    Vertrpl.Add(IntToStr(StringGrid1.Rowcount));
      for x:= 0 to StringGrid1.ColCount-1 do
        for y:= 0 to StringGrid1.RowCount-1 do
        Vertrpl.Add(StringGrid1.Cells[x,y]);

      for x:= 0 to StringGrid1.ColCount-1 do
        Vertrpl.Add(IntToStr(StringGrid1.ColWidths[x]));
          for x:= 0 to StringGrid1.RowCount-1 do
          Vertrpl.Add(IntToStr(StringGrid1.RowHeights[x]));
          Vertrpl.Add(IntToStr(StringGrid1.Clientwidth));
          Vertrpl.Add(IntToStr(StringGrid1.Clientheight));
          Vertrpl.Add(IntToStr(Ord(StringGrid1.ScrollBars)));