Limpar Valor do TField no evento OnValidate

08/03/2010

1

Tenho o seguinte  Código:

Procedure cds1CPFValidate(sender:TField);
var
  Msg : String;
begin
  if (not ChecaCPF(sender.asString)) then
    try
      Msg := 'CPF Inválido';
      raise exception.create(Msg);
    except
      // LIMPAR o DBEdit  
    end;
end;


Como faço para limpar o conteúdo do DBEdit?
Já tentei:
- sender.Clear;
- DbEdit1.Clear;
- cds1CPF.Clear;     
- sender.AsString := '';
- DbEdit1.Text := '';
- cds1CPF.AsString := '';
- cds1.FieldByName('CPF').AsString := '';

E nada Funciona. Preciso deixar o DBEdit do CPF em branco se o CPF for inválido.

Alguém pode me ajudar?
Responder
×
+1 DevUP
Acesso diário, +1 DevUP
Parabéns, você está investindo na sua carreira