RE: return value from dialog window
- Posted by Brian Broker <bkb at cnw.com> Feb 04, 2005
- 485 views
Horvath Stefan wrote: > > > it works fine, here's the code. Thank you ck. > But I think to make without global variable, if it is possible. > > > " But I bet there's an easier way. ;) ". (ck) > > I must find that way. > Steve. I must be misunderstanding your request but what's wrong with using message_box() instead of a custom dialog? For example:
include win32lib.ew without warning ------------------------------ constant Win = create( Window, "YesNo Dialog", 0, Default, Default, 300, 220, 0 ), DlgB = create( PushButton, "Click here", Win, 40, 48, 100, 24, 0 ), SB = create(StatusBar, "", Win, 0, 0, 0, 0, 0 ) ------------------------------ procedure onClick_DlgB(integer self, integer event, sequence params) integer response response = message_box( "What's your answer?", "YesNo Dialog", MB_YESNO ) if response = IDYES then setText( SB, "Yes" ) else -- response = IDNO setText( SB, "No" ) end if end procedure setHandler(DlgB, w32HClick, routine_id("onClick_DlgB")) ------------------------------ WinMain(Win, Normal) ------------------------------
-- Brian