Ver Mensaje Individual
  #6  
Antiguo 07-06-2011
martinartaza martinartaza is offline
Miembro
NULL
 
Registrado: oct 2010
Posts: 77
Reputación: 14
martinartaza Va por buen camino
Smile hace poquito lo resolvi con un timer.

buscar por el foro.
Pero estoy dudando si lo postee.
Lo que recuerdo que hice, fue tirar un Timer, darle a la propieda time = 500 y enable:= false, luego programa el evento ontimer del mismo, te muestro.

Código Delphi [-]
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
// cuando se presiona una tecla se activa el timer y da 500 milisegundo
para que termine de pasar los datos.
Timer1.Enabled:= true;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
{
 ya se cargo los datos en el tedit
 puedes poner el foco en el proximo
 componente o agregarlo a una grilla
 o lo que quieras pero luego debes
 poner
}
Timer1.Enabled:= false;
end;

Acabo de recordar que pregunta hace 2 o 3 semanas como hacer para que una aplicacion mande enter o sea para que mi aplicación aprieta la tecla enter y eso era para dar una solución un poco más elegante a lo que acabo de escribirte.
Estaba teniendo el mismo problema pero en mi caso, no tengo acceso al lector, porque el programa lo hago a distancia.

Bueno, espero que te sirva.
Responder Con Cita