Buscar

DBMemo1 (Enter)

Código

Supondo que para mudar de campo pressione Enter, então você coloca o componente DBMemo1
e ao pressionar Enter o foco muda para outro controle, ao invés de "descer" para a próxima linha. Faça o seguinte:

WantReturns := True;
WantTabs    := False; //porque você irá usa-lo para mudar o foco para o próximo campo

procedure TForm1.DBMemo1Enter(Sender: TObject);
begin
  Form1.KeyPreview := False;
end;

procedure TForm1.DBMemo1Exit(Sender: TObject);
begin
  Form1.KeyPreview := True;
end;

Publicidade

Vote na dica




Quantidade de votos: 1 voto
Aceitação: 80%


Detalhes da dica

Categoria: Componentes
Adicionada dia: 26/06/09
Por: Cesar Novaes
Visualizada: 518 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009

LANÇAMENTO! Curso de Delphi 2009, clique aqui e confira!