[futurebasic] Re: Hierarchal Parent item?

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : October 2003 : Group Archive : Group : All Groups

From: Ken Shmidheiser <kshmidheiser@...>
Date: Wed, 29 Oct 2003 17:38:16 -0500
Robert Covington wrote in this thread:

>Thanks Alain,  but it appears that  instead of returning a regular FB
>ID, the toolbox call returns in this case  some TXNFontMenuObject
>reference, and not the real ID sent to the doDialog?
>
>FontMenuRef   Hierarchical Output ID returned when stepping...looks
>more like a menu reference/handle than the ID.
>
>4665024         0
>   4665024         0
>   4665024         0
>   4665024         0
>   4665024         13107200   < -- actually 200
>   4665024         13172736   < -- actually 201
>
>   4665024         0
>   4665024         0
>   4665024         0
><Snip>
>
>
>I know the FontMenu ID (5), and the Starting output ID's of the
>hierarchicals returned (200)



Robert,

Perhaps this would be easier:


local fn SubMenuInfo( subMenuChosen as sint16 )
dim as long menuID

menuID = fn HiWord( subMenuChosen )

end fn = menuID

/*
 From R.C.'s example:

4665024         0
   4665024         0
   4665024         0
   4665024         0
   4665024         13107200   < -- actually 200
   4665024         13172736   < -- actually 201

   4665024         0
   4665024         0
   4665024         0

*/

print fn SubMenuInfo( 13107200 )
print fn SubMenuInfo( 13172736 )

include "Subs Quick Event Loop.Incl"

Keep up the excellent work!   ;-)

Ken