ActiveX开发——by cj(50分)

  • 主题发起人 主题发起人 CJ
  • 开始时间 开始时间
我的笨办法不行吗?
 
Seasky:What about design time? what if user change it to be true?
 
EXEX中加到300也没人答!
诸位!拜托!
 
不明白. dialog在设计时干吗还要让用户看到?
 
老大呀,一个图标总不过分吧?不然,如果用户要选属性,不见得只用属性编辑器
吧?显示个PANEL总不舒服吧?还有,如果用户修改VISIBLE怎么办?
 
我口头答应了EYES,解决问题,我出一千,价钱还可以商量!
其他同志也一样
 
>>>如果用户修改VISIBLE怎么办
这个容易. 定义一个只读property visible替换掉原始的property visible就可以了.
 
今天下午, 用Delphi 3调试一个程序, 用到OCX的Ftp控件, 我意外发现一些
东西, 正好是你需要的:

你可以发现各个“不可视”的ActiveX Control都有Visible属性, 有些在
运行期赋值后可以显示出来(如Delphi 中的VSpell), 有些不行(如 Wang的 ImgScan), 这些控件在设计时的样子都是自己画的(各个“不可视”OCX画的图
标大大小小都不一样的), 不是默认图标,
并且它们具有可视控件的属性,可以放在容器(如Panel)中.

你可以用WinControl为基类建立一个类, Visible这时并不是Published,
所以在属性编辑器中不会出现, 在设计时要显示图标, 你要自己写Update过程。

禁止Visible赋值后起作用, 重载VisibleChanged 过程。

禁止尺寸变更的话, 重载????? Procedure, 查一下VCL的Source吧。 :))

 
啊?还是只能自己画呀:-(
VCL的SOURCE里好象没有ACTIVEX的例子呀?能给一个例子吗?1000呀!
 
什么“???”?CJ比较笨只有DEMO,我出1000!
 
注意你的信箱。 刚寄出。

我的Demo Control只要200分呀, 因为没有空呀。:((
 
?
为什么只要200?
 
因为我偷懒呀!!:))
如果要做的小, 最好用Delphi 3生成OCX.
 
怎么偷的?我把这50给eYes,再开个300的给你吧。
 
你已经收到了?
偷懒如下:

1. 控件照样能用Visible (只是没有Published);
2. 在OCX方式的Design时, 照样Resize
3. 用CustomControl, 没有用TWinControl, 因为GetDC来,GetDC去的
太麻烦。
4. 随手画了一个CJ图标, 本来还有一个方框 :)). 那就真成AX了,:))
 
okok,现在用FREE ACCOUNT,没发收,靠您SEASKY的信誉,我先付分:-)
 
后退
顶部