Thema: Delphi TLabel+TEdit

Einzelnen Beitrag anzeigen

Benutzerbild von MrSpock
MrSpock
(Co-Admin)

Registriert seit: 7. Jun 2002
Ort: Owingen
5.865 Beiträge
 
Delphi 2010 Professional
 
#18

Re: TLabel+TEdit

  Alt 21. Jan 2005, 19:04
Hallo LOMBI,

in meinem Code musst du natürlich noch die korrekten Namen der EditFelder eingeben, die du speichern willst:

Delphi-Quellcode:
...Ini.WriteString('Feldinhalte', 'Feld1', Freifeld1Edit.Text);
Ini.WriteString('Feldinhalte', 'Feld2', Freifeld2Edit.Text);
Ini.WriteString('Feldinhalte', 'Feld3', Freifeld3Edit.Text);
In der OnCreate musst du jetzt diese Felder wieder mit ReadString einlesen:
Delphi-Quellcode:
...
Ini := TIniFile.Create(ExtractFilePath(ParamStr(0))+
       'Freifelder.ini');
Freifeld1Edit.Text := Ini.ReadString('Feldinhalte', 'Feld1', '');
Freifeld2Edit.Text := Ini.ReadString('Feldinhalte', 'Feld2', '');
Freifeld3Edit.Text := Ini.ReadString('Feldinhalte', 'Feld3', '');
Ini.Free;
Albert
Live long and prosper


MrSpock
  Mit Zitat antworten Zitat