comando en delphi

[ecfisa]

Empezado por MAXIUM

¿como funciona el KeyPreview?

Hola.

Al poner KeyPreview en True, el formulario captura el teclado antes que otro control.

Para agregar opciones, otra forma de capturar Ctrl+C:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if ((GetKeyState(VK_CONTROL)and 128)=128)and
     (Key = Ord('C')) then
    Close;
end;

Saludos