Usar a tecla Enter como Tab

[Chimpz 2]

Quem já programou em Delphi, por mais simples que fosse o programa, as hipoteses de se ter deparado com este "problema" são grandes.

 

 

Imagine-se uma série de componentes TEdit, TComboBox, e outros, de entrada de dados.

Para o Delphi (para o Windows na verdade), se quisermos mudar o foco entre os vários componentes, temos de usar a tecla TAB (para avançar) ou Shift-TAB (para retroceder).

 

 

Para o utilizador porém, é instintivo que, terminada a inserção de dados, ao pressionar a tecla ENTER, o foco passe para o campo seguinte.

Isto, embora não esteja previsto, é possível, com pouco trabalho, de reproduzir:

 

 

O primeiro passo é ativar a propriedade KeyPreview da Form.

Esta propriedade do tipo boolean (ou seja, lógico, V ou F) tem o valor false como predefinição, e serve para que ao ser pressionada qualquer tecla, o eventos relativos a elas a serem executados primeiro são os da Form, e não os do componente selecionado. Assim, o código que permitirá a tecla ENTER funcionar como TAB só terá de ser criado para a própria form para funcionar em todos os "componentes de inserção" (TEdit, TCombobox, TListBox, etc.)

 

 

Há dois métodos de fazer isto:

 

 

Colocar um true na propriedade KeyPreview do Object Inspector

 

 

ou

 

Inserir no evento OnCreate da Form a seguinte linha:

 

procedure TForm1.FormCreate(Sender: TObject);
begin
KeyPreview:=true;
end;

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

pronto, agora caso o usuário queira, digitar em um campo (Login, em caso de um sistema) e ir para outro campo quando terminar (senha), bastará ele apertar a tecla "ENTER".

 

é isso espero que isso ajude muita gente,

bem simples, mas deixa seu programa mais prático.

[bibiuzex 0]

Olá.

ActiveControl já é da classe TWinControl, logo não precisa fazer o cast dele.

[MisterLyonel 0]

Isso é legal (Substituir uma tecla por outra), um colega criou um que mudava as teclas do teclado, deixando varias em ordem Alfabética, o resultado foi muito bom, a velocidade de digitação que calculamos foi de 20% mais rápida (claro que ouve treino antes do teste, para se acostumar) isso é muito vantajoso para os "Hackers/Crackers" ja li em algum lugar sobre um Hacker que modificou todo seu teclado para poder digitar mais rápido. :rock: