Delphi - Cách sử dụng nhiều giá trị được xác định trong quá trình biên dịch có điều kiện

Question

Tôi có thể kết hợp một số IFDEFS trong nguồn của mình không?

Ví dụ:

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

Nhờ sự giúp đỡ của bạn: dd

Answer 1

Sử dụng $IF với Defined() hơn $IFDEF:

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

Answer 2

Tôi không tin rằng $ ifdef hỗ trợ nó , nhưng $ IF có. http://docs.embarcadero.com/products/rad_studio/delphiAndcpp2009/HelpUpdate2/EN/html/devcommon/compdirsifdirective_xml.html

Answer 3

Alternative, cho các phiên bản cũ:

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

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

Answer 4

Dưới đây là một biến thể của câu trả lời của David sử dụng 'không'.

Tôi sử dụng tính năng này khi tôi muốn tắt màn hình giật gân trên ứng dụng của mình trong khi ở chế độ gỡ lỗi. Nó ngăn cản tôi vô tình rời khỏi splash bị vô hiệu hóa nếu tôi quên không xác định NOSPLASH trong bản phát hành.

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