|
@@ -172,7 +172,8 @@ type
|
|
|
function CurRec: TsdDataRecord;
|
|
|
function CurRecAttachmentPath: string;
|
|
|
function AttachmentFileCountsWithoutManageFile(ANode: TsdIDTreeNode): Integer;
|
|
|
- function UserIsChecker(UserID: Integer): Boolean; // 判断该用户是否是参与人
|
|
|
+ function UserIsChecker(UserID: Integer): Boolean; // 判断指定ID的用户是否是参与人
|
|
|
+ function CurUserIsGuest: Boolean;
|
|
|
property ProjectCheckStatus: TCheckStatus read FWebCheckStatusProject;
|
|
|
end;
|
|
|
|
|
@@ -1934,4 +1935,9 @@ begin
|
|
|
end;
|
|
|
end;
|
|
|
|
|
|
+function TProjectManagerFrame.CurUserIsGuest: Boolean;
|
|
|
+begin
|
|
|
+ Result := not UserIsChecker(PHPWeb.UserID);
|
|
|
+end;
|
|
|
+
|
|
|
end.
|