CoUninitialize

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

CoUninitialize

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

{Pascal Script}
Var
    res : Variant;

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