iscMaster = New cDiscMaster
   m_cDiscMaster.Initialise

End Sub

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)

   Screen.MousePointer = vbHourglass
   m_cDiscMaster.ClearUp
   Screen.MousePointer = vbDefault

End Sub
</pre><p>
The next thing is to enumerate through the recorders on the system and 
show the basic recorder information:
</p><pre>
Private Sub ShowRecorders()

Dim cRecorders As cDiscRecorders
Dim cRecorder As cDiscRecorder
Dim iRecorder As Long

   Set cRecorders = m_c