在Delphi

-1

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

我尝试使用打印机IBM4610但是当我使用的驱动程序OPUS这个问题的结果。

代码编译。

CODE

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;

请我需要帮助。

感谢您的善意帮助:)

来源

2012-09-29 Rafael Miguel Caceres Choto

你没有提供任何有用的信息（即使在你编辑后）。你说'REC'是一个整数，但是你没有给它分配任何东西，并且你提到'IBM_4610'是一个'WideString'，但是显示它是一个常量，编译器可能会自动转换为合适的类型。 –

Im很抱歉，我很难解释这个函数，因为它来自一个dll。我使用Opus Driver。 –

对不起。我在发布答案后改变了整个问题;我会删除它，因为你的原始问题提出了完全不同的问题。 –

您确定安装了32位驱动程序吗？

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

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

来源

2012-09-29 16:44:45

也许这就是问题...谢谢阿诺 –

回答

相关问题