在Delphi中调试OutputDebugString调用

我在我的应用程序中有一些“流氓”OutputDebugString调用打印出“T”,但我无法找到它.

是否有可能以某种方式在OutputDebugString -function上设置断点并查看它的调用位置？

我正在使用Delphi 2009.

解决方法

您的项目中有多少次调用OutputDebugString？您可以使用“在文件中查找”对话框查找所有内容,如果它们不是太多,则应该没有问题.

否则,您可以 – 当然 – 使用搜索并替换并替换所有OutputDebugString(使用raise Exception.Create(.

你也可以写一个函数

procedure OutputDebugString(const Str: string);
begin
  raise Exception.Create(Str);
end;

在项目中每个其他单位使用的单位中.如果在使用列表中仅在Windows.pas之后声明了这个新单元,则将使用此新函数而不是Windows.pas.

更新

是的,您可以在Windows.pas中放置断点.首先,在项目中,转到“项目选项”,然后在“调试”下,选择“使用调试DCU”.然后你可以转到Windows.pas并在第30769行放置一个断点：

procedure OutputDebugString; external kernel32 name 'OutputDebugStringW';