Aufrechnen von Integer-Werten in ein neues Ergebnis

[EdAdvokat]

Danke Zacherl

Zitat:

Wenn du willst, kann ich dir gerne beschreiben oder zeigen, wie ich so etwas umsetzen würde. Dazu müsste ich allerdings wissen, was genau deine Zielstellung ist?

Ich will ganz für mich als Beispiel die Anzahl von Stücken und deren Preis ausgeben und dann als Ergebnis die Gesamtzahl der Stücke und deren Erlös
ausgeben zu können. Dazu habe ich mir zum Test das Additionsprogramm geschrieben, doch kam ich ersichtlich zwar zur Addition von Zahl1 und Zahl2, doch
eine Addition von weiteren Werten zum bisherigen Ergebnis scheiterte.
Sicher muss ich das mit Geter und Seter nochmals versuchen, ohne die Klasse sofort wieder zu vernichten. Das mit der class function habe ich noch nicht
verstanden.

Danke Delphi.Narium, ich glaube es ist wirklich zweckmäßig die Instanz von TAddition im create des Formulars zu erstellen, wie Du es vorgeschlagen hast.
Wenn ich das so hinbekommen habe melde ich mich erneut

LTE5 die Variablen integer und int32 sind gleich. Das ist mir durchaus klar und ich habe mich nach dem Studium von Marco Cantu entschlossen im konkreten Beispiel int32 zu verwenden.

[Fritzew]

Das Problem liegt im Parameter Name:

Delphi-Quellcode:

procedure TAddition.aufrechnen(Fergebnis:int32);
begin
  FAufrechnung:= Faufrechnung + FErgebnis ;
end;

Ändere diesen bitte z.B zu:

Delphi-Quellcode:

procedure TAddition.aufrechnen(Value:int32);
begin
  FAufrechnung:= Faufrechnung + Value ;

end;

Grund: Was soll denn addiert werden? Der Parameter oder die Variable der Instance?

War rot trotzdem abgeschickt