Como usar Ctrl N
04/04/2006
0
Preciso implementar um evento em um Form para quando o usuário pressionar as Ctrl e s/S (s ou S) efetuar um salvamento no Banco.
Como fazer isso?
Grato
Jats
Posts
04/04/2006
Rjun
04/04/2006
Michael
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if (Shift = [ssCtrl]) and (Key = Ord(´N´)) then ShowMessage(´Ctrl+N´); end;
[]´s
05/04/2006
Jats
Grato a RJun e Michael por responderem.
Clique aqui para fazer login e interagir na Comunidade :)