![]() |
Re: Speicherbutton
Memo.SaveToFile()
|
Re: Speicherbutton
das weiß ich ja, aber wenn ich mehrere edits habe, wie mache ich es bei denen?
|
Re: Speicherbutton
Für den Anfang empfehle ich Dir dann mal ein INI-File. Schau mal nach TINIFile und dessen Methoden. Damit kannst Du alles machen, was Du vorhast!
SCRaT |
Re: Speicherbutton
in welcher rubrik finde ich dies? habe bisher mit den standart werkzeugen gearbeitet.
|
Re: Speicherbutton
Zitat:
Pseudocode:
Delphi-Quellcode:
Den Rest bekommst Du bestimmt alleine hin. Mußt eben nur die richtigen Parameter in die Funktionen einsetzen. Gibt übrigens auch WriteInteger / WriteBool ...
var IFile : TINIFile;
Begin ifile := tiniFile.Create('test.ini'); ifile.WriteString(...); // Edit1.Text ifile.WriteString(...); // Edit2.Text etc. // Auslesen edit1.Text := ifile.ReadString(...); IFile.Free; end; SCRaT |
Re: Speicherbutton
Zitat:
SCRaT //EDIT: Hier mal ein Beispiel. Die Unit heißt übrigens "INIFiles".
Delphi-Quellcode:
// Speichert INhalt von Edit1 und Edit2 in INI-Datei
procedure TForm1.Button1Click(Sender: TObject); var ifile : TINiFile; begin ifile := TIniFile.Create('c:\test.ini'); ifile.WriteString('allgemein', 'edit1', edit1.Text); ifile.WriteString('allgemein', 'edit2', edit2.Text); ifile.Free; end; // Holt die Informationen aus der INI-Datei wieder... procedure TForm1.Button2Click(Sender: TObject); var ifile : TINiFile; begin ifile := TIniFile.Create('c:\test.ini'); edit1.Text := ifile.ReadString('allgemein', 'edit1', 'kein Wert in INI-Datei!'); edit2.Text := ifile.ReadString('allgemein', 'edit2', 'kein Wert in INI-Datei!'); ifile.Free; end; |
Re: Speicherbutton
ok werde erstmal ausprobieren. falls ich es nicht schaffen sollte melde ich nochmal. bedanke mich bei dir.
|
Re: Speicherbutton
ich bins nochmal,
ich bekomme die fehlermeldung underfinierter bezeichner bei'var ifile : TINiFile;'?' muss man noch diese tinifile komponente auf das formblatt holen? |
Re: Speicherbutton
Nein aber die Unit (IniFiles) unter Uses einbinden.
|
Re: Speicherbutton
wie macht man dies. habe es noch nie gemacht oder versucht? kannst du es mir erklären?
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 08:32 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