Formatar TEdit ou outro componente
Bom dia,
Preciso formatar um componente TEdit ou qualquer outro no formato:
xx/xx
onde xx seria os valores de uma parcela
Ex: 01/03
02/03
03/03
Preciso formatar um componente TEdit ou qualquer outro no formato:
xx/xx
onde xx seria os valores de uma parcela
Ex: 01/03
02/03
03/03
Frederico Brigatte***
Curtidas 0
Respostas
Rodrigo Mattos
13/04/2011
amigo, usa o componente MaskEdit, que está na paleta Additional, e na propriedade EditMask você coloca assim: 99/99.
Espero ter Ajudado.
http://mundodoprogramador.wordpress.com
Espero ter Ajudado.
http://mundodoprogramador.wordpress.com
GOSTEI 0
Frederico Brigatte***
13/04/2011
amigo, usa o componente MaskEdit, que está na paleta Additional, e na propriedade EditMask você coloca assim: 99/99.
Espero ter Ajudado.
http://mundodoprogramador.wordpress.com
Espero ter Ajudado.
http://mundodoprogramador.wordpress.com
Agora que caiu a ficha também. A parte depois da barra vem de um combobox chamado cbParcelas e a parte antes da barra é digitado e depois somado um dependendo do valor da combo.
Como fazer isso? Tem que ficar como no exemplo que dei. Obrigado.
GOSTEI 0
Rodrigo Mattos
13/04/2011
amigo usando o componente maskedit, igual eu mencionei acima, dar para você fazer assim:
Espero ter Ajudado.
http://mundodoprogramador.wordpress.com
procedure TForm1.Button1Click(Sender: TObject); var mask: String; begin mask := Edit1.Text; mask := mask+'/'; mask := mask+ComboBox1.Text; MaskEdit1.Text := mask; end;
Espero ter Ajudado.
http://mundodoprogramador.wordpress.com
GOSTEI 0
Frederico Brigatte***
13/04/2011
amigo usando o componente maskedit, igual eu mencionei acima, dar para você fazer assim:
Espero ter Ajudado.
http://mundodoprogramador.wordpress.com
procedure TForm1.Button1Click(Sender: TObject); var mask: String; begin mask := Edit1.Text; mask := mask+'/'; mask := mask+ComboBox1.Text; MaskEdit1.Text := mask; end;
Espero ter Ajudado.
http://mundodoprogramador.wordpress.com
Obrigado. :o)
GOSTEI 0