如何在ShockwaveFlash1控件中单击右键弹出自定义菜单(100分)

我用flash控件ShockwaveFlash1做了一个FLASH动画播放器，在全屏播放时，想单击右键弹出自定义菜单
，但总不成功，弹出的总是控件ShockwaveFlash的ABOUT信息,请问各位高手，应如何去做，请
给代码,分数大大的有

加入一个 ApplicationEvents1 构件，然后在他的事件。
procedure Tfrmsplash.ApplicationEvents1Message(var Msg: tagMSG;
var Handled: Boolean);
begin
if (Msg.message = WM_RBUTTONDOWN) and (msg.hwnd =ShockwaveFlash1.handle) then
begin
popupmenu1.Popup(Mouse.CursorPos.X, Mouse.CursorPos.Y); // popupmenu1 是你自己的那个，
Handled := True;
end;

end;

来晚了

可以了，原来有一个ApplicationEvents1构件的,

sunys做得好，100分