SMALLTALK K1ex127-.45ex51275ahler/Bothner

278 13 Das Model/View-Konzept
paneName: ’statistikanzeige’);
addSubpane: (Button new owner: self;
framingRatio:((Rectangle leftTopUnit
rightAndDown:(1/2)@(5/8)) extentFromLeftTop:(2/8)@(1/8));
when: #clicked perform: #zurueck:;
contents: ’zurück’)
).
(Skalenniveau = ’No’)
ifTrue: [(self menuWindow) addMenu: (Menu new owner: self;
title: ’Statistiken’;
appendItem: ’Modus’ selector: #zeigenModus)].
(Skalenniveau = ’Or’)
ifTrue: [(self menuWindow) addMenu: (Menu new owner: self;
title: ’Statistiken’;
appendItem: ’Modus’ selector: #zeigenModus;
appendItem: ’Median’ selector: #zeigenMedian)].
(Skalenniveau = ’In’)
ifTrue: [(self menuWindow) addMenu: (Menu new owner: self;
title: ’Statistiken’;
appendItem: ’Modus’ selector: #zeigenModus;
appendItem: ’Median’ selector: #zeigenMedian;
appendItem: ’Durchschnitt’
selector: #zeigenDurchschnitt)]
Um die Anzeige des Auswertungsfensters anfordern zu können, treffen wir die folgende
Vereinbarung:
anzeigenAuswertung
self initialisierenAuswertung.
self openWindow
Zum Entfernen des Auswertungsfensters vom Bildschirm legen wir die Instanz-
Methode “zurueck:” wie folgt fest:
zurueck: aButton
self close
Damit über das im Auswertungsfenster enthaltene Pulldown-Menü “Statistiken”
– mit den Menü-Optionen “Modus”, “Median” und “Durchschnitt” – die jeweils
zugehörigen Statistiken angezeigt werden können, vereinbaren wir die Methoden
“zeigenModus” “zeigenMedian”, und “zeigenDurchschnitt” in der folgenden Form:
zeigenDurchschnitt
(self paneNamed: ’statistikanzeige’) contents:
( ((Smalltalk at: ((Skalenniveau,’WerteErfassung’,Jahrgang)
asSymbol))