On Monday, March 29, 2004, at 03:26 PM, Robert Purves wrote: > dim as Rect r > window 1 > SetRect( r, 20, 20, 100, 40 ) > appearance button 1,,,,, "OK", @r, _kControlPushButtonProc _useWFont > > do > HandleEvents > until 0 That is a good one, Robert! Someone must have been thinking of me when they implemented that (I am assuming that _useWFont is a FB thing rather than an Apple thing). Who do I thank? But you have seen my application, and so you must know that I like this even better: : SetRect( r, 20, 20, 100, 34 ) : Thank you, Paul