Fórum Problemas com evento GetText em clientDataSet #274760

Olá,

Estou fazendo uma query utilizando clientDataSet que joga os valores dos registros em um DBGrid. Porém, gostaria que quando determinado valor fosse zero aparecesse vazio.

No evento AfterOpen do meu clientDataSet coloquei o seguinte código:

DataSet.FieldByName(Campo).OnGetText := AtribuiNulo

e o meu procedimento atribui Nulo é:

procedure AtribuiNulo(Sender: TField; var Text: String; DisplayText: Boolean);
begin
if Sender.AsFloat = 0 then
Text := ´´;
end;

porém está jogando vazio para todos os registros desse campo....
Como eu faço para somente o campo que for zero fique vazio???

Grata,

Vânia