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

[ALLY] Re: Change in Inform behaviour

From: mike:yaunish:home at: 17-Apr-2001 23:14

At 11:16 AM 17/04/01 -0500, you wrote: Thanks for the tip. Strange behaviour in the Beta, I guess.
>From: "Mike Yaunish" > > The example script below use to work with the old Beta version of > > View - but now after you enter text into the requester, nothing > > makes it's way back to the main window. I am not sure what I > > need to change to make it work. If there is a better way to do this > > I would appreciate knowing what it is. > > > > > > my-fun: func [] [ > > ret-val: copy "" > > my-req: layout/size [ > > text "Enter something:" > > f: field [ ret-val: copy f/text > > unview/only my-req ] > > ] 300x80 > > inform my-req > > ret-val > > ] > > > > view main: layout [ text "Main Window" > > button "open requester" [ > > the-ret-val: my-fun > > print [ rejoin [ "requester returned = {" the-ret-val "}" ]] > > main-field/text: the-ret-val > > show main-field > > ] > > main-field: field "" > > ] > >Hi, Mike, > >Change: > unview/only my-req >to: > hide-popup > >And it should work. Complete changed code below. > >--Scott Jones >> >my-fun: func [] [ > ret-val: copy "" > my-req: layout/size [ > text "Enter something:" > f: field [ ret-val: copy f/text > hide-popup] > ] 300x80 > inform my-req > ret-val >] > >view main: layout [ text "Main Window" > button "open requester" [ > the-ret-val: my-fun > print [ rejoin [ "requester returned = {" the-ret-val "}" ]] > main-field/text: the-ret-val > show main-field > ] > main-field: field "" >] > >-- >To unsubscribe from this list, please send an email to >[ally-request--rebol--com] with "unsubscribe" in the >subject, without the quotes.
Mike Yaunish [mike--yaunish--home--com]