Platforms to show: All Mac Windows Linux Cross-Platform
/AVFoundation/AVPlayerView test
Required plugins for this example: MBS MacCF Plugin, MBS MacBase Plugin, MBS MacCG Plugin, MBS Main Plugin, MBS AVFoundation Plugin
Last modified Tue, 24th Sep 2018.
You find this example project in your MBS Xojo Plugin download as a Xojo project file within the examples folder: /AVFoundation/AVPlayerView test
Download this example: AVPlayerView test.zip
Project "AVPlayerView test.xojo_binary_project"
Class App Inherits Application
Const kEditClear = "&Delete"
Const kFileQuit = "&Quit"
Const kFileQuitShortcut = ""
EventHandler Sub NewDocument()
dim f as FolderItem = GetOpenFolderItem("")
if f <> nil then
OpenDocument f
end if
End EventHandler
EventHandler Sub Open()
#if Target64Bit and TargetMacOS then
// okay
#else
MsgBox "Please run on 64-bit Mac."
#endif
End EventHandler
EventHandler Sub OpenDocument(item As FolderItem)
dim player as new AVPlayerMBS(item)
dim w as new PlayerWindow
w.player = player
w.AVPlayerView.player = player
End EventHandler
End Class
Class PlayerWindow Inherits Window
Control AVPlayerView Inherits AVPlayerViewControlMBS
ControlInstance AVPlayerView Inherits AVPlayerViewControlMBS
End Control
Property player As AVPlayerMBS
End Class
MenuBar MainMenuBar
MenuItem FileMenu = "&File"
MenuItem FileQuit = "#App.kFileQuit"
MenuItem EditMenu = "&Edit"
MenuItem EditUndo = "&Undo"
MenuItem EditSeparator1 = "-"
MenuItem EditCut = "Cu&t"
MenuItem EditCopy = "&Copy"
MenuItem EditPaste = "&Paste"
MenuItem EditClear = "#App.kEditClear"
MenuItem EditSeparator2 = "-"
MenuItem EditSelectAll = "Select &All"
End MenuBar
End Project
Download this example: AVPlayerView test.zip
The items on this page are in the following plugins: MBS AVFoundation Plugin.
