Mark, the code below shows that the popupAsChild method for a PropertySheet
returns .TRUE instead of a .Message object, which is the documented return
value.
a=.a~new
msgObject = a~display
say msgObject
::class a subclass userDialog
::method display
page1 = .page1~new(,,,"Page1")
page2 = .page2~new(,,,"Page2")
ps=.ps~new(.Array~of(page1,page2))
return ps~popupAsChild(self)
::class ps subclass PropertySheetDialog
::class page1 subclass UserPSPDialog
::class page2 subclass UserPSPDialog
::requires "oodialog.cls"
Staffan
------------------------------------------------------------------------------
Own the Future-Intel(R) Level Up Game Demo Contest 2013
Rise to greatness in Intel's independent game demo contest. Compete
for recognition, cash, and the chance to get your game on Steam.
$5K grand prize plus 10 genre and skill prizes. Submit your demo
by 6/6/13. http://altfarm.mediaplex.com/ad/ck/12124-176961-30367-2
_______________________________________________
Oorexx-users mailing list
Oorexx-users@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/oorexx-users
