In Stringgrid mit Currency - Werten rechnen

[DeddyH]

Summier doch einfach die Werte auf, sobald Du sie aus der Datenbank ausliest. Das ist weniger fehleranfällig und umständlich, als erst das Grid zu befüllen und anschließend über die String-Repräsentation zu iterieren.

Delphi-Quellcode:

var
  lGesamtsumme: Currency;
begin
  lGesamtsumme := 0;
  ...
  while not liteQuery_rechng.Eof do
    begin
      ...
      lGesamtSumme := lGesamtSumme + liteQuery_rechng.FieldByName('Epreis').AsCurrency;
      ...
    end;
  // Und hier jetzt den Wert in einem Label oder wo auch immer darstellen
end;