Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search

[REBOL] Re: Inform broken? work-around

From: felixs::ihug::com::au at: 14-Apr-2002 17:17

I wanted the original window to remain open, so I 'locked' the first window with 'to-image. Here's the code for the list archive. Felix REBOL [ test-dlg: make object! [ go: does [ inform lay ] lay: layout [ vh4 "hello" button "OK" [hide-popup] ] ] lock-layout: func [ lay [object!] /local temp-lay temp-img buf-img][ temp-lay: layout [at 0x0 temp-img: image ] buf-img: to-image lay temp-img/image: buf-img temp-lay/size: lay/size temp-img/size: lay/size temp-lay/offset: lay/offset view temp-lay ] main-lay: layout [ across check radio radio field return button "show dialog" [ dlg: make test-dlg [] dlg/go ] button "hide first" [ lock-layout main-lay dlg: make test-dlg [] dlg/go view main-lay ] button "quit" [ unview ] ] view main-lay ]