Hola Lepe fijate que todo hiba bien osea a mi esa se me hace una solucion muy buena por que puedo manipular por codigo y me quito de andar por todos los componentes configurando bueno el problema es el siguiente puse tu codigo tal y como me lo dijiste pero...............
procedure FormateaCampos(query:TADOQuery);
var I:integer;
begin
for i:= 0 to query.FieldCount -1 do
if Pos(Query.Fields[i].FieldName, MisCamposFormateados) <> 0 then
Query.Fields[i].DisplayFormat := ',#0.00'
end;
lo puse asi i me sale [Error] Unit1.pas(44): Undeclared identifier: 'DisplayFormat'
sigue sin reconocerme el DisplayFormat
como la vez
Saludos..... i mil gracias