PrivateFolder: IMetabaseObjectDescriptor;
PrivateFolder: Prognoz.Platform.Interop.Metabase.IMetabaseObjectDescriptor;
Свойство PrivateFolder возвращает личную папку текущего пользователя.
Выполнение примера предполагает наличие формы с кнопкой. Необходимо подключить системную сборку Metabase. Пример является обработчиком события для кнопки.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
MB: IMetabase;
Begin
MB := MetabaseClass.Active;
Debug.Write(MB.PrivateFolder.Id + " " + MB.PrivateFolderRoot.Id);
End Sub Button1OnClick;
При выполнении примера в консоль среды разработки будут выведены идентификатор личной папки текущего пользователя и идентификатор корневой папки для личных папок пользователей.
Использование свойства в Fore.NET аналогично использованию в Fore.
См. также: