救急!!!被這段代碼困擾很久,不理解,我是剛學變成的大學生

uj5u.com熱心網友回復:
Tinformation=recordPatientID,
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;
轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/31058.html
標籤:語言基礎/算法/系統設計
