Ok, damit sieht dein ButtonOnClick so aus oder?
Delphi-Quellcode:
procedure TForm1.ButtonAdditionClick(Sender: TObject);
begin
FAddition.Zahl1 := StrToIntDef(EditZahl1.Text, 0);
FAddition.Zahl2 := StrToIntDef(EditZahl2.Text, 0);
FAddition.Addition;
LabelErgebnis.Caption := IntToStr(FAddition.Ergebnis);
end;
Dies sollte doch eigentlich auch vermieden werden, wegen Spaghetticode.
Nein, das sollte deshalb vermieden werden, weil das Form um himmels willen niemals im Leben nicht die Klasse TAddition kennen darf.
So würde ich das aber auch lösen. Wie sähe denn deine Lösung aus?
(fett durch mich)
Dann hast du aber die Aufgabe nicht gelöst, um die es hier geht.
Allgemein:
Eine saubere Trennung erreicht man nur durch Abstraktion. Dass diese Mehraufwand beim Schreiben verursacht, sollte hier nicht das Thema sein.