unit ConstUnit; interface const {纵横公路造价软件 纵横广东公路造价编审系统 纵横公路算量软件 纵横标后预算软件 纵横0号台账清单编审软件 } G_ProductName = '纵横公路工程结算决算计量支付一体化软件'; iQuantityDigit = -3; iPriceDigit = -2; iTotalPriceDigit = 0; iMaxStageCount = 15; // 固定ID iPriceMarginID = 54; sBills_PMHint = '该清单为材料调差清单节点,结果由材料调差计算得到,不可编辑。'; {$O-} {$IFDEF _mCloud} G_IsCloud = True; {$IFDEF _mGuangDong} G_AppHandleName = 'Measure_GuangDong_Cloud'; {$ELSE} G_AppHandleName = 'Measure_Cloud'; {$ENDIF} {$ELSE} G_IsCloud = False; {$IFDEF _mCompile} {$IFDEF _mGuangDong} G_AppHandleName = 'Measure_GuangDong_Compile'; {$ELSE} G_AppHandleName = 'Measure_Compile'; {$ENDIF} {$ELSE} {$IFDEF _mGuangDong} G_AppHandleName = 'Measure_GuangDong'; {$ELSE} G_AppHandleName = 'Measure'; {$ENDIF} {$ENDIF} {$ENDIF} {$IFDEF _Test} G_IsTest = True; {$ELSE} G_IsTest = False; {$ENDIF} {$O+} {WebFolderLevel (WFL)网络文件夹层次。 本地结点是一张表存放的树结构。但服务器上,三层结点分成三张表存放,传到本地合并 后ID会重复。所以加多一个字段进行区分。项目名称层设标志值8,标段类型层设标志值9, 标段本身设标志值10,为什么取这么怪?怕以后前后加层,目前固定为3层。 } G_WFL_ProjName = 8; G_WFL_BidType = 9; var G_CompanyName, G_MeasureURL, G_Server, G_ServerType, G_GuideURL: string; implementation end.