Ver código fonte

"Sign Online" Right-click Menu

MaiXinRong 8 anos atrás
pai
commit
4eb2f5ba46
1 arquivos alterados com 1 adições e 1 exclusões
  1. 1 1
      Frames/ProjectManagerFme.pas

+ 1 - 1
Frames/ProjectManagerFme.pas

@@ -1883,7 +1883,7 @@ procedure TProjectManagerFrame.actnSignOnlineUpdate(Sender: TObject);
   end;
 
 begin
-  TAction(Sender).Visible := G_IsCloud;
+  TAction(Sender).Visible := _IsCloud;
   TAction(Sender).Enabled := Assigned(stdProjects.IDTree.Selected) and
       (stdProjects.IDTree.Selected.Rec.ValueByName('Type').AsInteger = 1) and
       HasCompletePhase(stdProjects.IDTree.Selected.Rec);