CODEWITHSUNDEEP
user-interfacesmalltalkpharospec-ui
user869097
user869097

Reputation: 1362

How to close a window with Spec in Pharo

I have a Spec window with several controls. When I click on the Ok button I want the window to be closed.

| m |
m := DynamicComposableModel new.
m instantiateModels: #(text TextModel ok OkToolbar).
m ok okAction: [ self close ].
m openWithSpecLayout: (SpecLayout composed
    newColumn: [ : c | c add: #text ; add: #ok height: 30 ];
    yourself).

I have tried sending delete and close, but none worked. How can I close the window?

Upvotes: 4

Views: 536

Answers (1)

EstebanLM
EstebanLM

Reputation: 4357

you can do this: 

| m |
m := DynamicComposableModel new.
m instantiateModels: #(text TextModel ok OkToolbar).
m ok okAction: [ m window close ].
m openWithSpecLayout: (SpecLayout composed
    newColumn: [ : c | c add: #text ; add: #ok height: 30 ];
    yourself).

Upvotes: 4

Related Questions