类中怎么加入常量成员啊！！

Question

如：TMyClass＝class
        const
           a＝1；
        procedure create（）；
      end；
怎么不行呢？哪位大哥帮忙看看！

Answer 1

那不能在创建类的实例的时候调用啊，我需要在别的unit中调用啊！

Answer 2

published
  property a integer default 1;

Answer 3

嗯，做个只读属性吧，delphi的类里面没有Java或者C++中那种static变量。

Answer 4

就算是常量也要有数据类型啊!应改为:
const int a＝1；

Answer 5

改为以下就可以了：Type
TMyClass＝class  
  procedure create（）；
end；
const  a＝1；

Answer 6

use sysutils;
const a=1;
Type
TMyClass＝class  
  procedure create（）；
end；

Answer 7

在类的
 public
    { Public declarations }
   const a=1;
应该可以了

Answer 8

类的成员除了控件以外，最好都写在private public protected中