Tema: OnKeyDown
Ver Mensaje Individual
  #4  
Antiguo 28-06-2011
Avatar de DarkBlue
DarkBlue DarkBlue is offline
Miembro
 
Registrado: jun 2010
Posts: 105
Reputación: 14
DarkBlue Va por buen camino
Cita:
Empezado por roman Ver Mensaje
Fíjate en el parámetro Shift del evento OnKeyDown:

Código Delphi [-]
if (ssCtrl in Shift) and (Key = VK_DELETE) then

// Saludos
como lo llamo desde otro procedimiento

Código Delphi [-]

procedure Tfcotizacion.Remplazar1Click(Sender: TObject);
var cap:string;
n:integer;

begin
 
 cap:= popupmenu1.Items.Items[0].Caption;
 stringgrid1.Cells[fcotizacion.col,row]:=cap;
 fcotizacion.OnKeyDown(sender,VK_CANCEL,//que va aqui??);


end;

gracias
__________________
Todo es Relativo
Responder Con Cita