Trennung von GUI und Logik, wie geht ihr vor?

[divBy0]

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.