在Delphi中，OutputDebugString线程安全吗？

Question

吗

OutputDebugString(PAnsiChar(''));

线程安全

？ 我/我们一直在线程中使用它进行调试，并且我从未想过是否应该以不同的方式进行操作。

（德尔福7）

Answer 1

好吧，并不是说这不是真的，而是这样，但只是为了让你不必只相信 Lieven 的话：

数据之间的传递
应用程序和调试器已完成
通过 4kbyte 的共享内存块，
带有一个互斥体和两个事件对象
保护对其的访问。 这些是
涉及四个内核对象。

了解 Win32 OutputDebugString 是一篇关于这个问题的优秀文章。

Answer 2

别担心，确实如此。

当应用程序调用 OutputDebugString() 时，它需要这些
脚步。 请注意，任何时候的失败都会放弃整个事情，并且
将调试请求视为无操作（不发送字符串
任何地方）。

1. 打开 DBWinMutex 并等待，直到我们拥有对它的独占访问权限。
2. 将DBWIN_BUFFER段映射到内存中：如果没有找到，
   没有运行调试器，因此整个请求将被忽略。
3. 打开 DBWIN_BUFFER_READY 和 DBWIN_DATA_READY 事件。 与
   共享内存段，缺少对象意味着没有调试器
   可用。
4. 等待 DBWIN_BUFFER_READY 事件发出信号：这表示
   内存缓冲区不再使用。 大多数时候，这
   事件在检查时会立即发出信号，但不会
   等待缓冲区准备就绪的时间超过 10 秒（超时
   放弃请求）。
5. 复制最多约4kbytes的数据到内存缓冲区，并存储
   当前的进程 ID 也在那里。 始终在末尾放置一个 NUL 字节
   字符串的。
6. 通过设置告诉调试器缓冲区已准备好
   DBWIN_DATA_READY 事件。 调试器从那里获取它。
7. 释放互斥体
8. 关闭事件和部分对象，但我们保留句柄
   稍后再使用互斥体。

Answer 3

不过，我曾经在使用 ISAPI DLL 中的字符串时遇到过麻烦。 由于某些奇怪的原因，未设置 System.pas 中定义的 IsMultiThread 布尔值！

一旦线程运行多个线程，它就会导致奇怪的 AccessViolations...一个简单的“IsMultiThread:=true;” 在单元初始化中修复了它。