For Windows Developers who need to offers Calendar presentations complete with full customization to make your appointment for VB.NET, C#, VB6, VFP, MS Access, Delphi, VC++ .
Scanner Pro ActiveX x64 Control for 64 bit and 32 bit MS Access, VB.NET, C#, Delphi and Visual C and 32 bit Visual Basic 6 and VFP.
Platform :
Step 1: Download Movie Player Pro ActiveX setup disk and installed it.
Step 2: Create New Visual Basic Project, select Windows Application.
Private Sub Command1_Click()MoviePlayer1.AddLayer "C:\movie\yourvideo1.mpg", 0, 0, 0.5, 0.5, 1.0, TrueMoviePlayer1.AddLayer "C:\movie\yourvideo2.mpg", 0.5, 0.5, 1, 1, 1.0, TrueMoviePlayer1.PlayEnd SubIf you want to transparent the video, change the iAlphaValue in AddLayer method, the value must 0.0 to 1. 0 , if change to 0. 5 mean 50% transparent.
Public Function AddLayer( _ ByVal strVideo As String ,_ ByVal iVideoLeft As Float ,_ ByVal iVideoTop As Float ,_ ByVal iVideoRight As Float ,_ ByVal iVideoBottom As Float ,_ ByVal iAlphaValue As Float ,_ ByVal bHaveAudio As Bool )
The following code will make the first video display 50% transparent.
Private Sub Command1_Click()MoviePlayer1.AddLayer "C:\movie\yourvideo1.mpg", 0, 0, 0.5, 0.5, 0.5, TrueMoviePlayer1.AddLayer "C:\movie\yourvideo2.mpg", 0.5, 0.5, 1, 1, 1, TrueMoviePlayer1.PlayEnd Sub
info@viscomsoft.com (General information)
sales@viscomsoft.com (Sales)
support@viscomsoft.com (Support)
Copyright © 2009-2022 Viscom Softwares. All rights reserved.