delphi - 在 Delphi 中使用 OPOS

Question

当我使用 OPOS 使用 TOPOSPOSPrinter.open 时，出现“不支持接口”错误消息

我尝试使用打印机 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位驱动？

如果你这样做了，从 Ide 重新导入 Com 接口。

您安装的驱动程序与您的 tlb.pas 生成的包装器不匹配。