SMALLTALK K1ex127-.45ex51275ahler/Bothner

5.3 Vereinbarung einer Klasse 83
Durchschnittswertes durch die wie folgt zu vereinbarende Methode “durchschnitt”
festlegen:
durchschnitt
|summe|
summe := 0.
self bereitstellenWerte
do: [:einObjekt|summe:= summe + einObjekt asInteger].
durchschnittswert:= summe / (self bereitstellenWerte size)
Hinweis: Im Gegensatz zur ursprünglich entwickelten Lösung in Form der Methode “anzeigenDurchschnitt”
(siehe Abschnitt 4.4) wird in diesem Fall durch den Variablennamen
“durchschnittswert” keine temporäre Variable, sondern eine Instanz-Variable gekennzeichnet.
Zur Anzeige des gesicherten Durchschnittswertes im Transcript-Fenster sehen wir
die folgende Methode vor:
anzeigenDurchschnittswert
Transcript cr;
show: ’Der Durchschnittswert ist: ’;
show: durchschnittswert asFloat printString
Bei der Einrichtung der Klasse “InWerteErfassung” mit der Instanz-Variablen “durchschnittswert”
sowie den Methoden “durchschnitt” und “anzeigenDurchschnittswert”
gehen wir in der nachfolgend beschriebenen Weise vor.
Um “InWerteErfassung” als Unterklasse von “WerteErfassung” einzurichten, stellen
wir im Klassen-Bereich des Klassen-Hierarchie-Browser-Fensters die Klasse “WerteErfassung”
– durch einen Mausklick auf den Klassennamen – als aktuelle Klasse
ein. Anschließend fordern wir mittels der Menü-Option “Add Subclass...” des Menüs
“Classes” das folgende Dialogfeld “Add a Subclass” an:
Abbildung 5.5: Einrichtung einer Unterklasse
Nachdem wir “InWerteErfassung” in das Eingabefeld “New Class:” eingetragen und
das Dialogfeld über das Schaltfeld “OK” bestätigt haben, erscheint das Klassen-