(ByVal nCurrentTrack
 As Long, ByVal nTotalTracks As Long)
   RaiseEvent TrackProgress(nCurrentTrack, nTotalTracks)
End Sub

Private Function IVBDiscMasterProgressEvents_QueryCancel() As Long
Dim bCancel As Boolean
   'RaiseEvent QueryCancel(bCancel)
   'If (bCancel) Then
   '   IVBDiscMasterProgressEvents_QueryCancel = 1
   'End If
End Function
</pre><p>&#160;</p><p>&#160;</p><p>&#160;</p><p>&#160;</p><p>&#160;</p><p>&#160;</p></td><td class="rightbar" valign="top" bgcolor="#C2BEB1">
<!-- No right bar cont