Speicherbutton

[BMX]

Hallo,
gibt es eine Möglichkeit, mit einem Button das ganze Projekt abzuspeichern?

[mkinzler]

???

[BMX]

wasmeinst du mit den ???

[mkinzler]

Ich verstehe deine Frage nicht. Was für ein Projekt willst du speichern?

[argonix]

Das Delphi-Projekt? Den Button "Alles speichern" drücken. :wink:
Ansonsten brauchen wir mehr Informationen.

[BMX]

ich habe vor die ganzen edits und labels die ich habe auf einmal abzuspeichern und zu laden?

[mkinzler]

Die Eingaben der Benutzer sollen gespeichert werden? Dafür gibt es verschiedene Möglichkeiten.
Z.B. in einer Datenbank, Textdatei, XML.
Bei der Datenbanklösung könnte man datensesitive Komponenten nehmen.

[BMX]

also ich sollte mal erwähnen das ich neu im forum und in der sprache bin. ich besuche zwar in der schule einen informatik kurs aber dort haben wir über datenbanken noch nicht gesprochen. kenne mich mit den begriffen etc. in solchen datenbanken n icht aus. würde mich freuen wenn ausführlich wie möglich antwortet.

[mkinzler]

Obligatorischer Link: http://www.dsdt.info/tutorials/?cat=6

[BMX]

also es stimmt. die eingaben vom benutzer sollen gespeichert werden. ich weiß zwar wie man bsp. den text eines memo komponenten speichert.

[mkinzler]

Memo.SaveToFile()

[BMX]

das weiß ich ja, aber wenn ich mehrere edits habe, wie mache ich es bei denen?

[scrat1979]

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

[BMX]

in welcher rubrik finde ich dies? habe bisher mit den standart werkzeugen gearbeitet.

[scrat1979]

Zitat:

Zitat von BMX

das weiß ich ja, aber wenn ich mehrere edits habe, wie mache ich es bei denen?

... wie gerade geschrieben. Mal nach TINIFile (ggf. auch hier im Forum) suchen. Nicht vergessen, die Unit in die uses-Klausel einzusetzen!

Pseudocode:

Delphi-Quellcode:

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;

Den Rest bekommst Du bestimmt alleine hin. Mußt eben nur die richtigen Parameter in die Funktionen einsetzen. Gibt übrigens auch WriteInteger / WriteBool ...

SCRaT

[scrat1979]

Zitat:

Zitat von BMX

in welcher rubrik finde ich dies? habe bisher mit den standart werkzeugen gearbeitet.

Ist keine visuelle Komponente. Mußt das Objekt im Quellcode manuell (s. mein Post oben) erstellen.

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;

[BMX]

ok werde erstmal ausprobieren. falls ich es nicht schaffen sollte melde ich nochmal. bedanke mich bei dir.

[BMX]

ich bins nochmal,
ich bekomme die fehlermeldung underfinierter bezeichner bei'var ifile : TINiFile;'?'
muss man noch diese tinifile komponente auf das formblatt holen?

[mkinzler]

Nein aber die Unit (IniFiles) unter Uses einbinden.

[BMX]

wie macht man dies. habe es noch nie gemacht oder versucht? kannst du es mir erklären?

[mkinzler]

Einfach in der Zeile wo Uses steht IniFiles hinzufügen

Delphi-Quellcode:

Uses ...,IniFiles;

[BMX]

ok super danke euch!!!!!

[scrat1979]

Zitat:

Zitat von BMX

wie macht man dies. habe es noch nie gemacht oder versucht? kannst du es mir erklären?

Steht im Quelltext gaaaaaaanz oben. Einfach VOR das Semikolon schreiben (s. mkinzler) und davor ein Komma einfügen. Muss also so aussehen (es darf nur EIN Semikolon zum Schluß stehen, dazwischen nur Kommata):

Delphi-Quellcode:

Uses Unit1, Unit2, Unit3, ... , UnitX ,INIFile;

[...]

[scrat1979]

Zitat:

Zitat von BMX

ok super danke euch!!!!!

Schade, zu spät :oops: