Fórum Pegar o valor de um TMaskEdit sem a mascara. #292893

Ex: EditMask = ´999.999.999-99´
Verifique assim:

If MaskEdit1.text = ´ . . - ´ then begin
<COMANDOS>
end;

------ OU USE A FUNÇÃO -------

function TiraMascara(MskEdit:TMaskEdit):string;
var
Mask: String;
begin
Mask := MskEdit.EditMask;
MskEdit.EditMask := ´´;
Result := MskEdit.Text;
MskEdit.EditMask := Mask;
end;

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
If TiraMascara(MaskEdit1) = ´´ then begin
ShowMessage(´Digite o valor´);
end;
end;

Funcionou obrigado.