急救:谁解决了flash控件全屏(或动态改变大小)时,控件不变的问题?
解决方案 »
- 我见人的软件有,也上CSDN问过,但是还是没有答案。
- 发布一个控件,用的着的朋友请下
- 能不能用query控件对ClientDataSet 中的数据进行查询......
- wise打包的简单问题.
- 一个ADO.SQL的问题,请大家帮帮小弟!
- 简单,进来拿分,以下的定义是要调用那些类或.pas
- <<<<<<如何知道 treeview 是不是空?
- 如何使用webbrowser
- activeform如何取得所在窗口的html代码
- 谁知道PARADOX数据库的BLOB字段生成的.MB数据文件怎样删除!!
- 我用RICHEDIT编辑的文件,存成TXT格式,我用记事本打开以后发现是乱码,要如何解决?
- 又有麻烦了!大家都来帮个忙。
begin
Form1.ActiveControl := nil; //焦点设为空
Form1.ActiveControl := ShockwaveFlash; //焦点指向flash控件
end;
假设Flash组件的名称为FlashCtrl
1、FlashCtrl.Visible := False ;
2、设置FlashCtrl大小,若指定FlashCtrl.Align 为不等于alNone值时可免写这部分代码
3、FlashCtrl.Visible := True ;
4、SendMessage(FlashCtrl.Handle,WM_LButtonDown,0,0) ;
完成以上代码即可