class of 语句

那是一个类引用。TClass = class of TObject就表示TClass是TObject或它子类的一个
变量。他表示的是类，而不是类的实例。
比如说
T1 = class of T0;
T2 = class(T0);
...
...
...
procedure *********
var
a: T2;
b: T1;
begin
b := T2; //b表示T1这个类或它的子类，而不是T1或T1子类的实例
a := b.create; 
end;