Imports Leadtools
Imports Leadtools.Codecs
Imports Leadtools.MediaWriter
Public Sub CreateISOExample()
Dim writer As MediaWriter = New MediaWriter()
Dim drives As List(Of MediaWriterDrive) = writer.Drives
Try
Dim drive As MediaWriterDrive = drives(1)
Dim disc As MediaWriterDisc = drive.CreateDisc()
disc.VolumeName = "TEST DISC"
disc.SourcePathName = Path.Combine(LEAD_VARS.ImagesDir, "InputFiles")
disc.OutputPathName = Path.Combine(LEAD_VARS.ImagesDir, "TESTDISC.iso")
drive.AutoEject = True
AddHandler drive.OnProgress, AddressOf ISOProgress
' CreateISO method starts
drive.CreateISO(disc)
' wait loop for demonstration purposes
Do While drive.State <> MediaWriterState.StateIdle
System.Windows.Forms.Application.DoEvents()
System.Threading.Thread.Sleep(10)
Loop
RemoveHandler drive.OnProgress, AddressOf ISOProgress
Catch ex As Exception
MessageBox.Show("Test Failed: " & ex.Message)
End Try
End Sub
Public Sub ISOProgress(ByVal sender As Object, ByVal evt As MediaWriterProgressEventArgs)
System.Diagnostics.Debug.WriteLine(evt.ToString())
End Sub
Public NotInheritable Class LEAD_VARS
Public Const ImagesDir As String = "C:\Users\Public\Documents\LEADTOOLS Images"
End Class
using Leadtools;
using Leadtools.Codecs;
using Leadtools.MediaWriter;
public void CreateISOExample()
{
MediaWriter writer = new MediaWriter();
List<MediaWriterDrive> drives = writer.Drives;
try
{
MediaWriterDrive drive = drives[1];
MediaWriterDisc disc = drive.CreateDisc();
disc.VolumeName = "TEST DISC";
disc.SourcePathName = Path.Combine(LEAD_VARS.ImagesDir, "InputFiles");
disc.OutputPathName = Path.Combine(LEAD_VARS.ImagesDir, "TESTDISC.iso");
drive.AutoEject = true;
drive.OnProgress += ISOProgress;
// CreateISO method starts
drive.CreateISO(disc);
// wait loop for demonstration purposes
while (drive.State != MediaWriterState.StateIdle)
{
System.Windows.Forms.Application.DoEvents();
System.Threading.Thread.Sleep(10);
}
drive.OnProgress -= ISOProgress;
}
catch (Exception ex)
{
MessageBox.Show("Test Failed: " + ex.Message);
}
}
public void ISOProgress(Object sender, EventArgs evt)
{
System.Diagnostics.Debug.WriteLine(evt.ToString());
}
static class LEAD_VARS
{
public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images";
}