DZone Snippets: VID code http://snippets.dzone.com/posts Sat, 11 Oct 2008 17:50:39 GMT DZone Snippets: VID code reset-faces function http://snippets.dzone.com/posts/show/1107 <code> <br />reset-faces: func [ <br /> faces [block!] "Block of face objects, or words that refer to faces." <br />][ <br /> foreach face faces [ <br /> reset-face either object? face [face] [get face] <br /> ] <br />] <br /></code> Tue, 10 Jan 2006 05:52:07 GMT http://snippets.dzone.com/posts/show/1107 gregg.irwin (Gregg Irwin) clear-faces function http://snippets.dzone.com/posts/show/1106 <code> <br />clear-faces: func [ <br /> faces [block!] "Block of face objects, or words that refer to faces." <br />][ <br /> foreach face faces [ <br /> clear-face either object? face [face] [get face] <br /> ] <br />] <br /></code> Tue, 10 Jan 2006 05:51:38 GMT http://snippets.dzone.com/posts/show/1106 gregg.irwin (Gregg Irwin) bring-to-front and send-to-back functions http://snippets.dzone.com/posts/show/1105 <code> <br />bring-to-front: func [face] [ <br /> append remove find face/parent-face/pane face face <br /> show face <br />] <br /> <br />send-to-back: func [face] [ <br /> insert head remove find face/parent-face/pane face face <br /> show face/parent-face <br />] <br /></code> Tue, 10 Jan 2006 05:50:07 GMT http://snippets.dzone.com/posts/show/1105 gregg.irwin (Gregg Irwin) click-face function http://snippets.dzone.com/posts/show/1104 <code> <br />click-face: func [ <br /> "Simulate a mouse click" <br /> face <br />][ <br /> face/feel/engage face 'down none <br />] <br /></code> Tue, 10 Jan 2006 05:49:21 GMT http://snippets.dzone.com/posts/show/1104 gregg.irwin (Gregg Irwin)