Delphi {$IFDEF CONSOLE}问题

发布时间：2020-12-15 04:29:06 所属栏目：大数据来源：网络整理

导读：我刚刚试过 program Project1;{$APPTYPE CONSOLE}uses SysUtils;begin {$IFDEF CONSOLE} beep; {$ENDIF}end. 并期望在运行时听到哔声,但不会听到.以下测试工作虽然如此： if IsConsole then beep; 为什么编译时测试不工作？据我所知,从this doc年起,肯定会奏

我刚刚试过

program Project1;

{$APPTYPE CONSOLE}

uses
  SysUtils;

begin
  {$IFDEF CONSOLE}
    beep;
  {$ENDIF}
end.

并期望在运行时听到哔声,但不会听到.以下测试工作虽然如此：

if IsConsole then
    beep;

为什么编译时测试不工作？据我所知,从this doc年起,肯定会奏效.

解决方法

如果从链接器选??项中选择“生成控制台应用程序”,则定义“控制台”.

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!