RectControl → Control → Object

MoviePlayer Class

Displays a control for playing Quicktime and Windows Media Player movies.

Events
ControllerSizeChanged
Play
Stop

Properties
AutoPlay | PlayerType | QTVRTiltMin
AutoResize | PlaySelection | QTVRZoom
Border | Position | QTVRZoomMax
Controller | QTMovieController | QTVRZoomMin
ControllerHeight | QTVRNode | QTVRZoomSpeed
ControllerWidth | QTVRNodeCount | Rate
EditingEnabled | QTVRPan | SelLength
HasStep | QTVRPanMax | SelStart
Looping | QTVRPanMin | Speaker
Movie | QTVRPanTiltSpeed | Volume
MovieController | QTVRTilt |
Palindrome | QTVRTiltMax |

Methods
Clear | QTVRHotSpotCount | QTVRTriggerHotSpot
Copy | QTVRHotSpotID | Stop
Cut | QTVRNodeTypeObject | Trim
Paste | QTVRNodeTypePanorama | Undo
Play | QTVRToggleHotSpotNames |

# Notes

Because this is a RectControl, see the RectControl for other properties and events that are common to all RectControl objects.

Windows uses the Windows Movie Player to play movies and Macintosh uses the QuickTime player. Neither player is currently available on Linux, so the MoviePlayer is not supported.

On Windows, you can add WMV files to your project and play them via the MoviePlayer. QuickTime movies work on both Macintosh and Windows.

The Controller property dictates how the movie controls (if any) will be displayed. Passing 0 (zero) means that there will be no user controls available. Passing 1 means that a movie icon or badge will be displayed in the lower left corner of the movie area instead of the controller. When this badge is clicked by the user, the badge disappears and the regular movie controls appear at the bottom of the movie frame. Passing 2 displays the regular movie controls.

# Examples

This example sets the movie "myHomeMovie" as the movie to be played.

MoviePlayer1.movie=myHomeMovie

This example loads a movie called "MyMovie" from the current directory (folder) into MoviePlayer1 and plays it.

Dim f As FolderItem
f= GetFolderItem("MyMovie")
MoviePlayer1.Speaker= True
MoviePlayer1.HasStep= False
MoviePlayer1.movie=f.OpenAsMovie
MoviePlayer1.play

If you added the movie to your project, you can assign it to the movie property with only one line of code:

MoviePlayer1.movie=MyMovie

Using object binding, you can add pushbuttons that play or stop the movie. See the section on the MoviePlayer control in the User's Guide.

The following example uses the MovieController property to get the current position of the player:

Dim pos as Double
pos=MoviePlayer1.MovieController.Controls.CurrentPosition

# See Also

OpenURLMovie function; Movie, EditableMovie classes.