Onvalidate com sender

Minha dúvida é a seguinte:
Não consigo limpar o campo se o cpf ou o cgc for inválido...
procedure Tdatamodule1.tabelacampoValidate(Sender: TField);
begin
if not Sender.IsNull then
Case length(Sender.AsString) of
11: if not CPF(Sender.AsString) then
begin
ShowMessage(´CPF Inválido !´);
Sender.IsNull; // aki não funciona...
// tentei .Clear; , .test:=´´; e .AsString:=´´;
end else
Sender.EditMask:=´999.999.999-99;0;_´;
14: if not CGC(Sender.AsString) then
begin
ShowMessage(´CNPJ Inválido !´);
Sender.IsNull; //aki tb
end else
Sender.EditMask:=´999.999.999-99;0;_´;
else
Sender.IsNull; //aki tb
Exit;
end;
end;

Alguém pode me ajudar ???

Grato