Código Delphi [-]procedure TForm1.DBGrid1MouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin keybd_event(VK_CONTROL,0,0,0 ); end;
procedure TForm1.DBGrid1MouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin keybd_event(VK_CONTROL,0,0,0 ); end;