>On 4/18/02 3:48 PM, "Staz" <staz@...> wrote: > > i'm going to avoid my interface speech, tho you know i am thinking it so > hard that my head might explode... > > > > '~'A > ' Runtime : Rntm Appearance.Incl > ' CPU : Carbon > ' Debugger : Off > '~'B > > appearance window 1 > edit field 1,"I am window #1. I can't be activated",(10,10)-(250,50) > > appearance window 2 : rem keep this baby in back > edit field 1,"I am window #2.",(10,10)-(250,50) > > local fn doEvent > dim @ theWindow as ^CWindowRecord > dim place,wNum > > long if gFBTheEvent.what == _mbutdwnevt > place = fn FindWindow( gFBEvtPt&, theWindow ) > long if theWindow != window(_wndPointer) > wNum = fn FBGetWndNumber( theWindow ) > long if wNum = 1 > beep > gFBTheEvent.what = 0 > end if > end if > end if > > end fn > > on event fn doEvent > > do > handleevents > until 0 > Thanks for your help!!!! Please don't let your head explode, the exceptionally massive brain mass you have could cover the world and bring commerce to a halt! Doug