Fórum Executar uma ação ao teclar Ctrl Enter. Como fazer? #237024
09/06/2004
0
Fala Galera!
Alguém sabe como eu faço para executar uma ação quando o usuário teclar junto Ctrl + Enter???
tipow, sei lá, no evento KeyPess do form:
Alguém poderia me ajudar com isso??? Valew!
Alguém sabe como eu faço para executar uma ação quando o usuário teclar junto Ctrl + Enter???
tipow, sei lá, no evento KeyPess do form:
if key = # ?????? then begin
executa minha função
end;
Alguém poderia me ajudar com isso??? Valew!
Bueno
Curtir tópico
+ 0
Responder
Posts
09/06/2004
Xanatos
Nao é no OnKeypress e sim no OnKeyDown!!
vc precisa mudar a propriedade KeyPreview para True
procedure TFrImovelRural.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (Shift = [ssCtrl]) and (key=13)then
showmessage(´Control + Enter pressionados!!!´);
end;
Voce precisa saber qual ShiftState é o do Control !!!
vc precisa mudar a propriedade KeyPreview para True
procedure TFrImovelRural.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (Shift = [ssCtrl]) and (key=13)then
showmessage(´Control + Enter pressionados!!!´);
end;
Voce precisa saber qual ShiftState é o do Control !!!
Responder
Gostei + 0
09/06/2004
Bueno
Valew kra! era exatamente isso q eu precisava!
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)