结课件.docVIP

　　 DICOMDIR结构　 .　　　 分类： DICOM2011-07-24 17:2631人阅读评论(0)收藏举报　　　 　　　 　 无论是在DICOM文件还是DICOM通信中，其信息都是由许多data element（数据单元)的集合所表示，每个data element表示一个属性，如病人姓名、图像类型等等。这些data element按照Tag值从小到大依次连接，类似于数据结构的链表或者数组(SQ类型有另外的编码方式,以后会讲到)，请看下图，一个data element包含四个字段Tag,VR,ValueLength,Value Field.　 　　　 　 　 　 　 DICOMDIR 是一个可变长度 迷你 database 文件。由 group (0002, xxxx) 和 group (0004, xxxx) 为主题。描述的是一个 4 层的树状结构 (tree structure)。　 　　 1. Patient　　　 2. Study　　 3. Series　　 4. Image　　　 　　 　　 　　 　 　　 将data element的数据结构编码为字节流时受以下几个因素影响: 　 　　　 1.传输语法： Implicit/Explicit VR, BIG/LITTLE Endian　 　　　 2.VR 　　 　　 当采用implicit VR时，其编码如下，这个时候是没有VR字段的，它采用data dictionary默认的VR.　　　 　 　　 　 　 　　 　　 　　 　　 　 　 　 　　 　 　　　 DICOMDir结构的delphi实现　 　 　　　 　　 　　 　　　 ///////////////////////////////////////////////////////////////////////////////　 //　　　 // Filename: uDICOMDIR.pas　 //　　　 // Summary:　　 // DicomStation Source With Delphi7　　　 //　　　 // Modification History:　　 // Date By Summary　　　 // -------- -------- ---------------------------------------------　　　 // 07/24/2011 hegb Original Creation　 ///////////////////////////////////////////////////////////////////////////////　　　 unit uDICOMDIR;　 　 interface　 　 uses　　 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,　 Dialogs, StdCtrls;　 　　　 type　 //Instance Class　 TImageItem = class(TObject)　　 NextDirRecordOffset: LongWord; //(0004,1400)　 RecordInUseFlag: Word; //(0004,1410)　　 LowerLevelDirOffset: LongWord; //(0004,1420)　　 DirRecordType: string; //(0004,1430)　　 ReferenceFileID: string; //(0004,1500)　 ReferenceTransSyntaxUID: string; //(0004,1512)　 InstanceNumber: string; //(0020,0013)　　　 public　 constructor Create;　　　 destructor Destroy; override;　　　 end;　　 　　 //Series Class　　 TSeriesItem = class(TObject)　 NextDirRecordOffset: LongWord; //(0004,1400)　　　 RecordInUseFlag: Word; //(0004,1410)　 LowerLevelDirOffset: LongWord; //(0004,1420)　　 DirRecord