procedure TForm1.FormCreate(Sender: TObject);
var
Reg : TRegistry;
KeyExists : Boolean;
Odp : Integer;
begin
Reg := TRegistry.Create;
try
KeyExists := Reg.OpenKey('Softwareble', False);
if not KeyExists then
begin
Odp:= Application.MessageBox('BLE BLE','', MB_YESNOCANCEL);
if Odp=IDYES then Frame3.Visible:=True
.....................
i wyskakuje mi błąd tego typu :
Project xxxx raised exception class yyyyy with message 'zzzzzz'.
CO JEst zle albo czego nie ma??