Использование OPOS в Delphi

Question

Когда я использую TOPOSPOSPrinter.open, используя OPOS, появляется сообщение об ошибке "Interface Not Supported"

Я пытаюсь использовать принтер IBM4610, но когда я использую драйвер OPUS, возникает эта проблема.

Код компилируется.

КОД

function TCustomizedTenderPlugin.HandleEvent: WordBool;
var

  ret:Integer;

  mic : Pointer;

  {pruebas con opos}
  PosPrinter: TOPOSPOSPrinter;



begin
  {CREDENCIALES DE LA IMPRESORA . MODIFICAR DEPENDIENDO DEL TIPO}
   CargarIni(puerto);    

      try
         {Conexion con impresora}
         PosPrinter:= TOPOSPOSPrinter.Create(nil);
         PosPrinter.Open('4610_IBM',ret); // AQUI DA ERROR
         ShowMessage(VarToStr(ret));
         PosPrinter.Close(ret);
         ShowMessage(VarToStr(ret));
      Except
        // mensaje de error del 

        // me da Interface not supported
      end;


end;

Пожалуйста, мне нужна помощь.

Спасибо за вашу помощь:)

Answer 1

Вы уверены, что установили 32-битный драйвер?

Если вы это сделали, повторно импортируйте интерфейс Com из Ide.

Ваш установленный драйвер не соответствует вашей сгенерированной оболочке tlb.pas.