[Neftali [Germán.Estévez]]

Empezado por adebonis

De aquí no paso. No sé mas. Si me das alguna idea lo agradeceré.

Tal vez "meo fuera de tiesto", pero en el fichero TLB debes tener una declaración de la clase similar a ésta:

Código Delphi [-]
 TAeatFactCtl = class(TOleControl)
   private
     FIntf: IAeatFactCtl;
     function  GetControlInterface: IAeatFactCtl;
   protected
     procedure CreateControl;
     procedure InitControlData; override;
   public
     function FIRMA(const rutaOrigen: WideString; const certificado: WideString; 
                    const rutaDestino: WideString): WideString;
     function VERIFICA(const rutaOrigen: WideString; const rutaDestino: WideString): WideString;
     property  ControlInterface: IAeatFactCtl read GetControlInterface;
     property  DefaultInterface: IAeatFactCtl read GetControlInterface;
   published
   end;

¿Has probado a utilizarla de la forma estándard? TOLeControl (de la que deriva) posee el método create:

Código Delphi [-]
 constructor Create(AOwner: TComponent); override;

¿Has probado?

Código Delphi [-]
 var
   Fact:TAeatFactCtl ;
 begin
   Fact := TAeatFactCtl.Create(Self);
   try
     Fact.FIRMA(....
     Fact.VERIFICA(...
   finally
     Fact.Free;
   end;
   ...