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

[REBOL] Re: to-string do question?

From: bry:itnisk at: 22-Jul-2003 15:53

>Try this: >form-error: func [errobj /local txt] [ > txt: get in get in system/error errobj/type errobj/id > either block? txt [ > txt: bind/copy txt in errobj 'self > reform txt > ] [txt] >] >view layout [ > inp: field 500 [ > out/text: either error? set/any 'err try [do inp/text] [ > form-error disarm err > ] [ > to string! get/any 'err > ] > show out > ] > out: info 500x300 >]
that's cool, but a little bit too intense for an article on asynchronous pluggable protocols that also has uses some simple rebol scripting in it :) I guess I'm gonna go with: err: error? try[returnstring: to-string do f1/text] either err = true[ append f2/text "No string output returned" show f2][append f2/text returnstring show f2] and say that's it. After all I'm already showing how to extend any url aware windows app with rebol, so I can slip a bit on the application.