Просмотр исходного кода

刷新我参与的全部项目出错。

Chenshilong 10 лет назад
Родитель
Сommit
897bcd1bb9
3 измененных файлов с 4 добавлено и 4 удалено
  1. 2 2
      Dprs/CSL/Measure_Cloud.dof
  2. BIN
      Dprs/CSL/Measure_Cloud.res
  3. 2 2
      Frames/ProjectManagerFme.pas

+ 2 - 2
Dprs/CSL/Measure_Cloud.dof

@@ -115,7 +115,7 @@ AutoIncBuild=1
 MajorVer=3
 MinorVer=1
 Release=3
-Build=1118
+Build=1119
 Debug=0
 PreRelease=0
 Special=0
@@ -126,7 +126,7 @@ CodePage=936
 [Version Info Keys]
 CompanyName=珠海纵横创新软件有限公司
 FileDescription=纵横结算决算计量一体化云版
-FileVersion=3.1.3.1118
+FileVersion=3.1.3.1119
 InternalName=
 LegalCopyright=
 LegalTrademarks=

BIN
Dprs/CSL/Measure_Cloud.res


+ 2 - 2
Frames/ProjectManagerFme.pas

@@ -1485,7 +1485,7 @@ begin
     (CurRec.ValueByName('WebID').AsInteger = AWebID) and
     (CurRec.ValueByName('Type').AsInteger = 1) then
   begin
-    GetLocalValues(vRec);
+    GetLocalValues(CurRec);
     Exit;
   end;
 
@@ -1526,7 +1526,7 @@ begin
     (CurRec.ValueByName('WebID').AsInteger = AWebID) and
     (CurRec.ValueByName('Type').AsInteger = 1) then
   begin
-    Result := vRec.ValueByName('WebMD5').AsString;
+    Result := CurRec.ValueByName('WebMD5').AsString;
     Exit;
   end;