delphi - 如何检查 OleInitialize 是否已被调用？

Question

我想写一个Delphi函数来注册一个dll。我希望该函数在执行此操作之前检查是否已调用 OleInitialize。我想我正在努力避免初始化两次的后果，因为我不确定它们可能是什么。我担心我的函数无法像 regsvr32.exe 那样处理广泛的 dll。

Answer 1

看看documentation :

Return Value
[...]
S_FALSE - The COM library is already initialized on this apartment.

...还有:

Typically, the COM library is initialized on an apartment only once. Subsequent calls will succeed, as long as they do not attempt to change the concurrency model of the apartment, but will return S_FALSE.