Delphi的Copmponent菜单中选择Import ActiveX Control~~~
找到Shockwave Flash然后Install就可以了~~
找到Shockwave Flash然后Install就可以了~~
解决方案 »
- 任务栏程序显示区增加显示项
- 谁能给份关于摄像头捕捉视频信息的并保存的完整源码?
- 一个SQL的问题,谢谢提供解决方法
- 你们说说这算不算Delephi7的Bug(IWDBGrid1.Columns.Add 和 而IWDBGrid1.Columns[0])
- 怎么把所有的qrlabel的caption都设为0
- [菜鸟问题]怎样截获数据库的错误信息?
- 怎么让ListView1 中选中得图片显示在Image1
- 新手问一个最简单的问题,不准笑!
- 如何批量改变一个表的InternalCalc类型字段的布尔值(CheckBox全选、全取消、反选)?
- 提个和DELPHI不相干的问题,请问UNIX编程学习之前要掌握哪些东西?
- 突然发现个问题,一直都常见的XXXX(Sender : Tobject),Sender是什么意思还没搞清楚。
- 这个问题难度非常大,不是高手的不要近来
控件一样用了!
//strFlashName:Flash名称; bolLoop:是否循环播放
begin
with showflash do //shockwave控件名
begin
Movie:=ExtractFilePath(Application.ExeName)+strflashname+'.swf';
Loop:=bolLoop;
Play;
end;
end;
//strFlashName:Flash名称; bolLoop:是否循环播放
begin
with FlashStage do //shockwave控件名
begin
Movie:=ExtractFilePath(Application.ExeName)+strFlashName+'.swf';
Loop:=bolLoop;
Play;
end;
end;