Declaration

TIEDicomRange = (iedrAdjust, iedrSetBlackWhite);

Description

Loading Example

ImageEnView1.IO.NativePixelFormat := true;
ImageEnView1.IO.Params.DICOM_Range := iedrSetBlackWhite;
ImageEnView1.IO.LoadFromFile( 'D:\slice91.dcm' );
dcenter := ImageEnView1.IO.Params.DICOM_WindowCenterOffset + StrToFloat( edtLevel.Text );
dMin := dcenter - 0.5 - StrToFloat( edtWidth.Text ) - 1) / 2;
dMax := dcenter - 0.5 + StrToFloat( edtWidth.Text ) - 1) / 2;
ImageEnView1.IEBitmap.BlackValue := dMin;
ImageEnView1.IEBitmap.WhiteValue := dMax;
ImageEnView1.Update();

Saving Example

// Saving a DICOM that was loaded using iedrSetBlackWhite
// Note: This will happen automatically if you attempt to save with DICOM_Range=iedrSetBlackWhite
ImageEnView1.IEBitmap.StretchValues();
ImageEnView1.IO.Params.DICOM_Range := iedrAdjust;
ImageEnView1.IO.SaveToFileDICOM( SaveImageEnDialog1.FileName );

---