[wilcg]

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;