Fórum Edicao no DBGrid #371386

Eu costumo fazer a validação no evento OnSetText do campo no dataset.

Por exemplo, pra testar se um campo do tipo data é válido:

procedure Form1.MyDataSetVctoSetText(Sender: TField;
const Text: String);
begin
try
if Trim(Text)=´/ /´ then Sender.Clear
else
Sender.AsString:=Text;
except
on e:econverterror do
begin
showmessage(´A Dada Digitada : ´+Text+´ Não Corresponde a Uma Data Válida´);
abort;
end;
end;
end;

Obs: O evento OnSetText não pode ser testado em tempo de projeto, ou seja, apenas clicando no F9. É preciso salvar, compilar e executar diretamente do programa que foi gerado.