Código Delphi [-] procedure TForm.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin If (Key=VK_F5) and (ssCtrl in shift) and (ssShift in shift) and (ssAlt in Shift) Then begin showmessage('press, press, press'); end;
procedure TForm.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin If (Key=VK_F5) and (ssCtrl in shift) and (ssShift in shift) and (ssAlt in Shift) Then begin showmessage('press, press, press'); end;