Thismthe code I am using:
global gQTState, gDisableQT, gPathDelimiter
on startMovie
gPathDelimiter = determineDelimiter()
gQTState = #unknown
gDisableQT = FALSE
-- check which version, if any, of QT is installed.
checkForQT(4)
-- act accordingly
case (gQTState) of
#QTPresent:
-- just go about our business
nothing
#wrongversion:
go frame "wrongversion"
#notPresent:
go frame "noQT"
end case
-- set the variables we need to play the movie
initMovie()
end
on checkForQT versionNumber
if voidP(versionNumber) then exit
currentVersion = quickTimeVersion()
if currentVersion <> 0 then
-- check to see if we have the right version
if currentVersion >= versionNumber then
gQTState = #QTPresent
else
gQTState = #wrongVersion
end if
else
-- it isn't present
gQTState = #notPresent
end if
end
on initMovie
-- add variable declarations here
end
on determineDelimiter
thisMachine = the platform
if thisMachine contains "Windows" then
return "\"
else if thisMachine contains "Macintosh" then
return ":"
else
-- wishing for a world with UNIX playback
return "/"
end if
end
Sean Wilson wrote:
> > I have used checkForQT(4)
>
> This sounds as though it is a custom handler. That is, I don't recognise it
> as a built-in Director function.
>
> So you should perhaps post the handler so we can see what it does (though
> the name is self-explanatory) and how it does it. That will allow people to
> suggest alternatives.
>
> -Sean.
>
> [To remove yourself from this list, or to change to digest mode, go to
> http://www.penworks.com/LUJ/lingo-l.cgi To post messages to the list,
> email [EMAIL PROTECTED] (Problems, email [EMAIL PROTECTED])
> Lingo-L is for learning and helping with programming Lingo. Thanks!]
[To remove yourself from this list, or to change to digest mode, go to
http://www.penworks.com/LUJ/lingo-l.cgi To post messages to the list,
email [EMAIL PROTECTED] (Problems, email [EMAIL PROTECTED])
Lingo-L is for learning and helping with programming Lingo. Thanks!]
