einfache Sache (Registry) aber ich kriegs net hin :(

[ipworks]

Versuch's mal mit

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject); 
var 
reg: TRegistry; 
testab, hallo: string; 
begin 
  hallo:='Hallo';
  try
    reg:=TRegistry.Create; 
    reg.RootKey:=HKEY_LOCAL_MACHINE; 
    reg.OpenKeyReadOnly('Software\test'); 
    testab:=reg.ReadString('testab'); 
  finally
    reg:=nil; 
    reg.Free; 
  end; 
  if testab = hallo then CheckBox1.Checked:=true; 
end;