Wow, that's a lot of code for a simple function!  I'm sure you were just creating a 
flexible script to be used over and over with
different parameters, but in this case it's just easier to do it each time, since it 
only takes a minute.  I use this all the time
with consistently accurate results.
On frame one of the movie put:

on exitFrame
  if quickTimeVersion()<4 then  --just change the version number you are checking for
    go to the frame +1
  else
    go to the frame +2
  end if
end

Charlie Fiskeaux II
The Creative Group
www.cre8tivegroup.com
859/858-9054 x29
cell: 859/312-3883


----- Original Message -----
From: "mirianam" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Thursday, September 13, 2001 1:02 AM
Subject: Re: <lingo-l> check for QT


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!]



[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!]

Reply via email to