Enter Como Tab En Dbgrid

[ingmichel]

Empezado por JosepGA

hola,

para ello debes activar en la tForm ( la ventana ) la propiedad KeyPreview a True. Luego en uno de los dos eventos de la ventana poner lo siguiente ( no recuerdo cual de los dos afectaba al comportamiento que tu quieres ):

en el evento Onkeypress:


Código Delphi [-]
If ( Key = #13 ) Then
Key := #9





en el evento OnKeyDown:


Código Delphi [-]
If ( ( Key = #13 ) Or ( Key = #9 ) ) Then
Begin
SelectNext( Sender As tWinControl, True, True );
Key := #0;
End;





Prueba cada uno, ya que es uno de ellos el que te irá bien

Un saludo

hola jose, gracias por responderme, probe los dos ejemplos y ninguno me funciono, ahh y otra cosa como hago para mandar el codigo de factura a la tabla detalle factura ya que lo necesito enviar tantas veces como articulos haya en la factura, bueno espero tu respuesta, gracias nuevamente.