Функция AnyToObject ( Any: TAny; IID: TGUID): IObject;
-- Данная процедура поддерживается только в Delphi 5 и выше --
Модуль: Orbpas
typeTAny = Variant;
Описание
Преобразовывает значение TAny, содержащее объектную ссылку CORBA, в интерфейс объекта.
Функция возвращает интерфейс, который используется для обращения к методам объекта, ссылка на который определена в параметре Any.
Если значение параметра Any не является ссылкой на объект CORBA, то функция вызывает исключение.
Если Any ссылается на удаленный объект, то значение параметра IID должно представлять собой глобальный уникальный идентификатор класса интерфейса сервера и данный GUID должен быть зарегистрирован с помощью CORBA Stub Manager. Вызов функции в таком случае аналогичен вызову метода CreateStub объекта TCorbaStubManager. В качестве результата функция возвращает интерфейс к stub-объекту.
Если в параметре Any определена ссылка на локальный объект, то результат функции будет аналогичен вызову метода GetImplementation объекта TCorbaSkeleton.