BPCSuspend

[This is preliminary documentation and subject to change.]

The BPCSuspend object contains a single method, DeviceRelease, which you can use to suspend the video server and cause it to release all devices.

QuickInfo

  Windows NT: Unsupported.
  Windows: Requires Windows 98.
  Windows CE: Unsupported.
  Header: Declared in vidsvr.odl.
  Import Library: Included as a resource in vid.ocx.
  Unicode: Yes.

See Also

BPCSuspended, Suspending the Video Server

Examples

The following example uses the BPCSuspend object to request that the video server release all devices. When the devices are no longer needed, the BPCSuspended object is set to Nothing, allowing the video server to reconnect to the devices.

Dim susp As BPCSuspend
Set susp = New BPCSuspend
Dim suspended As BPCSuspended
 
'Attempt to suspend the video server
susp.DeviceRelease 0, suspended 
 
'Test whether the video server was suspended
If (suspended Is Nothing) Then
  'Handle the case where devices cannot be released
Else
  'Use the devices
End If
 
'Release suspended to enable the video server to use the devices
Set suspended = Nothing