Hi Brian,

Change _mAppleMenu = 255 to : _mAppleMenu = _appleMenu, which I think is 254,
rather than 55

Joe Wilkins

Brian Heibert wrote:

> In my program below, FN BuildAbout never shows, and I haven't been able to
> figure out why.
> Any ideas?
>
> Thanks,
>
> -Brian
>
> RESOURCES "blah,blah,blah"
> _mAppleMenu = 255
> _iAppleMenu = 1
>
> APPLE MENU "About myProgram..."
> DEF FN BuildAbout
>
> LOCAL FN doMenus
> menuID = MENU(_menuID)
> itemID = MENU(_itemID)
>
> SELECT menuID
>
> 'blah,blah,blah
>
> CASE _mAppleMenu
> SELECT itemID
> CASE _iAppleMenu
> FN BuildAbout
> END SELECT
> END SELECT
>
> MENU
> END FN
>
> LOCAL FN BuildAbout
> _windowClass100     = 100                'About window
> _picFld1class100    = 101
> WINDOW _windowClass100,"About",( 217, 223)-( 549, 455), 1027
> PICTURE FIELD _picFld1class100,%4001,(   1,   1)-( 331, 231), 1,_cropPict
> DIM gObjT,gObjL,gObjB,gObjR
> DO
> UNTIL MOUSE(_down)
> WINDOW CLOSE #_windowClass100
> END FN
>
> ON MENU FN doMenus
> DO
> HANDLEEVENTS
> UNTIL 0
>
> --
> To unsubscribe, send ANY message to <futurebasic-unsubscribe@...>