Pues me he precipitado al decir que todo iba bien. La cosa es que me falla al volver a iniciar la aplicación habiéndome registrado, entonces me vuelve a pedir el nº de serie como si no me hubiera registrado. No sé si el fallo está en la inicializáción del componente o donde. Os dejo el código a ver si veis algo extraño. Creo que en el dpr no está el fallo aunq lo dejo aquí.
Código Delphi
[-]
var
Registrado : Boolean;
RegistroForm : TRegistroForm;
begin
Application.Initialize;
try
RegistroForm := TRegistroForm.Create(nil);
Registrado := RegistroForm.mxProtector.IsRegistered;
if not Registrado then
begin
RegistroForm.ShowModal; Registrado := RegistroForm.mxProtector.IsRegistered;
if not Registrado
Application.Terminate
else
end
else
end;
Gracias.