On Mar 6, 2007, at 2:12 AM, E. Tejkowski wrote:

> On Mar 5, 2007, at 7:09 PM, Michael Diehr wrote:
>
>> However, it appears that you can test whether Enable Flash is ON or
>> OFF by checking the component version ('flsh' 'mhlr' 'appl') will
>> return 0 if disabled.
>>
>> Does anyone care to cook up sample code for this in REALbasic?  I'm a
>> little rusty with declares under carbon/quicktime.
>
>
>    Declare Function OpenDefaultComponent lib "Carbon" _
>    (componentType as OSType, componentSubType as OSType) as Integer
>
>    Declare Function GetComponentVersion Lib "Carbon" (component as
> integer) as Integer
>
>    dim comp as integer
>    dim m as new MemoryBlock(4)
>
>    comp = OpenDefaultComponent("mhlr","flsh")
>
>    m.long(0) = GetComponentVersion(comp)
>    MsgBox str(m.short(0)) + "." + str(m.short(2))


Thank you! This code works, but unfortunately I'm getting version  
"3.14" in either case...  more research is needed...
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives:
<http://support.realsoftware.com/listarchives/lists.html>

Reply via email to