Imports Leadtools
Imports Leadtools.Dicom
'''
Private Sub DicomDataSet_InitializeExample()
Dim ds As DicomDataSet = New DicomDataSet()
Dim flags As DicomDataSetInitializeFlags = DicomDataSetInitializeFlags.ExplicitVR Or DicomDataSetInitializeFlags.LittleEndian Or _
DicomDataSetInitializeFlags.AddMandatoryElementsOnly Or DicomDataSetInitializeFlags.AddMandatoryModulesOnly
ds.Initialize(DicomClassType.CTImageStorage, flags)
ds.Save(Path.Combine(LEAD_VARS.ImagesDir, "Test.dcm"), DicomDataSetSaveFlags.None)
End Sub
Public NotInheritable Class LEAD_VARS
Public Const ImagesDir As String = "C:\Users\Public\Documents\LEADTOOLS Images"
End Class
using Leadtools;
using Leadtools.Dicom;
///
void DicomDataSet_InitializeExample()
{
DicomDataSet ds = new DicomDataSet();
DicomDataSetInitializeFlags flags =
DicomDataSetInitializeFlags.ExplicitVR |
DicomDataSetInitializeFlags.LittleEndian |
DicomDataSetInitializeFlags.AddMandatoryElementsOnly |
DicomDataSetInitializeFlags.AddMandatoryModulesOnly
;
ds.Initialize(DicomClassType.CTImageStorage, flags);
ds.Save(Path.Combine(LEAD_VARS.ImagesDir, "Test.dcm"), DicomDataSetSaveFlags.None);
}
static class LEAD_VARS
{
public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images";
}
using Leadtools.Dicom.Constants;
using Leadtools;
using Leadtools.Dicom;
///
async Task DicomDataSet_InitializeExample()
{
DicomDataSet ds = new DicomDataSet();
DicomDataSetInitializeFlags flags =
DicomDataSetInitializeFlags.ExplicitVR |
DicomDataSetInitializeFlags.LittleEndian |
DicomDataSetInitializeFlags.AddMandatoryElementsOnly |
DicomDataSetInitializeFlags.AddMandatoryModulesOnly
;
ds.Initialize(DicomClassType.CTImageStorage, flags);
string dicomFileNameOutput = "Test.dcm";
StorageFile saveFile = await Tools.AppLocalFolder.CreateFileAsync(dicomFileNameOutput);
ILeadStream streamOutput = LeadStreamFactory.Create(saveFile);
using (IDisposable disposableOUT = streamOutput as IDisposable)
{
await ds.SaveAsync(streamOutput, DicomDataSetSaveFlags.None);
}
}
using Leadtools;
using Leadtools.Dicom;
using Leadtools.Examples;
void DicomDataSet_InitializeExample(Stream outputStream)
{
DicomDataSet ds = new DicomDataSet();
DicomDataSetInitializeFlags flags =
DicomDataSetInitializeFlags.ExplicitVR |
DicomDataSetInitializeFlags.LittleEndian |
DicomDataSetInitializeFlags.AddMandatoryElementsOnly |
DicomDataSetInitializeFlags.AddMandatoryModulesOnly
;
ds.Initialize(DicomClassType.CTImageStorage, flags);
ds.Save(outputStream, DicomDataSetSaveFlags.None);
}
Imports Leadtools
Imports Leadtools.Dicom
Private Sub DicomDataSet_InitializeExample(ByVal outputStream As Stream)
Dim ds As DicomDataSet = New DicomDataSet()
Dim flags As DicomDataSetInitializeFlags = DicomDataSetInitializeFlags.ExplicitVR Or _
DicomDataSetInitializeFlags.LittleEndian Or _
DicomDataSetInitializeFlags.AddMandatoryElementsOnly Or _
DicomDataSetInitializeFlags.AddMandatoryModulesOnly
ds.Initialize(DicomClassType.CTImageStorage, flags)
ds.Save(outputStream, DicomDataSetSaveFlags.None)
End Sub