IUserProfile.PrivateFolder

Syntax

PrivateFolder: IMetabaseObjectDescriptor;

Description

The PrivateFolder property determines a private folder .

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.