如何模拟代码中的Delphi断点？

Question

我很确定我以前见过这个，但我还没有发现/记住如何去做。我想要一行代码，当它从Delphi调试器执行时，我想让调试器弹出来，就像那条线上有一个断点。

喜欢的东西：

FooBar := Foo(Bar); 
SimulateBreakPoint; // Cause break point to occur in Delphi IDE if attached 
WriteLn('Value: ' + FooBar); 

希望这是有道理的。我知道我可以使用一个异常，但如果我想要的话，那将会花费更多的开销。这是一些演示代码。

在此先感谢！

Answer 1

触发从代码调试器（据说，我没有得心应手德尔福的副本尝试）：

asm int 3 end; 

看到这个页面：

http://17slon.com/blogs/gabr/2008/03/debugging-with-lazy-breakpoints.html

Answer 2

由于安德烈亚斯Hausladen在对artice的评论中指出，Win32 API DebugBreak（）函数不如DOS-ish，并且工作得很好。