Einzelnen Beitrag anzeigen

bcvs

Registriert seit: 16. Jun 2011
668 Beiträge
 
Delphi 12 Athens
 
#24

AW: Eingaben individuell abspeichern

  Alt 13. Sep 2013, 07:38
Jetzt müsste aber doch auch die andere Variante funtionieren. Dann sparst du dier auch noch die Variable Dateiname.

Was mir allerdings immer noch nicht klar ist: In welches Edit gibts du den gewünschten Dateinamen ein? Ist das das Edit2? Dieses Edit muss natürlich auch in dem Parameter von SaveToFile erscheinen. Deswegen nimmt man besser aussagekräftigere Bezeichner, z.B. EditWert und EditDateiname statt Edit1 und Edit2.

In Deinem Quellcode stand da ein Eingabe1 von Typ TStings. Hättest du das wirklich so gewollt, dann hättest du dafür sorgen müssen, dass eine Instanz von Eingabe1 erzeugt wird, diese dann mir dem Wert aus Edit2 befüllt und nach der ganzen Aktion wieder entfernt, aber das wäre Blödsinn, wenn man das mit einem Einzeiler lösen kann. Wahrscheinlich hast du sowas gemeint:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  List: TStringlist;
begin
  List := TStringlist.Create;
  try
    List.Add(Edit1.Text);
    List.SaveToFile('C:\Users\Maxi\Desktop\Neuer Ordner\'+Edit2.text+'.txt');
  finally
    list.Free;
  end;
end;

Geändert von bcvs (13. Sep 2013 um 07:41 Uhr)
  Mit Zitat antworten Zitat