Summenberechnung

[Traugott]

Hi,
nachfolgender Code habe ich aus meiner Anwendung (BorlandBuilder C++)
und funzt seit Jahren:

Code: Alles auswählen

double summe = 0;
 
Query1->First();
 
while (!Query1->Eof)
 
{summe += Query1->FieldByName("Betrag")->AsFloat;
 
Query1->Next();
 
}
 
Edit1->Text = summe;

für Lazarus habe ich ihn übersetzt wie folgt:

Code: Alles auswählen

var
summe : double;
begin
summe := o;
Query1.First;
While (!Query1.EOF)
summe +:= Query1.FieldByName('Betrag').AsFloat;
Query1.Next;
Edit1.Text := summe;
end;

in der Zeile (summe +:= Query1.FieldByName('Betrag').AsFloat;) meckert mit der Compiler bei dem Wort summe.
eine Spitzklammer ({ ) kann ich nicht setzen, das ist bei Lazarus ausgeklammert.

Was ist falsch ?????

[mr.mc.mauser]

Hallo,

ich weis zwar nicht ob deine Datenbank MYSQL ist, aber bei Mysql mache ich das so:

Code: Alles auswählen

Query = 'SELECT sum(Betrag) FROM Tabeller'

Da brauchst dann keine Extra Funktion, das Liefert dir einfach das ergebnis !

Gruß
Robert

[theo]

+:= gibt's nicht in Pascal.
Ursprünglich gibt's sowas gar nicht in Pascal, mit FPC geht aber (seit wann?) durchaus:
+=

Der ursp. Pascal Weg ist aber eig.:

summe:= summe + Query1.FieldByName('Betrag').AsFloat;

[am2]

mit FPC geht aber (seit wann?) durchaus:
+=

Ehrlich? Das ist ja drollig, muss ich mal ausprobieren.

Aber zur Frage: Wenn Du die Daten sowieso holen (oder beim Addieren seltsame Randbedingungen beachten) mußt, dann kannst Du sie sicher auch mit Deiner Schleife durchzählen lassen.
Anderenfalls ist es wahrscheinlich in der Tat sinnvoller, das zusammenzählen in der Datenbank machen zu lassen und lediglich die Summe zu übertragen. In der Regel sind die Datenbanken schneller UND es werden definitiv weniger Daten übertragen, was idR wichtig ist.

Liefert eine Zeile mit einer Zahl

Code: Alles auswählen

SELECT SUM(DIAET) FROM TABLE_ABGEORDNETE WHERE PARTEI='XDB'

Liefert soviele Zeilen, wie Abgeordnete

Code: Alles auswählen

SELECT DIAET FROM TABLE_ABGEORDNETE WHERE PARTEI='XDB'

Letztere Variante ist eigentlich nur sinnvoll, wenn Du, wie gesagt, sowieso alle Gehälter anzeigst und nur noch eine Summe drunterschreiben willst oder wenn die Bedingungen sich nur umständlich in SQL ausdrücken lassen, also wenn Du zum Beispiel alle Abgeordneten suchst, in deren Namen ein Doppelkonsonant vorkommt (Müller, Lehmann, Klapperstorch)

[theo]

Ehrlich? Das ist ja drollig, muss ich mal ausprobieren.

Ich glaub schon ehrlich:
http://www.freepascal.org/docs-html/ref ... 300010.1.1" onclick="window.open(this.href);return false;

[MAC]

Ehrlich? Das ist ja drollig, muss ich mal ausprobieren.

Das war auch das erste was dazu gedacht habe