Registry Problem

[Mark90]

Hallo,

ich habe ein Problem. auf meiner Form befindet sich ein trackbar. Wenn ich diesen bewege wird der wert in die registry geschrieben.

Delphi-Quellcode:

 try
    reg.RootKey := HKEY_LOCAL_MACHINE;
    reg.OpenKey('Software\Prog1', True);
    reg.WriteInteger('Alphawert', pos);//pos = trackbar.position
  finally
    reg.Free;
  end;

wenn ich die form schließe will ich den genauen wert wieder laden und den Trackbar auf die gewünschte position bringen

Delphi-Quellcode:

 try
    reg.RootKey := HKEY_LOCAL_MACHINE;
    reg.OpenKey('Software\Prog1', True);
    pos := reg.ReadInteger('Alphawert');
  finally
    reg.Free;
  end;
  trackbar.Position := pos;

Es funktioniert aber nicht. Es kommt eine Fehlermeldung und das projekt kann nicht erzeugt werden.