IUserProfile.PrivateFolder

Fore Syntax

PrivateFolder: IMetabaseObjectDescriptor;

Fore.NET Syntax

PrivateFolder: Prognoz.Platform.Interop.Metabase.IMetabaseObjectDescriptor;

Description

The PrivateFolder property determines a private folder .

Fore Example

Executing the example requires a form with a button. Add a link to the Metabase system assembly. The example is an event handler for a button.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    Mb: IMetabase;
    User: IMetabaseUser;
    Prof: IUserProfile;
Begin
    Mb := MetabaseClass.Active;
    User := Mb.LogonSession.User;
    Prof := User.Profile.Edit;
    Button1.Text := Prof.PrivateFolder.Id;
End Sub Button1OnClick;

After executing the example, clicking the button passes identifier of the current user private folder to button text.

Fore.NET Example

The Fore.NET Example matches with that of the Fore Example.

Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
    Mb: IMetabase;
    User: IMetabaseUser;
    Prof: IUserProfile;
Begin
    Mb := Self.Metabase;
    User := Mb.LogonSession.User;
    Prof := User.Profile.Edit;
    Button1.Text := Prof.PrivateFolder.Id;
End Sub;