Para passar com enter nas caixas de texto(edit), comece mudando a propriedade:
KeyPreview do form Cadastro Agenda para True.
No evento OnKeyPress
do form coloque o código no procedimento:
//verifica se a tecla pressionada é a
tecla ENTER, conhecida pelo Delphi como #13
If key = #13 then
Begin
//se for, passa o foco para o próximo
campo, zerando o valor da variável Key
Key:= #0;
Perform(Wm_NextDlgCtl,0,0);
end;
É só testar.
A detailed review of Evolution Gaming casino software - Dr. MD
ResponderExcluirThe 태백 출장안마 most important element to a casino game is 밀양 출장안마 the number of ways 고양 출장안마 you can make your own money. 동두천 출장안마 You can choose from more than 50 slot machines, and more 고양 출장안마 than 500 casino