Código Delphi [-] with query1.fieldbyname('codigo') as TNumericField do DisplayFormat := ',#0,00';
with query1.fieldbyname('codigo') as TNumericField do DisplayFormat := ',#0,00';