什么会导致编译器不产生控制台输出答案

【问题标题】：What can cause the compiler not to produce a console output什么会导致编译器不产生控制台输出
【发布时间】：2012-04-02 11:27:43
【问题描述】：

我有一个 DUnit 项目，如果我添加一些单元，它不会编译为控制台。
项目 (dpr) 由向导创建并定义 CONSOLE_TESTRUNNER。

{$IFDEF CONSOLE_TESTRUNNER}
{$APPTYPE CONSOLE}
{$ENDIF}

begin
  Application.Initialize;
  if IsConsole then // <-- IsConsole is set to False.
    with TextTestRunner.RunRegisteredTests do
      Free
  else
    GUITestRunner.RunRegisteredTests;
end.

导致失败的单元包括一些 VCL 组件，但没有对其运行任何测试。
我什至尝试设置链接器选项，但没有任何区别。
有人遇到过类似的问题吗？
澄清一下：这个项目是 Delphi 2010 中的 Win32。

【问题讨论】：

标签： delphi delphi-2010 dunit

【解决方案1】：

该代码对我来说很好用。我可以想到 Delphi 不生产控制台应用程序的两个原因：

CONSOLE_TESTRUNNER 未定义。
您的项目代码中有 {$APPTYPE GUI}。

我有理由相信上述第 2 项是您的问题的原因。

【讨论】：

谢谢它是 APPTYPE。啊。