【求救】在代码中给第三方控件属性赋值的问题?

洛夜 2012-10-24 05:15:20
程序中使用第三方控件(只有部分pas文件,大部分文件都是以dcu形式发布的),把控件拖到界面上使用没问题。
但是现在想在代码中动态创建控件,并给各个属性赋值,其中有个属性是枚举类型,但是由于没有pas文件,所以找不到这个枚举类型的定义,怎么办啊
...全文
103 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
xiaojun5556 2012-10-25
  • 打赏
  • 举报
回复
把控件放到窗体上自己看下不完了么?
广州佬 2012-10-25
  • 打赏
  • 举报
回复
举例 DBGrid1 的 Options 属性,假定我们不知道它的枚举类型的定义,在语句中:
DBGrid1.Options:=[0];
这样写的时候,编译就出错提示为:Incompatible types:'TDBGridOption' and 'Integer'.那么,通过这提示,就可获知它是 TDBGridOption 类型了,赋值时,就可以这样子:
DBGrid1.Options:=DBGrid1.Options+[TDBGridOption(0)];

DBGrid1.Options:=DBGrid1.Options-[TDBGridOption(0)];

当这样子:
DBGrid1.Options:=DBGrid1.Options-[TDBGridOption(13)];
编译时,提示:Constant expression violates subrange bounds. 这说明13已经超出它的范围了,而:
DBGrid1.Options:=DBGrid1.Options-[TDBGridOption(12)];
没这提示,讲明它的最大值就是 12 了。
hsfzxjy 2012-10-25
  • 打赏
  • 举报
回复
如果该属性在属性编辑器中可视,那么查看属性编辑器就可以了。。

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧