danke Leute, ich habe mir aber sebst geholfen indem ich ein bissl getrickst habe xD
Ist nicht die optimale lösung,aber geht auch.
habe das erste stringgrid einfach normal gespeichert mit
Delphi-Quellcode:
procedure TForm1.Speichern1Click(Sender: TObject);
var
F,g: TStringList;
i,s: Integer;
begin
savedialog1.execute;
F := TStringList.Create;
try
F.Add(IntToStr(StringGrid1.RowCount));
F.Add(IntToStr(StringGrid1.ColCount));
for i := 0 to (StringGrid1.RowCount - 1) do
F.Add(StringGrid1.Rows[i].CommaText);
F.SaveToFile(savedialog1.FileName);
finally
F.Free;
end;
und das zweite einfach mit
Delphi-Quellcode:
speichern:=savedialog1.FileName ;
delete(speichern,length(savedialog1.FileName)-3,4);
laden:=speichern+'.xxx';
g.SaveToFile(laden);
damit speichere ich einfach mit einem Klick in 2 dateien xD
ps: so wer hat jetzt was an meinem Code zu meckern
EDIT: sch**** Tipfehler