如何给ActiveForm增加自定义事件？？？(200分)

同

同道中人

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-08-23

• #1

如果是ActiveX控件，用Delphi自带的TLB编辑工具，可以很容易的增加自定义事件，如OnTest。
但ActiveForm就不行，添加属性和方法都可以，添加事件就没有任何反应，我用TLB删掉一个它原来的OnClick事件，它还是没有任何反应。

非常的郁闷，大家帮忙啊！

 

唐

唐佐平

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-08-23

• #2

我也想知道，帮你顶

 

M

Mike1234567890

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-08-23

• #3

你在创建的时候选中 自动化接口 了吗
还有添加的位置对不对啊
它和方法、属性不是在一个接口中的

 

同

同道中人

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-08-23

• #4

To Mike1234567890：
事件在TLB的第二个接口(IXXXEvent)中创建的呀，我在实现时，编译能通过，但测试时在Object Inspertor中没有我添加的事件。
你能发给我一个ActiveForm带自定义事件(OnTest)的例子吗？我的信箱：beiqc@163.com，多谢！！！

 

M

Mike1234567890

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-08-23

• #5

你加我吧
给你个例子
158783169

 

同

同道中人

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-08-23

• #6

多谢Mike1234567890的例子，让我进行了彻底的反思，为什么代码都是一样的，他的能行，而我的不行。
经过反复测试终于发现了问题的根源，我每次改动ActiveForm后，直接覆盖掉原来的OCX，而Delphi控件栏中的OCX保持原样，没有卸载掉重新安装，因为我从OCX的界面发现确实已经更新了，但是OCX的事件却没有更新，真是晕！

散分给Mike1234567890，再次表示感谢！

 

同

同道中人

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-08-23

• #7

Thanks!