Ver Mensaje Individual
  #3  
Antiguo 16-03-2009
Avatar de rgstuamigo
rgstuamigo rgstuamigo is offline
Miembro
 
Registrado: jul 2008
Ubicación: Santa Cruz de la Sierra-Bolivia
Posts: 1.646
Reputación: 17
rgstuamigo Va por buen camino
Lightbulb 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......
__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7
Responder Con Cita