关于 class 中的 class function

Question

类似C++中的静态函数，不用生明实例可以直接调用
如TForm.Create 的Create就是
如果不加Class 生明则要生明实例长能调用了
如：
var
form1 : TForm1;
begin
  form1 := TForm1.create;
  Form1.Show; // Show 要在实例中调用 
end;

Answer 1

Class Function 是可以从基类种直接调用的函数。例如：
TForm1 = Class( TForm )
...
class function classname: shortname;
...
End;应用时可以按照以下的方法直接调用，不管TForm1是否已经创建！TForm1.ClassName;

Answer 2

加叫 类型的方法
不加叫 对象的方法
类的方法 可以不创建类来调用
对象的方法 要创建类的实例来调用
//  Caption := TForm1.ClassName; //可以
//  TForm1.Close; //不可以

Answer 3

表明是一个类方法而不是一个Object方法。例如：
type
  TFigure = class
  public
    class function Supports(Operation: string): Boolean; virtual;
    class procedure GetInfo(var Info: TFigureInfo); virtual;
    ...
  end;class procedure TFigure.GetInfo(var Info: TFigureInfo);
0A
begin
  ...
end;—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样，改为“=”或者去掉';
I.Desire := '加不加分随你';
—————————————————————————————————