名称将其连结进来, 例如:
{$R MyCursor.res}
{$T-} @指针型态检查
应用@操作数可以取得变量的地址, 在{$T-}时, 以@取得是一个无型别的指针(Pointer)。
反过来说, 在{$T+}时, 是有型别的指针, 假定I是一个integer的变量, @I所得到的即是
相当于^Integer(Pointer of Integer)的指针。
{$WARNINGS ON} 编译器警告
这个Compiler directive与{$HINTS}的作用类似, 同样会对程序的可能问题提出警告。
不同的是, 在{$WARNINGS ON}时, Compiler会对未初始化的变量、没有传回值的函数、
建构抽象对象等情况提出警告。
{$J-} 型态常数只读
从前笔者曾经对以下的程序产生过疑惑:
{$J+}
procedure TForm1.Button1Click(Sender: TObject);
const
VarConst: integer = 4;
begin
VarConst := 5;
ShowMessage(IntToStr(VarConst));
end;
const不是常数吗? 为什么可以改呢? 在先前的Pascal版本中, 以
const VarName: DataType = const value;
定义的具型态常数的确是可以改的, 假如您希望常数就是常数, 它不应该允许修改,
请将这个Compiler directive设为{$J-}
不论是{$J+}或{$J-}, 以const VarName = const value; 定义的常数(
没有加上型别宣告), 是一个真正的常数, 其它的程序不可以改变其内容。
其实{$J+}时还有一个妙用, 那就是宣告出类似C语言static的变量, 换句话说,
产生了一个与Application相同生命周期的变量。在这种情形下, 变量只在第一
次使用时才会建立, 函数或程序结束时, 该变量也不会消灭, 下一次再呼叫到这个函数
或程序时, 我们仍然可以参考到上次执行结束时的值。让我们试一下这个例子:
{$J+}
procedure TForm1.Button1Click(Sender: TObject);
const
i: integer = 0;
begin
ShowMessage(IntToStr(i));
Inc(i);
ShowMessage(IntToStr(i));
end;
第一次执行时, 我们分别会看到「0」「1」, 再点一次这个按钮时, 看到的将是「1」「2」。

本文来自CSDN博客，转载请标明出处：http://blog.csdn.net/simonhehe/archive/2008/02/26/2122927.aspx