|
|
@@ -3472,15 +3472,17 @@ begin
|
|
|
FGCXX.AttributeAddUTF8('建设地址', BV(SProjectLocation));
|
|
|
FGCXX.AttributeAddUTF8('项目概况', BV(SProjectSummary));
|
|
|
|
|
|
- if (self.Area = areaZheJiang) then
|
|
|
- sTemp := '项目类型'
|
|
|
- else
|
|
|
- sTemp := '建设性质';
|
|
|
+// if (self.Area = areaZheJiang) then
|
|
|
+// sTemp := '项目类型'
|
|
|
+// else
|
|
|
+// sTemp := '建设性质';
|
|
|
+//
|
|
|
+// if PV('Newly') = '新建' then
|
|
|
+// FGCXX.AttributeAddUTF8(sTemp, '1')
|
|
|
+// else
|
|
|
+// FGCXX.AttributeAddUTF8(sTemp, '2');
|
|
|
|
|
|
- if PV('Newly') = '新建' then
|
|
|
- FGCXX.AttributeAddUTF8(sTemp, '1')
|
|
|
- else
|
|
|
- FGCXX.AttributeAddUTF8(sTemp, '2');
|
|
|
+ FGCXX.AttributeAddUTF8('项目类型', '1'); // 1 施工,2 养护。 我们是施工,不是养护,单机版这个软件做不了养护的。
|
|
|
|
|
|
s := BV(SRoadLevel);
|
|
|
if s = '一级公路' then
|