On Wed, Mar 2, 2011 at 10:15 AM, Benjamin < benjamin.vanryseghem.pharo@gmail.com> wrote:
window := (SystemWindow labelled: 'Zork'). window openInWorld delete. self assert: ((World subMorphs includes: window) not).
I have also looked for a method that can tell me if the window is displayed or not, so I used to use this trick ;)
Cool ! Thank you Ben. Laurent.
Ben
On Mar 1, 2011, at 9:06 PM, laurent laffont wrote:
Hi,
I'm currently exploring ways of doing TDD on GUI. (Is there a framework for this ?)
How can I know a window has been closed ? #visible always return true.
self assert: (SystemWindow new openInWorld delete) visible not.
fails.
However this works but a bit "heavy":
(SystemWindow labelled: 'Zork') openInWorld delete. Smalltalk garbageCollect.
self assert: (SystemWindow allSubInstances detect: [:aWindow| aWindow label = 'Zork'] ifNone: [nil]) isNil.
Laurent Laffont - @lolgzs <http://twitter.com/#!/lolgzs>
Pharo Smalltalk Screencasts: http://www.pharocasts.com/ Blog: http://magaloma.blogspot.com/