Unter der Annahme, dass
hatErgebnisBruch ein Feld von
TTestBruchrechner des Typs Bruch ist:
Delphi-Quellcode:
procedure TTestBruchrechner.BAdditionClick(Sender: TObject);
begin
self.setzeEingabe;
hatErgebnisBruch = hatBruchrechner.Addition(hatBruch1, hatBruch2);
self.zeigeErgebnis;
end;
Könnte gehen
(Bin jetzt auch müde .....)