uniTreeVviewc创建一个tree，显示患者姓名（PatientName）。因为需要用到患者ID（PatientID），所以使用help：TPatientTreeNode=class(TUniTreeNode)//strictprivateFPatientID:string;functionGetPatientID:string;procedureSetPatientID(constValue:string)

如floatx=0.01999999999用nslog输出是0.02例：要求对2个值进行0.02的超差判定  第一次：   if abs(FieldByName(x[0]).AsFloat -FieldByName(x[1]).AsFloat) >0.02 then     showmessage（'超差'）；          问题出现：>号

IDE：Delphi7使用TClientDataSet控件在Delphi中保存内存数据集合（相当于Java中的List<Map>），代码片段：procedureTMainForm.btnExportClick(Sender:TObject);tmpCds:TClientDataSet;tmpStr:string;begin//TClientDataSet作为内存数据集合使用//*********************