在MS AGENT的popup menu中,我如何让它执行相应的操作(50分)

高

高江峰

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-12

• #1

我自己建立了一个弹出菜单,但是我不知道怎样让它执行相应的操作,查了MSDN后,提示说在agent的command的事件中,有一个idispatch类型的变量,不知道该如何使用
,请指教,另外一个窗体,我在onclose时间中加入了action;=cahide没有任何效果,为什么

 

D

dingbaosheng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-12

• #2

>>执行相应的操作

右键点击，会触发oncommand事件，
这个事件会给你一个idispatch对象
你把它转为 idispatch as iAgentCtlUserInput接口
在调用iAgentCtlUserInput.name即可获得点击菜单的标题！
然后你就handle事件啦！

 

高

高江峰

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-12

• #3

可以来一个例子吗,谢谢了

 

J

jhliang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-20

• #4

关注

 

B

BlackDragon

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-01

• #5

关注.

 

道

道长

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-12

• #6

如果你是想关闭mdi子窗体可以在onclose中加入action:=cafree;
至于你的agent,我很想知道你是怎么给它加popupmenu的,好像agent控件没有popopmenu属性呀

 

W

wqthai

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-16

• #7

在Agent的click事件里定义自己的弹出菜单
procedure TSBMainForm.SBAgentClick(Sender: TObject;
const CharacterID: WideString
Button, Shift, x, y: Smallint);
begin
if Button=2 then
PopupMenu2.Popup(x,y);
end;

 

D

denny521

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-19

• #8

关注！

 

Z

zyf23

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-01-15

• #9

ting