CoInitialize

Функция CoInitialize() запускает процедуру инициализации работы с COM-объектами в тексте скрипта. Каждый вызов CoInitialize должен иметь соответствующий вызов CoUninitialize, то есть - необходимо вызвать CoInitialize до первого использования функций COM и CoUninitialize перед завершением работы скрипта.

CoInitialize(pvReserved): Boolean
pvReserved: Variant	Параметр зарезервирован и должен быть равен NULL
Функция возвращает: S_OK - библиотека успешно инициализирована в потоке; S_FALSE - библиотека уже инициализирована в этом потоке.

Пример вызова:

{Pascal Script}
Var
    res : Variant;

Begin
res := CoInitialize(NULL);
try
        // Ваш код работы с СОМ объектами
    finally
       CoUninitialize;
    end;
end.