ImageEn, unit iexBitmaps

TIEDicomCompression

TIEDicomCompression

Declaration

TIEDicomCompression = (iedcUncompressed_Implicit, iedcUncompressed, iedcUncompressed_BE, iedcRLE, iedcLSJPEG1, iedcLSJPEG2, iedcJPEG, iedcJPEG12Bit, iedcJPEG2000, iedcLosslessJPEG2000, iedcMPEG);

Description

Value Description Transfer Syntax Load Save
iedcUncompressed_Implicit Uncompressed, little endian, implicit 1.2.840.10008.1.2      
iedcUncompressed Uncompressed, little endian, explicit 1.2.840.10008.1.2.1      
iedcUncompressed_BE Uncompressed, big endian, explicit 1.2.840.10008.1.2.2      
iedcRLE RLE 1.2.840.10008.1.2.5      
iedcLSJPEG1 Lossless JPEG 1.2.840.10008.1.2.4.57      
iedcLSJPEG2 Lossless JPEG 1.2.840.10008.1.2.4.70      
iedcJPEG JPEG 1.2.840.10008.1.2.4.50      
iedcJPEG12Bit JPEG 12 bit 1.2.840.10008.1.2.4.51      
iedcJPEG2000 Lossy JPEG2000 1.2.840.10008.1.2.4.91      
iedcLosslessJPEG2000 Lossless JPEG2000 1.2.840.10008.1.2.4.90      
iedcMPEG MPEG 1.2.840.10008.1.2.4.100      

Note: For compressed lossless saving the recommended format is iedcLosslessJPEG2000

Examples

// Save uncompressed DICOM
ImageEnView1.IO.Params.DICOM_Compression := iedcUncompressed;
ImageEnView1.IO.SaveToFileDICOM( 'C:\image.dicom' );

// Save DICOM with lossy JPEG compression
ImageEnView1.IO.Params.DICOM_Compression := iedcJPEG;
ImageEnView1.IO.Params.DICOM_JPEGQuality := 75;
ImageEnView1.IO.SaveToFileDICOM( 'C:\image.dicom' );

// Save DICOM with lossy JPEG2000 compression
ImageEnView1.IO.Params.DICOM_Compression := iedcJPEG2000;
ImageEnView1.IO.Params.DICOM_J2000Rate   := 0.10;
ImageEnView1.IO.SaveToFileDICOM( 'C:\image.dicom' );

// Save DICOM with lossless JPEG2000 compression
ImageEnView1.IO.Params.DICOM_Compression := iedcLosslessJPEG2000;
ImageEnView1.IO.SaveToFileDICOM( 'C:\image.dicom' );