请问如何让panle透明或在FLASH控件加上MouseDown事件??????大侠大将帮忙!!(20分)

  • 主题发起人 主题发起人 laohe
  • 开始时间 开始时间
L

laohe

Unregistered / Unconfirmed
GUEST, unregistred user!
请问如何让panle透明,我想在FLASH控件上加MouseDown事件,想让透明的panle放在FLASH控件的上面

这样有MouseDown了,不知大侠有没有其它方面
 
呵呵,用不着。你在flash里让按钮动作对应相关的FSCommand,在delphi里就能控制了,OCX
中有ONFSCommand事件,你可以用command args两个参数进行控制
 
老大,因为我是想用MouseDown也设置FLASH控件在FORM1上面任意移动,不是用这个事件
打开什么动作,是移动控件;同时又要保证FLASH动画的播放,
Panle设置移动简单,所以才想到用透明的panle,这样放在FLASH上面,就可以控制了
 
加在app;ication的ONmessage里最简单

procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG;
var Handled: Boolean);
begin
if (Msg.hwnd=ShockwaveFlash1.Handle)and(Msg.message=wm_Lbuttondown) then
begin
ReleaseCapture;
ShockwaveFlash1.Perform(WM_SYSCOMMAND,$f012,0)
end;
end;

下次你就直接提问就行了,省得绕这么大弯子。

;-)
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部