Gracias ecfisa, gracias casimiro.
siguiendo el ejemplo de casimiro esta funcionando de esta manera.
Código Delphi
[-] with Query1 do
begin
Close;
SQL.Clear;
SQL.Add('Select Max(pago) as pago From Pagos');
SQL.Add('Where dni = ' + edtDNI.Text);
Open;
Edit1.Text := FormatFloat('###,##0.00', FieldByName('pago').AsInteger);
end;