F�rum Formatar TEdit ou outro componente #399118

13/04/2011

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

Frederico Brigatte***

Curtir t�pico

+ 0

Responder

Posts

13/04/2011

Rodrigo Mattos

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

Responder

Gostei + 0

13/04/2011

Frederico Brigatte***

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

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.

Responder

Gostei + 0

14/04/2011

Rodrigo Mattos

amigo usando o componente maskedit, igual eu mencionei acima, dar para voc� fazer assim:

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

Responder

Gostei + 0

14/04/2011

Frederico Brigatte***

amigo usando o componente maskedit, igual eu mencionei acima, dar para voc� fazer assim:

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)

Responder

Gostei + 0