Hallo,
wie kann ich ein Edit Feld mit Text vorbelegen ?
Mein Codefetzen:
Delphi-Quellcode:
procedure TForm1.LabeledEdit1Change(Sender: TObject);
var registrierung:TRegistry; //uses registry nicht vergessen
begin
text := (LabeledEdit1.Text);
begin
Registrierung:=Tregistry.Create;
Registrierung.Rootkey:=HKEY_CURRENT_USER;
try
Registrierung.OPENKEY('\Software\KUBA\Program',true);
except
Registrierung.CreateKey('\Software\KUBA\Program');
end;
Registrierung.WriteString('Program', text); //Anwendung in Registry schreiben
Registrierung.free;
end;
end;
Im Objectinspector finde ich unter Properties LabeledEdit1 das Feld "Text", wenn ich dort Text eingebe erscheint der Text als Vorbelegung im Edit Feld, ich möchte den Text jedoch aus einer Variable bzw. aus der Registry auslesen und das Edit Feld damit vorbelegen.
Gibt es dafür eine einfache Lösung ??
kuba
[edit=SirThornberry]Delphi-Tags gesetzt - nächstes mal bitte selbst machen. Mfg, SirThornberry[/edit]