In This Topic ▼

param1 Field

Summary

Generic parameter one containing event-specific information. The use and possible values of the parameter depend on the MediaEventCode.

Syntax

C++

public long param1

Public param1 As Long

public: 
int64 param1

Example

using Leadtools; 
using Leadtools.Multimedia; 
using LeadtoolsMultimediaExamples.Fixtures; 
 
public bool _result = false; 
public PlayCtrlForm _form = new PlayCtrlForm(); 
 
public void HandleScriptExample() 
{ 
   PlayCtrl playctrl = _form.PlayCtrl; 
   string inFile = Path.Combine(LEAD_VARS.MediaDir, "WriteScriptStream_Dest.wmv"); 
 
   try 
   { 
      playctrl.MediaEvent += new MediaEventHandler(PlayCtrl_MediaEvent); 
 
      playctrl.SourceFile = inFile; 
   } 
   catch (Exception) 
   { 
      return; 
   } 
 
   // we'll loop on the state and pump messages for this example. 
   // but you should not need to if running from a Windows Forms application. 
   while (playctrl.State == PlayState.Running) 
      Application.DoEvents(); 
} 
 
public void PlayCtrl_MediaEvent(object sender, MediaEventArgs e) 
{ 
   if (e.eventCode == MediaEventCode.EC_OLE_EVENT) 
   { 
      string nameString = System.Runtime.InteropServices.Marshal.PtrToStringBSTR(new IntPtr(e.param1)); 
      string commandString = System.Runtime.InteropServices.Marshal.PtrToStringBSTR(new IntPtr(e.param2)); 
      Console.WriteLine("EC_OLE_EVENT: name={0}, command={1}", nameString, commandString); 
      _result = true; 
   } 
} 
 
static class LEAD_VARS 
{ 
   public const string MediaDir = @"C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 20\Media"; 
}

Imports Leadtools 
Imports Leadtools.Multimedia 
Imports LeadtoolsMultimediaExamples.Fixtures 
 
Public _result As Boolean = False 
Public _form As New PlayCtrlForm() 
 
Public Sub HandleScriptExample() 
   Dim playctrl As PlayCtrl = _form.PlayCtrl 
   Dim inFile As String = Path.Combine(LEAD_VARS.MediaDir, "WriteScriptStream_Dest.wmv") 
 
   Try 
      AddHandler playctrl.MediaEvent, AddressOf PlayCtrl_MediaEvent 
 
      playctrl.SourceFile = inFile 
   Catch generatedExceptionName As Exception 
      Exit Sub 
   End Try 
 
   ' we'll loop on the state and pump messages for this example. 
   ' but you should not need to if running from a Windows Forms application. 
   While playctrl.State = PlayState.Running 
      Application.DoEvents() 
   End While 
End Sub 
 
Public Sub PlayCtrl_MediaEvent(ByVal sender As Object, ByVal e As MediaEventArgs) 
   If (e.eventCode = MediaEventCode.EC_OLE_EVENT) Then 
      Dim nameString As String = System.Runtime.InteropServices.Marshal.PtrToStringBSTR(New IntPtr(e.param1)) 
      Dim commandString As String = System.Runtime.InteropServices.Marshal.PtrToStringBSTR(New IntPtr(e.param2)) 
      Console.WriteLine("EC_OLE_EVENT: name={0}, command={1}", nameString, commandString) 
      _result = True 
   End If 
End Sub 
 
Public NotInheritable Class LEAD_VARS 
   Public Const MediaDir As String = "C:\Program Files (x86)\LEAD Technologies\LEADTOOLS 20\Media" 
End Class

Requirements

Target Platforms

Reference

MediaEventArgs Class

MediaEventArgs Members

Download our FREE evaluation

Help Version 20.0.2020.4.2

Leadtools.Multimedia Assembly

Introduction

Getting Started

Namespaces

Leadtools.Multimedia Namespace

Leadtools.Multimedia.Common Namespace

Assemblies