有一个类TPerson.众所周知,FSecondName对每个对象都是唯一的.
- type
- TPerson = class(TObject)
- private
- FAge: Integer;
- FFirstName: String;
- FSecondName: String;
- public
- property Age: Integer read FAge;
- property FirstName: String read FFirstName;
- property SecondName: String read FSecondName;
- constructor Create;
- end;
如何添加类字段(如C#中的静态字段)Persons：TDictionary(String,TPerson),其中键是SecondName,值是类TPerson的对象.
谢谢！
解决方法
您可以声明一个类变量：
- type
- TMyClass = class
- private
- class var
- FMyClassVar: Integer;
- end;
显然,你可以使用你喜欢的任何类型的类变量.
类变量具有全局存储.所以变量有一个实例. Delphi类变量与C#静态字段直接相似.