Delphi - 如何在条件编译中使用更多定义的值

Question

我可以在我的源代码中合并一些 IFDEFS 吗？

例如：

{$IFDEF INCOMING or OUTGOING}
...
{$ENDIF}

Answer 1

将

$IF

与

Defined()

一起使用，而不是

$IFDEF

:

{$IF Defined(INCOMING) or Defined(OUTGOING)}
...
{$IFEND}

Answer 2

替代方案，对于旧版本：

{$IFDEF INCOMING}
  {$DEFINE INCOMING_OR_OUTGOING}
{$ENDIF}
{$IFDEF OUTGOING}
  {$DEFINE INCOMING_OR_OUTGOING}
{$ENDIF}

{$IFDEF INCOMING_OR_OUTGOING}
...
{$ENDIF}

Answer 3

我不相信 $IFDEF 支持它，但 $IF 支持。 http://docs.embarcadero.com/products/rad_studio/delphiAndcpp2009/HelpUpdate2/EN/html/devcommon/compdirsifdirective_xml.html

Answer 4

这是大卫使用“不”的答案的变体。

当我想在调试模式下禁用应用程序上的启动屏幕时，我会使用此功能。如果我忘记在发布版本中取消定义 NOSPLASH，它可以防止我意外地禁用启动画面。

  {$IF not (Defined(NOSPLASH) AND Defined(DEBUG))}
     //code to create splash 
  {$IFEND}