16,747
社区成员
发帖
与我相关
我的任务
分享类中怎么加入常量成员啊！！
如：TMyClass＝class
const
a＝1；
procedure create（）；
end；
怎么不行呢？哪位大哥帮忙看看！
const
a＝1；
procedure create（）；
end；
怎么不行呢？哪位大哥帮忙看看！
...全文
请发表友善的回复…
发表回复
子秦1117 2005-01-05
- 打赏
- 举报
类的成员除了控件以外，最好都写在private public protected中
geddy 2005-01-03
- 打赏
- 举报
Thanks!!!
wshd_1860 2004-12-31
- 打赏
- 举报
因该都检验过，毕竟实现是检验算法的标准。
geddy 2004-12-30
- 打赏
- 举报
感谢各位的支持，但是贴出来的代码最好经过检验，谢谢各位！
ljhxuer 2004-12-30
- 打赏
- 举报
在类的
public
{ Public declarations }
const a=1;
应该可以了
public
{ Public declarations }
const a=1;
应该可以了
chinaandys 2004-12-30
- 打赏
- 举报
use sysutils;
const a=1;
Type
TMyClass＝class
procedure create（）；
end；
const a=1;
Type
TMyClass＝class
procedure create（）；
end；
wshd_1860 2004-12-30
- 打赏
- 举报
改为以下就可以了：
Type
TMyClass＝class
procedure create（）；
end；
const a＝1；
Type
TMyClass＝class
procedure create（）；
end；
const a＝1；
tank8922 2004-12-29
- 打赏
- 举报
就算是常量也要有数据类型啊!应改为:
const int a＝1；
const int a＝1；
geddy 2004-12-28
- 打赏
- 举报
谢过了！
yeliming 2004-12-28
- 打赏
- 举报
嗯，做个只读属性吧，delphi的类里面没有Java或者C++中那种static变量。
FlyBird2004 2004-12-28
- 打赏
- 举报
published
property a integer default 1;
property a integer default 1;
solokey 2004-12-27
- 打赏
- 举报
写个只读的属性也可以。。。。
geddy 2004-12-27
- 打赏
- 举报
那不能在创建类的实例的时候调用啊，我需要在别的unit中调用啊！
solokey 2004-12-27
- 打赏
- 举报
加在类所在的unit中就是了。
