查找审核人出错。

Dprs/CSL/Measure_Cloud.dof

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

Forms/FindUserFrm.pas

@@ -77,7 +77,7 @@ begin
       1:
       begin
         lblHint.Caption := '';
-        lblUserName.Caption := TOrderCheckerFrame(Owner).IsMe(StrToInt(UserArr[4]), UserArr[1]) ;
+        lblUserName.Caption := TOrderCheckerFrame(FOwner).IsMe(StrToInt(UserArr[4]), UserArr[1]) ;
         lblUserRole.Caption := UserArr[2];
         lblUserCompany.Caption := UserArr[3];
         PicPath := PHPWeb.UserPath + '1_' + UserArr[4] + '.jpg';
@@ -89,9 +89,9 @@ begin
         case FType of
           0:
           begin
-            bChecker := TCheckerFrame(TOrderCheckerFrame(Owner).Owner).InCheckerList(StrToInt(UserArr[4]));
+            bChecker := TCheckerFrame(TOrderCheckerFrame(FOwner).Owner).InCheckerList(StrToInt(UserArr[4]));
             // AddFrame包含在List.Count中，等效于原报不在List.Count中
-            bFull := (TCheckerFrame(TOrderCheckerFrame(Owner).Owner).List.Count >= 15);
+            bFull := (TCheckerFrame(TOrderCheckerFrame(FOwner).Owner).List.Count >= 15);
             btnAdd.Enabled := (not bChecker) and (not bSelf) and (not bFull);
 
             if bFull then