Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Ver los item's de de la columna de un DBGrid al entrar con el focus (https://www.clubdelphi.com/foros/showthread.php?t=63991)

rgstuamigo 11-03-2009 21:32:28

Ver los item's de la columna de un DBGrid al entrar con el focus
 
Hola amigos de club,tengo un dbGrid que tiene una columna con su propiedad PickList cargada con una lista de Item's que el usuario puede elegir cuando se esta editando o insertando,el problema que veo,:rolleyes: es que cuando el usuario esta insertando o editando un registro y dentra a esa columna con el focus presionado la tecla Tab, no se visualiza el comboBox, sino que para poder verlo necesariamente se debe usar el mouse y darle click en la casilla o presionar la tecla enter,pero para poder ver los item si o si se debe usar el mouse y darle click en el triangulito del combobox(no hay otra forma de ver los item sin usar el mouse eso es lo malo:().
Lo que quisiera poder hacer que cuando el usuario entre en la columna que tiene la propiedad PickList cargada, se vea de inmediato el comboBox desplegado, osea que se vean los item para que el usuario pueda seleccionar uno de inmediato y no este ocupando el mouse para hacerlo y asi ganaria tiempo en la insercion o edicion del registro.Espero haberme explicado bien...
Tengo el comienzo del codigo que mas o menos seria utilizando el evento OnColEnter:
Código Delphi [-]
procedure TFrmRequerimiento.DBGrid2ColEnter(Sender: TObject);
begin
 if DBGrid2.SelectedIndex=1 then // la columna 1 del DBGrid es la que tiene la propiedad PickList cargada
   begin
     //Aqui es donde debo desplegar o mostrar los item
     //Talves se pueda simular un click del raton que se haga internamente en el ComboBox
     //Bueno... pero ¿Cómo lo hago?
     //Bueno es solo una idea.
   end;
end;

Muchas gracias de antemano por sus respuestas y comentarios.:)

rgstuamigo 12-03-2009 19:25:20

Al parecer nadie puede ayudarme....:(.

rgstuamigo 16-03-2009 21:25:49

Solucionado......
 
ok ya lo solucioné con la ayuda de este foro aqui pongo el codigo por si a alguien le interese:
Código Delphi [-]
procedure TFrmRequerimiento.DBGrid2ColEnter(Sender: TObject);
begin
 if DBGrid2.SelectedIndex=1 then // la columna 1 del DBGrid es la que tiene la propiedad PickList cargada
   begin
      keybd_event(VK_F2,0,0,0);
      keybd_event(VK_F2,0,KEYEVENTF_KEYUP,0);
      keybd_event(VK_MENU,0,0,0);
      keybd_event(VK_DOWN,0,0,0);
      keybd_event(VK_DOWN,0,KEYEVENTF_KEYUP,0);
      keybd_event(VK_MENU,0,KEYEVENTF_KEYUP,0);
   end;
end;
Saludos......:p


La franja horaria es GMT +2. Ahora son las 13:23:30.

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