Aw: [Squeak-ev] ProfStef und OBSystemBrowser
Markus Schlager
m.slg at gmx.de
Mit Dez 29 17:24:17 UTC 2010
Hallo Pascal,
Danke für den Hinweis.
On Wed, 29 Dec 2010, pascal.vollmer at nexgo.de wrote:
> pongbrowser := OBSystemBrowser openOnClass: EllipseMorph.
> pongbrowser inspectInMorphic.
Klappt leider nicht, da OBSystemBrowser kein Morph ist. Was ich finden
muß, ist das SystemWindow, das den Browser darstellt.
> Wie Du über den Workspace den Weg zum Fenster für die Kategorien findest, habe ich nicht untersucht.
Momentan so:
pongbrowserfenster := (World submorphs select: [:each | each model = pongbrowser]) at: 1.
pongbrowserbereiche := (((pongbrowserfenster paneMorphs at: 2) submorphs at: 3) submorphs at: 1) submorphs
Für die erste der beiden Zeilen hätte ich gerne eine robustere
Alternative, die mir sicherer das richtige Fenster liefert.
Markus