Ich will einen Wert aus der Registry einer Caption zuweisen. Folgender Code funktioniert aber nicht. Wer kann mir helfen?
function GetRegistryValue: string;
var
R: TRegistry;
begin
R:=TRegistry.Create;
R.RootKey:=HKEY_CURRENT_USER;
R.OpenKeyReadOnly('\Software\VB and VBA Program Settings\KLX\System');
Result :=R.ReadString('Kunde');
R.CloseKey;
R.Free;
end;
begin
//Startformular erstellen
frmStart:= TfrmStart.Create(Application);
with frmStart do
begin
//lblKunde.Caption
Caption:= GetRegistryValue;
function GetRegistryValue: string;
var
R: TRegistry;
begin
R:=TRegistry.Create;
R.RootKey:=HKEY_CURRENT_USER;
R.OpenKeyReadOnly('\Software\VB and VBA Program Settings\KLX\System');
Result :=R.ReadString('Kunde');
R.CloseKey;
R.Free;
end;
begin
//Startformular erstellen
frmStart:= TfrmStart.Create(Application);
with frmStart do
begin
//lblKunde.Caption
Caption:= GetRegistryValue;
Comment