Como crear entradas al registro de winxp

[pablopessoa]

gracias!!! voy a leerlo a ver si lo entiendo :P
pero por las dudas pongo algo mas especifico de lo que me pasa:

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
begin
     reg:=TRegistry.Create;
     reg.RootKey:=(HKEY_CURRENT_USER);
     if Reg.OpenKey(Clave,false) then
        begin
           reg.LoadKey(clave+'password',password);
           if  form16.ShowModal = mrCancel then
              form1.Close;
        end
     else
        begin
           reg.CreateKey('\Software\EMPRESA\');
           reg.Free;
           form17.ShowModal;
        end;
end;

me crea una carpeta en el registro llamada EMPRESA, pero cuando pasa a la linea "form17.ShowModal;" me sale un error de access violation y no me la abre, ese form17 es donde se van a cargar los datos de la empresa para guardar en el registro.. alguien sabe que puede ser ese error?