Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Conectar con ocx Hasar 2da Generacion (https://www.clubdelphi.com/foros/showthread.php?t=91024)

santiago14 20-03-2019 00:58:36

Cita:

Empezado por Casimiro Notevi (Mensaje 531152)
Parece que esa impresora te lleva desesperado :eek:
No la conozco, ojalá pudiera ayudarte. ¿No tiene documentación?

La impresora tiene documentación, el OCX también. El tema es que no dice nada acerca de cómo instalar en diversos Entornos.

Espero puedan ayudarme.

Santiago.

santiago14 28-03-2019 23:37:39

Buenas, resolví el tema.
Lo puse aquí.

Espero sirva.
Gracia a todos por sus ayudas.

b_ernesto 23-05-2024 00:22:07

Ole Error 800a01a9
 
Ya sé que estamos a muchos años, de que postearan este tema, pero creo que es importante dejar documentado como resolverlo.
Si para conectarse a la impresora fiscal Hasar 2G 250, se tratan de conectar definiendo el objeto como Variant,

Código Delphi [-]
HASAR:Variant;
HASAR.Conectar('192.168.1.50',0,5000);

El error OLE ERROR 800A01A9, no se produce.

En cambio, si nos conectamos con el OCX importado, el error se produce, SI ESTAMOS COMPILANDO EN WINDOWS XP.
Si instalamos todo en un Windows 7 (al menos eso probé), no tira este error.
Código Delphi [-]
HASAR:ImpresoraFiscalRG3561;
HASAR.Conectar('192.168.1.50',0,5000);

Usando HASAR:Variant; me pude arreglar por muchos años, hasta que un cliente me pidió hacer un ticket de cambio.
En ese caso, no me fué posible, pasarle el párametro Atributos de texto, que es un packed record, a la funcion ImprimirTextoGenerico.

Código Delphi [-]
ConectarImpresora;
HASAR.AbrirDocumento(Generico);
HASAR.ImprimirTextoGenerico(Atributos,'ARTICULO zzz        1.0',DisplayNo);
HASAR.ImprimirTextoGenerico(Atributos,'ARTICULO nnn       2.0',DisplayNo);
HASAR.CerrarDocumento( 0 ,'' );

Espero que a alguien le sirva.


Cita:

Empezado por mattaldi (Mensaje 511475)
¿Como andas apuntes? ¿Pudiste resolver el problema con el método imprimiritem()?:rolleyes:
Yo ya cambié la IP de la impresora, pero sigo sin poder conectarme, cuando ejecuto HASARNG.Conectar('192.168.1.50',0); o HASARNG.Conectar('192.168.1.50',0,5000);
me manda un error "OLE ERROR 800A01A9".:(
Instale el OCX en delphi5 y lo agrega bien a la paleta, y probé en delphi 10 y no lo agrega.
Alguien tiene idea cual puede ser el error???



La franja horaria es GMT +2. Ahora son las 23:16:18.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi