außerdem sind fehler drin
Delphi-Quellcode:
If DelEmptyRows then
DeleteEmptyGridRows(aGrid);
For aRow:=0 to aGrid.RowCount-1 do
begin
H:='';
For aCol:=0 to aGrid.ColCount-1 do
H:=H+Grid.Cells[aCol,aRow]+SepChar;
Tmp.Add(H);
end;
Tmp.SaveToFile(Filename);
du löschst mit deleteemptyrows die leeren Zeilen, ok
anschließen durchläufst du die Zellen deines Hilfsgrids aGrid bis zum ende
holst dir die Strings aber vom Originalem Grid (Grid)
Zitat:
H:=H+Grid.Cells[aCol,aRow]+SepChar;
wenn du Zeilen gelöscht hast, wird dann abver irgendie was nicht stimmen ...
Mfg Frank