소스 검색

Task #1038 切换中间计量模式,提示写反

MaiXinRong 9 년 전
부모
커밋
10cf4974ae
1개의 변경된 파일2개의 추가작업 그리고 2개의 파일을 삭제
  1. 2 2
      Frames/ZJJLFme.pas

+ 2 - 2
Frames/ZJJLFme.pas

@@ -171,7 +171,7 @@ procedure TZJJLFrame.actnGenerateFxZJJLExecute(Sender: TObject);
 begin
   with TPhaseData(FZJJLData.PhaseData).PhaseProperty do
   begin
-    if (ZJJLType = 0) or QuestMessage('当前为“0号台账”格式,切换至“总量控制”将清空数据并重新生成,确定要切换吗?') then
+    if (ZJJLType = 0) or QuestMessage('当前为“总量控制”格式,切换至“0号台账”将清空数据并重新生成,确定要切换吗?') then
     begin
       ZJJLType := 0;
       GenerateZJJL;
@@ -199,7 +199,7 @@ procedure TZJJLFrame.actnGenerateGclZJJLExecute(Sender: TObject);
 begin
   with TPhaseData(FZJJLData.PhaseData).PhaseProperty do
   begin
-    if (ZJJLType = 1) or (QuestMessage('当前为“总量控制”格式,切换至“0号台账”将清空数据并重新生成,确定要切换吗?')) then
+    if (ZJJLType = 1) or (QuestMessage('当前为“0号台账”格式,切换至“总量控制”将清空数据并重新生成,确定要切换吗?')) then
     begin
       ZJJLType := 1;
       GenerateZJJL;