> >IF NOT "FOXTOOLS" $ SET("LIBRARY") > IF FILE("FOXTOOLS.FLL") > SET LIBRARY TO FOXTOOLS ADDITIVE > ELSE > MESSAGEBOX("Cannot find FoxTools.fll. Procedure canceled.", 16, PROGRAM(), 1000) > RETURN > ENDIF >ENDIF > >lnWhandle = _WOnTop() > >IF lnWhandle = 0 > MESSAGEBOX("_WFindTitl returned 0. Procedure canceled.", 16, PROGRAM()) > RETURN >ELSE > MESSAGEBOX("Currently Selected Window = '" + _WTitle(lnWhandle)+ "'") >ENDIF > >ACTIVATE WINDOW SCREEN >?"Hi" > >_WSelect(lnWhandle) > >RETURN