Sumário - Índice


Exemplo de uso

procedure TForm1.EditEstadoExit(Sender: TObject);
begin
  EvCheckIE1.UF := EditEstado.Text;
  MaskEditInscricao.EditMask := GetMask(EditEstado.Text);
end;