Browse Source

Epure Online, adjust hint

MaiXinRong 8 years ago
parent
commit
ada0a3ae06
1 changed files with 2 additions and 0 deletions
  1. 2 0
      Forms/SelectOnlineSignPhaseFrm.pas

+ 2 - 0
Forms/SelectOnlineSignPhaseFrm.pas

@@ -37,6 +37,7 @@ begin
   vSelectFrm := TSelectOnlineSignPhaseForm.Create(nil);
   try
     vSelectFrm.Init(AProjectRec);
+    vSelectFrm.lblHint.Caption := '只能对已审批完成的标段进行签署报表生成';
     Result := vSelectFrm.ShowModal = mrOk;
     if Result then
       APhase := vSelectFrm.PhaseIndex;
@@ -53,6 +54,7 @@ begin
   vSelectFrm := TSelectOnlineSignPhaseForm.Create(nil);
   try
     vSelectFrm.Init(AProjectRec);
+    vSelectFrm.lblHint.Caption := '只能对已审批完成的标段进行报表生成';
     Result := vSelectFrm.ShowModal = mrOk;
     if Result then
       APhase := vSelectFrm.PhaseIndex;