Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 18-04-2012
ISD ISD is offline
Registrado
NULL
 
Registrado: abr 2012
Posts: 7
Poder: 0
ISD Va por buen camino
TPV - Visor IBM

Buenos días,

Estoy intentando enviar un texto a un visor de IBM para un TPV. He leido en algún otro hilo que alguien lo tiene solucionado con códigos de escape, pero yo estoy muy verde al respecto y no se ni como empezar...

Cualquier información me es de gran utilidad!!

Gracias de antemano...
Responder Con Cita
  #2  
Antiguo 18-04-2012
Avatar de Casimiro Noteví
Casimiro Noteví Casimiro Noteví is offline
Merodeador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.669
Poder: 10
Casimiro Noteví Tiene un aura espectacularCasimiro Noteví Tiene un aura espectacular
No especificas exactamente qué problema tienes, pero así, en general, echa un vistazo a este otro hilo donde se comentaba algo similar, a ver si te sirve.
Responder Con Cita
  #3  
Antiguo 18-04-2012
Avatar de duilioisola
[duilioisola] duilioisola is offline
Miembro Premium
 
Registrado: ago 2007
Ubicación: Barcelona, España
Posts: 1.806
Poder: 22
duilioisola Es un diamante en brutoduilioisola Es un diamante en brutoduilioisola Es un diamante en bruto
Normalmente van conectados al puerto serie del ordenador.
Tendrás que enviar datos a ese puerto.
Yo recuerdo un visor que utilizaba para un TPV y lo hacíamos con un simple:

Código Delphi [-]
procedure ImpresionDirecta(impresora: string; Data: string);
var
  Puerto:  string;
  Fichero: TextFile;
begin

  // Cojemos el puerto de la impresora a imprimir
  puerto := impresora;

  // Si no es un puerto normal, busco el puerto que pertenece a la impresora
  if ((impresora <> 'COM1:') and
    (impresora <> 'COM2:') and
    (impresora <> 'COM3:') and
    (impresora <> 'COM4:') and
    (impresora <> 'LPT1:') and
    (impresora <> 'LPT2:') and
    (impresora <> 'LPT3:') and
    (impresora <> 'LPT4:')) then
    PrinterPort(impresora, puerto);

  AssignFile(Fichero, Puerto);
  {$I-}
  ReWrite(Fichero);
  {$I+}
  if IOResult = 0 then
  begin
     Write(Fichero, Data);
     CloseFile(Fichero);
  end;
end;

ImpresionDirecta('COM1:', 'Siguiente Cliente' + chr(13));
Responder Con Cita
  #4  
Antiguo 18-04-2012
Avatar de newtron
[newtron] newtron is offline
Membrillo Premium
 
Registrado: abr 2007
Ubicación: Motril, Granada
Posts: 4.214
Poder: 24
newtron Va camino a la fama
Amigo ISD.

Mira a ver si te sirve la solución del amigo duilioisola y si no lo comentas y te digo otra forma usando un componente para el manejo del puerto serie.

Saludos
__________________
Be water my friend.
Responder Con Cita
  #5  
Antiguo 20-04-2012
ISD ISD is offline
Registrado
NULL
 
Registrado: abr 2012
Posts: 7
Poder: 0
ISD Va por buen camino
El problema es que nuestro visor va conectado a un puesto USB...
Responder Con Cita
  #6  
Antiguo 20-04-2012
Avatar de newtron
[newtron] newtron is offline
Membrillo Premium
 
Registrado: abr 2007
Ubicación: Motril, Granada
Posts: 4.214
Poder: 24
newtron Va camino a la fama
Cita:
Empezado por ISD Ver Mensaje
El problema es que nuestro visor va conectado a un puesto USB...
¿Al puerto USB?, en mi vida he visto un visor conectado al puerto USB. Imagino que en ese caso el fabricante te deberá de proveer de algún componente para poder manejarlo, lo que llaman un SDK.

Saludos
__________________
Be water my friend.
Responder Con Cita
  #7  
Antiguo 20-04-2012
Avatar de Casimiro Noteví
Casimiro Noteví Casimiro Noteví is offline
Merodeador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.669
Poder: 10
Casimiro Noteví Tiene un aura espectacularCasimiro Noteví Tiene un aura espectacular
Cita:
Empezado por newtron Ver Mensaje
¿Al puerto USB?, en mi vida he visto un visor conectado al puerto USB. Imagino que en ese caso el fabricante te deberá de proveer de algún componente para poder manejarlo, lo que llaman un SDK.
Saludos
Y además debe traer un manual de instrucciones, programas de ejemplos, etc.

Si al menos dijeras exactamente qué marca y modelo es, lo mismo lo hemos usado y conocemos.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Visor de PDF GerTorresM Varios 6 29-10-2010 17:48:12
Visor de Nibles GaaK Gráficos 5 19-01-2007 00:16:16
Visor de qreport Novás Varios 1 30-10-2006 19:45:18
Visor LCD Tecnic2 OOP 3 04-11-2004 19:56:04
visor lcd fanon Varios 1 20-05-2003 12:09:23


La franja horaria es GMT +2. Ahora son las 19:41:47.


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