GARANTIR DESCONTO

Fórum Substituir TAB por ENTER #133238

06/02/2003

0

Ola amigos, como faço para substituir a tecla tab pela tecla enter?

Obrigado pela ajuda
Renato


Anonymous

Anonymous

Responder

Posts

06/02/2003

Uoquisala

E so vc baixar o Componente MDComponentes na seção componentes do Clube Delphi.


Valeu


Responder

Gostei + 0

06/02/2003

Rubensavelino

// Alterar a tecla TAB para ENTER.
// No evento KeyPress do Form, digite...
with Sender do
if Key = #13 then begin
SelectNext(Sender as tWinControl, True, True);
Key := 0;
end;

:arrow: :idea: :roll:


Responder

Gostei + 0

06/02/2003

Roa

Coloque o seguinte código no evento OnKeypress do seu Form:

if (Key = #13) then begin
Key := 0;
Perform(Wm_NextDlgCtl,0,0);
end;


Depois altere a propriedade KeyPreview do Form para ´true´.

Espero ter ajudado.


Responder

Gostei + 0

06/02/2003

Robsonismael

coloque dentro do evento OnKeyPress do formulario o seguinte codigo:

if key =#13 then
begin
key:=0;
if (sender is TDBGrid) then
TDBGrid(Sender).Perform(WM_KeyDown,VK_Tab,0)
else
Perform(Wm_NextDlgCtl,0,0);
end;


Responder

Gostei + 0

06/02/2003

Anonymous

Valeu pessoal..
Brigadao pela ajuda..

Renato


Responder

Gostei + 0

06/02/2003

Anonymous

Aproveitando a pergunta e as soluções, para mudar TAB para o ENTER, eu gostaria de saber, se alguém sabe uma forma de mudar o TAB pelo ENTER, no intraweb ???
Pois essas rotinas, no intraweb, nao funciona ...

Valeu galera


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar