Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Enter en un Dbgrid (https://www.clubdelphi.com/foros/showthread.php?t=69215)

ingabraham 02-08-2010 19:18:30

Enter en un Dbgrid
 
hola necesito que cuando haga una consulta sql mostrandola en un dbgrid like

y al quedar un solo registro y yo le de enter me seleccione el registro actual y me lo coloque en un edit el primer campo.

afunez2007 02-08-2010 20:48:19

Hola

Primero que nada debes cambiar la propiedad del grid rowselect en true, de contrario cuando des enter se pondra en modo edit

Luego en la propiedad OnKeyDown del grid

Código Delphi [-]
PROCEDURE TFORM15.JVDBGRID1KEYDOWN(SENDER: TOBJECT; VAR KEY: WORD;
  SHIFT: TSHIFTSTATE);
BEGIN
    IF GETKEYSTATE(VK_RETURN) < 0 THEN
    BEGIN
        EDIT1.TEXT:=QUERY1.FIELDBYNAME('NOMBRE').TEXT;
    END;
END;

TAMBIEN SE PUEDE CON DOBLE CLICK EN EL EVENTO DBLCLICK DEL GRID

Espero te sirva salu2


La franja horaria es GMT +2. Ahora son las 14:18:43.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi