Count: Integer;
Свойство Count возвращает количество глобальных переменных приложения.
Sub Main;
Var
App:IApplication;
Glob:IApplicationGlobals;
i: Integer;
Begin
App := WinApplication.Instance As IApplication;
Glob := App.Globals;
i := Glob.Count;
End Sub Main;
После выполнения примера в переменной "i" будет содержаться количество глобальных переменных приложения.
См. также: