Desactivar la acción de una tecla
 

Hola

De que forma puedo hacer para que la función que tiene una tecla no se lleve a cabo?

Por ejemplo: Tengo un ListBox si pulso la tecla "flecha abajo", se va a seleccionar el elemento siguiente, lo que yo quiero es precisamente que no vaya al siguiente elemento, sino que ejecute una operación que yo deseo que haga.

Gracias por su atención

Saludos

Código Delphi [-]
procedure TForm1.ListBox1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if key = Vk_Down then
  begin
  key:=0;
  ShowMessage('pulso flecha hacia abajo');
  end;
end;

Un Saludo.