> 6)??how to without using ESC key and go next frame while the 
> movie end??

I now understand your question.  Try this:

1) delete the script in frame 1
2) use this in frame script 2:

global WMPSpr, iDuration

on exitFrame me
  sprite(WMPSpr).Filename = the moviePath & "xx.mpg"
  iDuration = sprite(WMPSpr).Duration
  sprite(WMPSpg).DisplaySize = 3
end

3) use this in the last frame of the WMP sprite:

global WMPSpr, iDuration

on exitFrame me
  if sprite(WMPSpr).CurrentPosition >= iDuration then
    sprite(WMPSpr).DisplaySize = 0
    go the frame + 1
  else
    go the frame
  end if
end

Hope this fixes your problem,
Rob

/*********************************
* Rob Wingate, Software Human    *
* http://www.vingage.com         *
* mailto:[EMAIL PROTECTED] *
*********************************/

[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