Imports Leadtools
Imports Leadtools.Multimedia
Imports LeadtoolsMultimediaExamples.Fixtures
Public _result As Boolean = False
Public Sub MultimediaSupportExample()
' pszKey is a string containing the serial number. It is defined like this:
' Private pszKey As String = "MyString"
Dim pszAppId As String = "My Test Application"
Try
' unlock the multimedia feature
Leadtools.Multimedia.Common.MultimediaSupport.UnlockModule(pszKey, _
Leadtools.Multimedia.Common.LockType.Application, _
pszAppId)
Catch
Exit Sub
End Try
' [use the multimedia feature here]
' lock the multimedia feature before exiting the app
Try
Leadtools.Multimedia.Common.MultimediaSupport.LockModules(Leadtools.Multimedia.Common.LockType.Application, pszAppId)
_result = True
Catch e1 As Exception
_result = False
End Try
End Sub
using Leadtools;
using Leadtools.Multimedia;
using LeadtoolsMultimediaExamples.Fixtures;
public bool _result = false;
public void MultimediaSupportExample()
{
// pszKey is a string containing the serial number. It is defined like this:
// string pszKey = "MySerial";
string pszAppId = "My Test Application";
try
{
// unlock the multimedia feature
Leadtools.Multimedia.Common.MultimediaSupport.UnlockModule(pszKey,
Leadtools.Multimedia.Common.LockType.Application,
pszAppId);
}
catch
{
return;
}
// [use the multimedia feature here]
// lock the multimedia feature before exiting the app
try
{
Leadtools.Multimedia.Common.MultimediaSupport.LockModules(Leadtools.Multimedia.Common.LockType.Application,
pszAppId);
}
catch
{
return;
}
_result = true;
}