AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Eingaben individuell abspeichern

Ein Thema von Maxi · begonnen am 10. Sep 2013 · letzter Beitrag vom 16. Sep 2013
 
bcvs

Registriert seit: 16. Jun 2011
737 Beiträge
 
Delphi 12 Athens
 
#20

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
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 13:21 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz