[View]  [Edit]  [Lock]  [References]  [Attachments]  [History]  [Home]  [Changes]  [Search]  [Help] 

test[tns8] 01 Application

"Access to topmost Frame"
| frame |
frame := UiFrame current topmost.
self print: '// topmost frame is ' ,frame handle.

#(	id canGoBack
	parent page
	"width height
	style"
) do: [:selector| | value |
	value := frame perform: selector.
	value notNil ifTrue: [self print: '//',selector,'=' ,value]
].