Как сделать основной поток консольного приложения MTA?

Question

Как сделать основной поток консольного приложения MTA?

С помощью Delphi, как я могу создать консольное приложение (Windows) с основным потоком, который инициализируется как COINIT_MULTITHREADED?

Если я позвоню CoInitializeEx(nil, COINIT_MULTITHREADED) в самом первом операторе я получаю HRESULT 0x80010106 (невозможно изменить режим потока после того, как он установлен), поэтому, очевидно, некоторый ранее запущенный код уже вызывался CoInitialize/Ex,

Как я могу получить основной поток, чтобы быть COINIT_MULTITHREADED?

2

delphi com apartments apartment-state

Источник

user1826253 02 авг '19 в 14:03

1 ответ

Решение

Другие вопросы по тегам delphi com apartments apartment-state

user505088 02 авг '19 в 14:19 2019-08-02 14:19 · Accepted Answer · 2019-08-02 14:19

Один из модулей, включенных в вашу программу в результате использования вашего предложения, уже инициализировал COM в своем разделе инициализации модуля.

Вам нужно идентифицировать этот блок и удалить его из вашей программы.

Рассмотрим эту программу:

{$APPTYPE CONSOLE}

uses
  ActiveX,
  ComObj;

begin
  Writeln(CoInitializeEx(nil, COINIT_MULTITHREADED));
end.

Выход 0 который демонстрирует, что пустое консольное приложение не инициализирует COM.