Registriert seit: 29. Mai 2002
37.621 Beiträge
Delphi 2006 Professional
|
AW: Trennung von GUI und Logik, wie geht ihr vor?
19. Aug 2011, 18:14
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?
Michael Ein Teil meines Codes würde euch verunsichern.
|
|
Zitat
|