Máscara em TEdits
Olá Pessoal!
Alguém aí sabe como inserir máscaras em TEdits? Exemplo: Um campo Data do tipo: 14/12/2003
Se não for possível com o TEdit alguém poderia me indicar algum outro componente exceto o DBEdit?
PS: Ainda com o TEdit, como faço para quando o usuário teclar [Enter] seguir para o próximo Edit, nos moldes da tecla [TAB], mas usando [Enter].
Obrigado!
Alguém aí sabe como inserir máscaras em TEdits? Exemplo: Um campo Data do tipo: 14/12/2003
Se não for possível com o TEdit alguém poderia me indicar algum outro componente exceto o DBEdit?
PS: Ainda com o TEdit, como faço para quando o usuário teclar [Enter] seguir para o próximo Edit, nos moldes da tecla [TAB], mas usando [Enter].
Obrigado!
Michaell
Curtidas 0
Respostas
Fórum Vini
14/12/2003
Olá Michaell,
Você pode usar o TMaskEdit, ele funciona como um edit normal, e você pode editar a propriedade EditMask para criar suas próprias máscaras :lol: , mas ele já vem com algumas prontas.
Dê uma olhada no help do Delphi para maiores informações.
Máscara para datas: ´00/00/0000;0;_´
Espero ter ajudado.
Vinicius
Você pode usar o TMaskEdit, ele funciona como um edit normal, e você pode editar a propriedade EditMask para criar suas próprias máscaras :lol: , mas ele já vem com algumas prontas.
Dê uma olhada no help do Delphi para maiores informações.
Máscara para datas: ´00/00/0000;0;_´
Espero ter ajudado.
Vinicius
GOSTEI 0
Leonel_fraga
14/12/2003
Quanto ao uso de máscaras, é isso que falaram. Quanto à passagem para o próximo Edit ao teclar Enter, faça o seguinte no evento KeyPress do Edit:
onde: 13 representa o código ASCII da tecla Enter.
Espero poder ajudado!
if Key = #13 then [proximo edit].SetFocus;
onde: 13 representa o código ASCII da tecla Enter.
Espero poder ajudado!
GOSTEI 0
Fórum Vini
14/12/2003
Caro Leonel,
esta forma que você disse funciona, mas há outra mais fácil, que é mudar a propriedade KeyPreview do Form para true e colocar este código no evento onKeyPress do Formulário:
Assim, você não precisa de colocar o código em cada edit.
Obs.: A ordem do foco é definida clicando com o botão direito em cima do form e selecionando Tab Order...
Espero ter ajudado.
Vinicius.
esta forma que você disse funciona, mas há outra mais fácil, que é mudar a propriedade KeyPreview do Form para true e colocar este código no evento onKeyPress do Formulário:
if (Key = #13) then Perform(WM_NEXTDLGCTL, 0, 0);
Assim, você não precisa de colocar o código em cada edit.
Obs.: A ordem do foco é definida clicando com o botão direito em cima do form e selecionando Tab Order...
Espero ter ajudado.
Vinicius.
GOSTEI 0
Fórum Vini
14/12/2003
Oops, esqueci de uma linha:
if (Key = #13) then begin Perform(WM_NEXTDLGCTL, 0, 0); Key:= 0; end;
GOSTEI 0