[futurebasic] Re: [FB] Active Aplication

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : June 1999 : Group Archive : Group : All Groups

From: Mel & Carol Patrick <mel@...>
Date: Sat, 5 Jun 1999 09:54:44 -0700
>I'm trying to find out if my application is the active application by doing
>this
>
>IF SYSTEM(_aplActive) = _false THEN BEEP:FN inBackground
>
>I'm only using beep for now while I try to get this to work.
>When I change to another application I don't get a beep, and all my normal
>application events keep occuring and my applications window keeps drawing
>pictures.

Heres a snip from one of my own projects :

LOCAL FN InstallAppleEvents
  LONG IF SYSTEM(_sysVers) >= 700 AND SYSTEM(_Aplflag)
    FN myAEInstall(_"oapp")
    OSErr=FN myAEInstall(_"odoc")
    FN myAEInstall(_"pdoc")
    OSErr=FN myAEInstall(_"quit")
  END IF
END FN

Mel Patrick
mel@...