| Início » Artigos » Delphi |
Dicas Delphi - Formulários 20/11/2013
Para inaugurar as minhas postagens estou colocando à disposição duas super dicas que simulam as teclas ESC e TAB.
No evento onKeyDown do formulário coloque.
If Key = VK_Escape then
begin
Close;
end;
No evento onKeyPress do formulário coloque.
if (key = #13) then
begin
Key:= #0;
Perform(Wm_NextDlgCtl,0,0);
end
Espero que tenham gostado. Fiquem à vontade para comentar.
| |
| Visualizações: 464 | | |
| Total de comentários: 0 | |
