[VB6, twinBASIC] ucSimplePlayer: Simple video playback control

[fafalone]

ucSimplePlayer v2.4.12

This is a simple video player UserControl for VB6, twinBASIC, and VBA, supporting both 32bit and 64bit. It's just a thin wrapper over the IMFPMediaPlayer media player control that's part of Windows Media Foundation. While MS recommends using IMFEngine, that doesn't support Windows 7.

All the basic features are covered:

• Play
  
• Pause
  
• Stop
  
• Volume
  
• Mute
  
• Balance
  
• Seek
  
• Playback rate
  
• Duration
  
• Fullscreen

The VB6 project file and ucSimplePlayDemo.twinproj have basic players implementing the control and its functions using the control as a UserControl.

ucSimplePlayer.twinproj is to compile an OCX which you could then use in VB6/tB plus other hosts like VBA 32bit/64bit.

It will automatically toggle full screen when you double click the video, to disable this change .AllowFullscreen to False. You can still use the manual toggle (.Fullscreen = True/False),

Requirements
Windows 7 or newer
VB6 (.ctl or .ocx), or
twinBASIC (.tbcontrol/.twin or .ocx)

VBA can only use this project as an OCX. Use twinBASIC to compile the OCX matching your Office bitness, or download the precompiled ocx from Releases. Tested in MS Office Excel 2021 64bit.

Note for OCX: If you compile it yourself using the free Community Edition of twinBASIC, the x64 ocx will show a splash screen when first loaded. Use the precompiled build or subscribe yourself to avoid this.

Download from project repository