Chenshilong пре 8 година
родитељ
комит
d48c252e6f
1 измењених фајлова са 1 додато и 0 уклоњено
  1. 1 0
      Forms/MainFrm.pas

+ 1 - 0
Forms/MainFrm.pas

@@ -422,6 +422,7 @@ function TMainForm.CreateProjectView(ARec: TsdDataRecord): TProjectFrame;
     ProjectFrame: TProjectFrame;
   begin
     ProjectFrame := TProjectFrame.Create(AProjectData);
+    AProjectData.IsGuest := FProjectManagerFrame.IsGuest;
     FProjectFrames.Add(ProjectFrame);
     ProjectFrame.Parent := APage;
     ProjectFrame.Align := alClient;