Pdicom处理Dicom图像

Question

救急！！！被这段代码困扰很久，不理解，我是刚学变成的大学生

Answer 1

Tinformation=record
  PatientID,
  PatientName,
  PatientBirthDate,
  PatientSex,
  StudyID,
  StudyDate,
  StudyTime,
  InstitutionName,
  Manufacturer,
  NumerOfFrames:String
end;
....var
    Information:TInformation;......
procedure LoadFileInformation(FileName:String);
var
  ds:TDComFileClass;
begin
    ds:=dcom.read_file(FileName);
    Information.....:=ds.......;
end;
end;