Einzelnen Beitrag anzeigen

Benutzerbild von danku
danku

Registriert seit: 9. Apr 2006
Ort: 32-bit Adressbus
181 Beiträge
 
Delphi 7 Enterprise
 
#1

SaveToFile [TStringgrid] ohne Tsavedialog

  Alt 10. Mai 2006, 15:12
Ich möchte nur die 1.Spalte einer TStringGrid speichern. Es soll kein Tsavedialog geoeffnet werden.
ich arbeite ohne Tstrings!

ausgelesen mit:

Delphi-Quellcode:
sgfiles.RowCount := OpenDialog1.Files.Count + 1;
   for i:=0 to Opendialog1.files.count -1 do
   begin
   sgfiles.cells[0,1 + i]:= (OpenDialog1.Files[i]);
   Savedialog1.InitialDir:=GetCurrentDir;
Versuch des Speicherns:

Delphi-Quellcode:
Savedialog1.InitialDir:=GetCurrentDir;
   for i:= 0 to sgfiles.rowcount-1 do
   sgfiles.rows.SaveToFile('GetCurrentDir' + sgfiles.Cells[0,i].AsString);
// klassentyp oder recordtyp wird erfordet. ich weiß. for i := 0 to sl.Count - 1 do aber kann ich das auch ohne eine Tstringlist realisieren? wenn ja wie?
  Mit Zitat antworten Zitat