SaveToFile [TStringgrid] ohne Tsavedialog

[danku]

Zitat von TeronG:

Ich dachte, du möchtest den inhalt des Grid's speichern.
Aber du willst nur die "alte Datei" unter neuem/korigiertem namen speichern oder wie?

irgendwie reden wir aneinander vorbei.
deine 2thesen habe ich bereits schon erledigt.

wenn ich mp3s per topendialog1 ins sgfiles.cells[0,i] lade,
ist es doch logisch die datei wieder zu speichern, die eben in der spalte 1 vorliegen.

ES GEHT MIR DARUM, DAS DIE DATEIEN DIE PER OPENDIALOG IN DIE SPALTE 1 GELADEN WERDEN - DURCH DIE FILTER FORMATIERT WERDEN (NEUE NAMEN VERGEBEN) - UND ZURÜCKGESCHRIEBEN WERDEN. (ALSO UMBENNEN +SPEICHERN)

my try:

Delphi-Quellcode:

procedure Tfmformat.sbsaveClick(Sender: TObject);
var i,sum:integer;

  procedure SaveGrid(grid: TStringGrid; fileName: string);
  var iRow: integer;
  sl: TStringList;
   begin
   sl := TStringList.Create;
   .. ?
     sl.SaveToFile(fileName);
     sl.Free;
      end;

begin

if change= true
  then begin
    Statusbar1.Panels[1].text:='Saved';
    Savedialog1.InitialDir:=GetCurrentDir;

    for i:=0 to Opendialog1.files.count -1 do
    begin
    SaveGrid(sgfiles,opendialog1.Files.Strings[i]);
    end;
end;