Vorschlag
Erstelle eine 7.Stringgrid und übernehme die 6 Stringsgrids jeweils als ein String und speichere dann diese.
Zum Speichern im Prinzip:
Delphi-Quellcode:
StringGrid7.Create...
StringGrid7.Add(StringGrid1.CommaText);
StringGrid7.Add(StringGrid2.CommaText);
StringGrid7.Add(StringGrid3.CommaText);
StringGrid7.Add(StringGrid4.CommaText);
StringGrid7.Add(StringGrid5.CommaText);
StringGrid7.Add(StringGrid6.CommaText);
StringGrid7.SaveToFile('C:\Temp\Test.txt');
FreeAndNil(StringGrid7);
Zum Einlesen im Prinzip:
Delphi-Quellcode:
StringGrid1.Clear;
StringGrid2.Clear;
StringGrid3.Clear;
StringGrid4.Clear;
StringGrid5.Clear;
StringGrid6.Clear;
StringGrid7.Create...
StringGrid7.LoadFromToFile('C:\Temp\Test.txt');
if StringGrid7.Count>0
then StringGrid1.CommaText := StringGrid7[0];
if StringGrid7.Count>1
then StringGrid1.CommaText := StringGrid7[1];
if StringGrid7.Count>2
then StringGrid1.CommaText := StringGrid7[2];
if StringGrid7.Count>3
then StringGrid1.CommaText := StringGrid7[3];
if StringGrid7.Count>4
then StringGrid1.CommaText := StringGrid7[4];
if StringGrid7.Count>5
then StringGrid1.CommaText := StringGrid7[5];
FreeAndNil(StringGrid7);