如何使用OutputDebugString打印字符串变量中的消息？

Question

我最近不得不对某些Delphi代码进行一些更改。因此，我有一些基本问题：

1. 一般情况下，如何输出到控制台？
2. 如何使用fx作为字符串变量输出到控制台？

我开始使用OutputDebugString，但我无法使用变量。

Answer 1

您可以编写一个包装函数来处理传递给OutputDebugString的变量，因为它需要一个PChar。

类似的东西：

procedure DebugMsg(const Msg: String);
begin
    OutputDebugString(PChar(Msg))
end;

有一个有用的参考调试技术here。

如果你的Delphi有点生疏，那就是有用的Delphi Basics网站。我经常使用它:)）

Answer 2

除了你得到的关于OutputDebugString（）和WriteLn（）的2个答案之外，还有一个更好的解决方案：Raize Software的CodeSite（见http://www.raize.com/DevTools/CodeSite/Default.asp）。

如果您使用的是Delphi XE，那么CodeSite的功能版本应该会有所减少。

Answer 3

如果您有控制台应用程序，只需使用write（）和writeln（）全局函数。如果您有一个GUI应用程序并且想要创建一个单独的控制台窗口，那么事情会变得棘手（this article将引导您完成整个过程，尽管它在C ++中）。