我在一个pas文件中定义一个{$define PROGRAM_DEBUG_}来表示一个调试标志宏。
在另一个pas文件中就不起作用了，非要我也定义一个相同的{$define PROGRAM_DEBUG_}
难道在一个工程中有n个pas文件，就要我定义n个{$define PROGRAM_DEBUG_}，太没道理了
在C/C++没有这回事。
各位，我怎样只设置一个{$define PROGRAM_DEBUG_}，就能在整个工程中去作用。
来自：Kingron, 时间：2001-9-9 12:57:00, ID：617411
哎呀，我来告诉你把：
关闭所有的工程，然后选择Project Options，在那个Condition???页面中，有一个
条件一项，点击...按钮，添加{$define PROGRAM_DEBUG_}就可以了，以后你就可以使用：
{ifdef PROGRAM_DEBUG_}
.....
来自：Kingron, 时间：2001-9-9 12:59:00, ID：617412
上面的不仅仅是对本程序起作用，对所有的新建的都会有作用的，如果要对本程序起作用，
只要修改本程序的Project Options即可。
关于Delphi中的条件编译
Delphi支持类似于C++中条件编译的概念。其方法也很简单。不过，因为使用频率相对较少的缘故，有些人对它还是不太熟悉，而且Delphi和C++在条件编译的语法上也有一点小的差别，所以有必要简单提一下。
最简单的形式类似这样：
{$IFDEF DEBUG}
ShowMessage('Display a Debug Message!');
{$ENDIF}
在Delphi 6中，支持IFDEF的一个增强的形式：IF。IF不仅可以测试符号定义，而且允许测试常量（包括常量表达式，如SizeOf，Pred，Succ等），而且能够测试组合条件。下面是一个例子：
const
DebugControl = 3;
{IF Defined(DEBUG) and (DebugControl>=3)}
ShowMessage( 'High Debug Level!');
{$IFEND}
熟悉C++的朋友应该注意，测试结束部分有两种形式，分别是ENDIF和IFEND，它们分别用于对应IFDEF(也包括IFNDEF)和IF，不可以混用，否则将得到一个出错信息，这是Object Pascal和C++的一个不同点。
更复杂一些的形式如下：
{$IFDEF ...}
...
{$ELSEIF ...}
...
{$ELSE}
...
{$IFEND}
条件编译在Delphi 6中变得相对比较重要，因为Delphi 6分别支持VCL和CLX这两个不同的库。因而在VCL中和其他一些地方，你能够看到类似这样的语句：
{$IF Defined(CLX)}
...
{$IFEND}
Delphi中预定义了一些条件编译符号。下面列出其中比较重要的一些：
1.VER140
这个定义暗示Delphi 6.0在Borland Pascal产品家族中的真正版本号是14.0。在Delphi 5中则定义了VER130。应用如下：
{$IFDEF VER140}
ShowMessage('Is Delphi 6!')
{$ENDIF}
{$IFDEF VER130}
ShowMessage('Is Delphi 5!')
{$ENDIF}
2．MSWINDOWS / LINUX / WIN32
前面两个定义显然是为跨平台编程而准备的。至于WIN32，你也可以把它当作MSWINDOWS来用；不过，实际上它是为Delphi 1.0/2.0的兼容性而保留的，除非你有这两个版本的应用程序需要维护，否则一般不应该再使用它。当然了，在将来的64位平台上，还会出现WIN64的定义；如果你是个很前卫的程序员，你甚至可以现在就编写这样的代码：
{$IFDEF WIN64}
...
{$ENDIF}
这样做也并不是毫无意义的，因为Delphi目前对Int64类型已经提供了不错的支持。
3．CONSOLE
指示这是一个控制台(Console)应用程序。
4．BCB
如果需要在C++Builder中编译.Pas文件，某些情况下可能需要它。
5．ConditionalExpressions
在Delphi 5和以前版本中不支持$IF。不过，用下面这种方式，不论在Delphi 5还是Delphi 6中都可以毫无问题地通过编译：
{$IFDEF ConditionalExpressions}
{$IF Defined(Debug)}
ShowMessage('Debug!');
{$IFEND}
{$ENDIF}
《Mastering Delphi 6》的作者给了我们两条忠告：
1．条件编译很有用，只要使用得当，它能够为程序提供相当的灵活性。但是，应该只在确实需要用它们的时候才用；否则，很容易让代码变得难于阅读，并且可能给调试器造成麻烦。
2．当你改变了某些定义，编译器并不一定总是能够正确的区分哪些代码需要重新编译。如果你改变了这些定义后，程序的运行情况变得有点奇怪，那么请选择Build All。
Delphi 6中引入了一个新的指示字（directive）：platform。因为Delphi 6支持跨平台编程，但是，当你需要编写一些特定于平台的代码的时候，最好用platform来声明。
下面是例子：
var
WinInteger : integer=3000 platform;
procedure Test;platform;
begin
Beep;
end;
type
WinClass=class
x : integer;
end platform;
其中class声明中platform出现的位置似乎有点奇怪，没关系，知道就行了，反正我们一般不太会用得到它（但是真有需要的时候，你也得有所了解才行）。如果你一定要寻根究底的话，《Mastering Delphi 6》的作者对此有一个简要的解释：
The position of semicolons for hint directives can be quite confusing at first. The rule is that a hint directive must appear before the semicolon following the symbol it modifies. But a proce-dure, function, or unit header declaration can be followed only by reserved words, so its hint directive can appear following the semicolon. A type, variable, or constant declaration can be followed by another identifier, so the hint directive must come before the semicolon closing its declaration. Part of the rationale behind this is that the hint directives are not reserved words, so they can be used as the name of an identifier.
关于deprecated指示字
《Mastering Delphi 6》中关于deprecated的这一段说明似乎有点古怪，文字很浅显，可是我看了三遍也没有完全搞清楚到底是在说什么。先记录在这里，以后再看好了。 The deprecated directive works in a similar way to the platform directive;the only real differences are that it is used in a different context and produces a different compiler warning.The role of deprecated is to mark dentifiers that are still part of the system for compatibility reasons,but either are going to be removed in the future or expose you to risks of incompatibility.This symbol is used sparingly in the Delphi library.
Delphi 6中另外一个相当有用的关键字是$MESSAGE。你可以用它来提醒你程序中任何值得注意的地方，比如说下面的例子：
{$MESSAGE '这里尚未完成，记住下次要改完！'}
当然，用To-do List也可以完成类似的工作，而且To-do List在功能上更完善一些；不过，$MESSAGE比 To-do List优越的一个地方是，编译器每次编译程序的时候都会提醒你，所以不容易忘记；相对而言，不是每个程序员都会去经常察看To-do List。
$MESSAGE也类似于Visual C++中的#pragma message。不过，在Delphi 6的Message窗口双击该行信息，就能够跳到源文件中相应定义的地方，而这一点在Visual C++中却办不到。
后记：《Mastering Delphi 6》现在才看到第65页（总共1071页），也就是说，万里长征才走完第一步。这本书读到这个地方还是很好理解的（基本上不用动用金山词霸），但是后面的内容就要艰深一些了。应该老实承认我的英文水平还是很差，读原版书满辛苦的。想起蔡学镛老师说，他开始读外文资料的时候必须正襟危坐，手头必备电子辞典，读的多了，现在已经很随意地能够把外文资料当作小说来看，不论是坐着还是躺着，都不影响阅读。什么时候我才能达到这种境界呢？