abrir cajon de dinero serial

[jachguate]

si, aqui encontraras varias formas de hacerlo.

Hasta luego.

[Citlalli]

gracias jachguate por tu buena intencion de ayudarme pero tu link me lleva a la busqueda avanzada, no entiendo !!

saludos

[jachguate]

El tema se ha tratado varias veces aqui. Dado que los foros del club no son un servicio de soporte técnico, se recomienda siempre buscar en la base de datos de conocimiento formada con todas las preguntas y respuestas que al cabo de los años se han acumulado aqui, y abrir un nuevo hilo solamente si no se ha encontrado lo que se buscaba.

Hasta luego.

[Citlalli]

ok, ok, tienes razon, estuve buscando en los foros viejos a traves de la ayuda avanzada y no he encontrado lo que necesito, lo mas cerca es el ejemplo de una balanza y en dicho ejemplo hablan de un componente, el cual ya bajé, pero no se como utilizarlo, y la verdad es que me estoy volviendo loca, que me recomiendas?

saludos

[Citlalli]

mira, estuve nuevamente viendo los foros viejos y hablan del cajon de dinero conectado a impresora de tickets, yo no ocupo impresora, yo tengo el cajon conectado directamente al com1, y lo unico que me dieron fueron estos codigos:

inicializacion 27,33,1
acceso a puerto 27,61,1
apertura cajon 27,112,48
finalizacion 27,33,0

pero de verdad no se como utilizarlos, se que tienes razon en que esto no es un servicio de soporte tecnico, pero quien mas me puede ayudar si no es ClubDelphi, ojala puedas hacer esta unica excepción, muchisimas gracias.

Saludos

[jachguate]

Hola. Pues ya has llegado bastante cerca. Los códigos que tenes son las secuencias que hay que enviar al dispositivo. Ojo que no todos los fabricantes se ajustan a la misma secuencia y habrá de ver si tu cajón en particular lo hace... si no, pues hay que leer algo del manual que seguramente lo acompaña.

Luego, para enviarle los códigos lo que corresponde es tratar el cajón como si se tratase de un archivo de texto (tal como se hace con las impresoras) y "escribirle" los códigos.

Algo como:

Código Delphi [-]
  Var
    cajon : Text;
    
  Begin
    assignFile(cajon, 'com1');
    rewrite(cajon);  //apertura del archivo
    try
      write(cajon, #27#33#1); {esto es la secuencia 27,33,1 que ya tenes}
      //etcetera
    finally
      Close(cajon);  //cerrar el archivo
    end;
  end;

Si aún te quedan dudas, yo he encontrado en una búsqueda simple estos otros hilos:

https://www.clubdelphi.com/foros/showthread.php?t=20676
https://www.clubdelphi.com/foros/showthread.php?t=12535
https://www.clubdelphi.com/foros/showthread.php?t=15703
https://www.clubdelphi.com/foros/showthread.php?t=14919
https://www.clubdelphi.com/foros/showthread.php?t=11143

Hasta luego.

[Citlalli]

jachguate,

de verdad te lo agradezco con toda el alma, ahora mismo voy a probar el código y ya te platicaré.


saludos