Public Sub CreateISO( _
   ByVal discProps As MediaWriterDisc _
) 

Dim instance As MediaWriterDrive
Dim discProps As MediaWriterDisc
 
instance.CreateISO(discProps)

public void CreateISO( 
   MediaWriterDisc discProps
)

public:
void CreateISO( 
   MediaWriterDisc^ discProps
) 

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

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";
}