Здравствуйте, luingv, Вы писали:

[]

Попробуйте вместо CoInitialize использовать

CoInitializeEx(nil,COINIT_MULTITHREADED);