Przeglądaj źródła

Task #1892 修改提示语句

MaiXinRong 7 lat temu
rodzic
commit
ba3e195187
1 zmienionych plików z 4 dodań i 1 usunięć
  1. 4 1
      Frames/ProjectFme.pas

+ 4 - 1
Frames/ProjectFme.pas

@@ -1515,7 +1515,10 @@ end;
 
 function TProjectFrame.CheckCanReport: Boolean;
 begin
-  Result := QuestMessageYesNo('请确定已生成中间计量数据?');
+  if not _IsCloud or ProjectData.CurUserIsAuthor then
+    Result := QuestMessageYesNo('请检查中间计量数据是否生成。')
+  else
+    Result := QuestMessageYesNo('如修改过本期计量数据,请先点击【否】完善【中间计量】窗口数据。');
   // 使用控件点击进行定位,重新定义方法太复杂
   if not Result then
   begin