![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
![]() |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
Oye la operación fue un exito....
|
#2
|
|||
|
|||
Acá están dos ejemplos de como se puede capturar la tecla TAB, el primero para el evento KeyDown o KeyUP y el segundo para el evento KeyPress.
Código:
procedure TForm1.dbgDetalleKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if Key = VK_TAB then Key := 0; end; procedure TForm1.dbgStockKeyPress(Sender: TObject; var Key: Char); begin if key = #9 then Key := 0; end;
__________________
Saludos. |
#3
|
||||
|
||||
Cita:
// Saludos |
#4
|
|||
|
|||
Este código lo copié de aplicaciones que hice en Delphi 5, la verdad es que no lo probé en versiones mas nuevas, pero hoy por la noche (en Argentina sería en 5 hs) lo pruebo en D2005.
Que error está dando el compilador?? o es otro el problema?
__________________
Saludos. |
#5
|
||||
|
||||
Acabo de probar en Delphi 5 y tampoco funciona.
No es que de algún error, es simplemente que no detecta la tecla. Como mencioné, la tecla TAB no se comporta como el resto. // Saludos |
#7
|
|||
|
|||
Utilizando el componente ApplicationEvents y anulando la tecla queda perfecto. Asi que se pueden probar.
|
![]() |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
![]() |
|