Daten speichern und wieder aufrufen können | auto in Var

[0NyX]

Guten Tag liebe DP User,

ich habe eben ein Programm geschrieben, in dem jeder User sein eigenes Style integrieren kann.
Jetzt möchte ich das man dieses irgendwo speichern kann und das man dieses dann wieder aufrufen kann wenn man es wieder verwenden will. Zur Zeit "speichere" ich die einzelnen Style Bilder in einzelne Variablen, also sollte es auch direkt wieder in diese Variablen eingelesen werden, wenn man ein style gespeichert hat und dieses wieder öffnet.

Vielen Dank für eure Hilfe im voraus!

MfG

[mkinzler]

Die Bilder?
.SaveToFile()

[0NyX]

mhm ja also er soll es komplett speichern in einer Datei.

hier mal der code in dem er die Bilder den var zuweist:

Delphi-Quellcode:

procedure TForm3.btstyleuebernehmenClick(Sender: TObject);
begin
  Form1.bbcheaderli := eHeaderlink.Text;
  Form1.bbcbeschreibungli := eBeschreibunglink.Text;
  Form1.bbcdownloadli := eDownloadLink.Text;
  Form1.bbcdetailsli := edetailslink.Text;
  Form1.bbcpasswortli := epasswortlink.Text;
  Form1.bbcregelnli := eregelnlink.Text;
  Form1.bbckommentarli := ekommentarlink.Text;
  ShowMessage ('Das von Ihnen eingetragene Style wurde erfolgreich übernommen!');
  close;
end;

Also das sollte er speichern und dann über einen anderen Button kann man dieses style immer wieder einfügen. Ohne das man jedes mal die einzelnen Bilder wieder neu verlinken muss.

EDIT: Ich habe schonmal dran gedacht ob es nicht geht das er es in einer .txt speichert und diese dann beim aufrufen automatisch als Design einsetzt.

[mkinzler]

Kann man in der Registry, einer Ini einer XML-Datei , ... speichern

[0NyX]

Zitat von mkinzler:

Kann man in der Registry, einer Ini einer XML-Datei , ... speichern

Vielen Dank für deine Antwort!
Ich hab leider keine Ahnung wie man dieses machen kann...

Kann man die ganzen var. nicht einfach in eine .txt speichern und diese dan einfach öffnen und sagen Line[0] = bbcheaderli z.B.

[mkinzler]

Nei Ini ist eine Textdatei, auf die du aber direkt auf bestimmte Eigenschaften per Namen zugreifen kannst und auch Eigenschaften gruppieren kannst
http://www.dsdt.info/tutorials/ini/

[scrat1979]

Hier mal ein Beispiel, wie man eine INI-Datei schreibt und liest (Ggf. auch mal die Hilfe bemühen...):

Delphi-Quellcode:

[...]
Uses ..., INIFiles;

[...]

// 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;

Hoffe Dir weitergeholfen zu haben...

SCRaT

[0NyX]

wow, vielen vielen Dank, klappt alles eins A!!!