Thema: Delphi Mit Arrays rechnen

Einzelnen Beitrag anzeigen

Mysterio08

Registriert seit: 11. Jan 2009
142 Beiträge
 
#1

Mit Arrays rechnen

  Alt 5. Mär 2009, 16:58
Guten Tag,
folgende Situation:
Ich möchte, dass man in ein StringGrid Umsätze von einem ganzen Jahr eingeben kann (Januar, Februar...bis Dezember). Dafür habe ich folgende Zeilen geschrieben:
Delphi-Quellcode:
procedure TForm1.Button_BerechnenClick(Sender: TObject);
var
  Umsatz: Array [1..12] of Single;
begin
  for i := 1 to 12 do
    Umsatz[i] := StrToFloat (StringGrid1.Cells[1,i]);
end
Nun möchte ich, dass der Jahresumsatz errechnet wird. Klar, ich könnte mir das ganze viel einfacher machen und direkt mit den StringGrid-Zellen rechnen, das möchte ich aber nicht.
Wenn ich dann alle Umsätze zugewiesen habe-wie rechne ich dann?
Gesamtumsatz := Umsatz[1] + Umsatz[2]..... + Umsatz[12] Ich glaube da, würde ich mich dumm und dämlich schreiben, und es soll ja Fälle geben, in denen vielleicht tausende Arrays zusammengerechnet werden, ich habe schon bei Delphi-Treff.de geschaut, aber da habe ich nichts Brauchbares gefunden.
Danke schonmal im Vorraus.
mfg. Mysterio08
  Mit Zitat antworten Zitat