7 respuestas en este tema

[Master23]

Bueno en primer lugar disculpen mi ignorancia en el tema ya que las aplicaciones que he realizado no necesitaban de  manejo de algún dispositivo y bueno ahora quiero hacer un sistema de farmacia y quiero hacer que el sistema haga las cosas de forma rápida y sencilla entonces quiero que el sistema lea los códigos para insertar el médicamento directamente sin necesidad de que el usuario tenga que escribir el código de cada cosa para realizar la inserción ahora aquí viene la pregunta cómo puedo hacer uso de el  y que muestre el código leido en un edit ,no he comprado el aparato pero quiero informarme antes de, gracias de antemano.

[TiammatMX]

Alguna vez hice una aplicación en Delphi que leía de una pistola scanner. Tan simple como conectarla a su puerto, levantar el software, apuntar y listo. Esencialmente, el scanner sustituye la entrada por teclado, es decir, es como si teclearas en un campo.

Obviamente, si el campo no está preparado para recibir una entrada por teclado, no podrás recibir los datos.

Suerte, no es díficil, tal vez sólo complicado.

[Master23]

Alguna vez hice una aplicación en Delphi que leía de una pistola scanner. Tan simple como conectarla a su puerto, levantar el software, apuntar y listo. Esencialmente, el scanner sustituye la entrada por teclado, es decir, es como si teclearas en un campo.

Obviamente, si el campo no está preparado para recibir una entrada por teclado, no podrás recibir los datos.

Suerte, no es díficil, tal vez sólo complicado.

Muchas gracias amigo por la aclaración.

[Jagluiperd]

Hola.

Coincido plenamente con TiammatMX. Amén de programar el escaner para que lea determinados códigos de barras o que los lea todos (creo que incluso algunos de estos dispositivos son tan faciles de preprogramar como hacerles leer un código de barras, correspondiente el tipo de programación que necesites, impresos estos en el propio manual).

Lo único que has de tener en cuenta es que el objeto Edit donde debe ser introducido el código, tenga el "focus" en ese momento. Como bien dice el compañero: "Esencialmente, el scanner sustituye la entrada por teclado, es decir, es como si teclearas en un campo.".

Si quieres automatizar aun más, en el evento "onchange" del propio Edit, pones el código correspondiente para la búsqueda, gestión, o lo que quieras hacer con el código introducido.

Saludos.

[Master23]

Hola.

Coincido plenamente con TiammatMX. Amén de programar el escaner para que lea determinados códigos de barras o que los lea todos (creo que incluso algunos de estos dispositivos son tan faciles de preprogramar como hacerles leer un código de barras, correspondiente el tipo de programación que necesites, impresos estos en el propio manual).

Lo único que has de tener en cuenta es que el objeto Edit donde debe ser introducido el código, tenga el "focus" en ese momento. Como bien dice el compañero: "Esencialmente, el scanner sustituye la entrada por teclado, es decir, es como si teclearas en un campo.".

Si quieres automatizar aun más, en el evento "onchange" del propio Edit, pones el código correspondiente para la búsqueda, gestión, o lo que quieras hacer con el código introducido.

Saludos.

Si, ya lo tengo entendido pensaba que era diferente pero veo que es algo simple,muchas gracias.

[markdelphi]

Así es, no necesitas programar nada para que el lector lea el código lo unico que tienes que hacer es interceptar el evento OnKeyPress ya que el lector te devuelve un retorno de carro al final.

delphi

procedure TfrmPtoVenta.edtCodigoKeyPress(Sender: TObject; var Key: Char);
begin
 If Key = #13 Then
   EjecutarAlgo; // Aqui es donde haces algo con lo que tenga el Edit en su propiedad Text que en donde se encuentra los digitos leidos por el lector
end;

Saludos

[Master23]

Así es, no necesitas programar nada para que el lector lea el código lo unico que tienes que hacer es interceptar el evento OnKeyPress ya que el lector te devuelve un retorno de carro al final.

delphi

procedure TfrmPtoVenta.edtCodigoKeyPress(Sender: TObject; var Key: Char);
begin
 If Key = #13 Then
   EjecutarAlgo; // Aqui es donde haces algo con lo que tenga el Edit en su propiedad Text que en donde se encuentra los digitos leidos por el lector
end;

Gracias la verdad es que pensaba que para leer el código habia necesidad de código, pero como lo muestra de forma automática simplemente diseño el soft normalmente.

Saludos

[cadetill]

Buenas,

Sólo un pequeño matiz sobre los lectores. No tienen por qué finalizar la lectura con un retorno de carro. Por regla general eso es configurable y, si te interesara más un TAB, estoy seguro que puedes hacer que te retorne un TAB.

Es todo cuestión de necesidades y configuración del lector

Nos leemos