Преглед на файлове

Epure Online, adjust hint

MaiXinRong преди 8 години
родител
ревизия
ada0a3ae06
променени са 1 файла, в които са добавени 2 реда и са изтрити 0 реда
  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;