![]() |
![]() |
| Paypal | 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 |
|
#5
|
||||
|
||||
|
y si no quieres que funcionen la teclas de flechas en el grid
Código:
procedure Tform1.grArticulosKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
var iCol : Integer;
begin
if (key in [VK_DOWN,VK_UP]) then
exit;
if key = VK_RETURN then
begin
iCol := TDrawgrid(grArticulos).Col;
//iCol := grArticulos.SelectedIndex;
//iCol := grArticulos.SelectedField.FieldNo;
if iCol = iLastColumn then
...hacerloquesea...
end;
end;
__________________
La otra guía de estilo | Búsquedas avanzadas | Etiquetas para código | Colabora mediante Paypal |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
|