Manipulação radiogroup e edit
Boa noite pessoal!
Estou em dúvida em relação ao Delphi especificadamente sobre como fazer que o radiogroup manipule o edit. Exemplo: radiogroup tem duas opções, CPF e CNPJ , caso selecione CPF o campo edit fica com pontos para entrada de CPF ETC..
Estou em dúvida em relação ao Delphi especificadamente sobre como fazer que o radiogroup manipule o edit. Exemplo: radiogroup tem duas opções, CPF e CNPJ , caso selecione CPF o campo edit fica com pontos para entrada de CPF ETC..
Mailson Janoca
Curtidas 0
Respostas
Rafael Bosco
30/05/2016
Cria um procedimento no Evento OnClick no RadioGroup:
Lembrando que, no exemplo, eu usei um TMaskEdit, que é específico para estes casos, um TEdit normal, você apenas teria mais trabalho.
procedure DefineEdit; begin case RadioGroup.ItemIndex of 0: EdtPessoa.EditMask := '000.000.000-00;0;_'; 1: EdtPessoa.EditMask := '00.000.000/0000-00;0;_'; end;
Lembrando que, no exemplo, eu usei um TMaskEdit, que é específico para estes casos, um TEdit normal, você apenas teria mais trabalho.
GOSTEI 0