El
query1.first sobra porque cuando se hace
query1.open se va al primer registro.
TQuery creo que es de los componentes dbexpress, no los he usado mucho, creo que es así:
Código Delphi
[-]TFloatField(Query1.FieldbyName('Importe')).DisplayFormat := '###,###,##0';
Puedes ponerlo después del
query1.open;
También puedes probar con:
Código Delphi
[-]TNumericField(Query1.FieldbyName('Importe')).DisplayFormat := ',0.00';