Inserting a Wave Stream Into a Data Set Example for Visual Basic
Function InsertWaveFileIntoDataSet(objDataSet As LEADDicomDS, _
sInputWaveFilename As String) As Boolean
InsertWaveFileIntoDataSet = False
Dim objAudioWaveformGroup As New DicomWaveformGroup
objAudioWaveformGroup.EnableMethodErrors = False
' Load the audio file into the waveform group
If objAudioWaveformGroup.LoadAudio(sInputWaveFilename) <> DICOM_SUCCESS Then
Exit Function
End If
' Insert the audio waveform group into the Data Set
If objDataSet.AddWaveformGroup (objAudioWaveformGroup) <> DICOM_SUCCESS Then
Exit Function
End If
InsertWaveFileIntoDataSet = True
End Function