Aplicar mascara em tempo de execução

Delphi

15/01/2015

pessoal preciso aplicar a mascara de CNPJ dinâmicamente em tempo de execução, porém isso não ocorre segue o trecho do meu código 
  if Length(CNPJsoNumero) = 14 then
          begin

            qPgtoEstab.FieldByName('Correntista').EditMask := '\99.999.999/9999-99\';
            //MDPagtoEstabcorrentista.AsString        := qPgtoEstabCORRENTISTA.EditMask := '\99.999.999/9999-99\';
            //qPgtoEstabCORRENTISTA.Value    := CNPJsoNumero;
          end;
        end;
        MDPagtoEstabcorrentista.AsString        := qPgtoEstabCORRENTISTA.AsString;
Sidnei Junior

Sidnei Junior

Curtidas 0
POSTAR