用OLE连接 Flash 4的控件Swflash.ocx
---- 选菜单"Cotrols | OLE"，出现窗口"Insert object"，选"Insert Control"，在Control Tyle栏里找出"Shockware Flash Object"（若该控件尚未注册,可先选"ReGISter Now"对该控件进行注册）；回到PB窗口，用鼠标点击安放此控件在窗口上并调整大小。（再用鼠标右击，出现浮动菜单，选"OCX Property"设置控件的属性）。

对Flash 4的控件的主要属性
---- Flash 4的控件Swflash.ocx主要提供了下列属性在编程中使用：

---- Movie属性：存放Flash动画文件的URL's：在本机磁盘时写全目录名，例如： d:\lxrj\lixiang\lxpaper\2000\t04\bol.swf 在Internet上按浏览网页的方式：例如（下面是实际存放在贵州大学Web服务器上的一个Flash文件） http://www.gzu.edu.cn/~lixiang/bol.swf

---- Quality（分辨率）属性：播放的分辨率，有0（low），1（AutoLow），2（Hight），3（AutoHight），4（Best）五个值

---- Scale属性：播放的屏幕，有0（ShowAll）, 1（NoBorder）, 2（ExactFit）三个值

---- Loop（循环播放）属性：true, false

---- menu（菜单）属性：true, false

对Flash 4的控件Swflash.ocx进行编程
---- 明白了Flash控件的主要属性后，即可根据应用的需要进行编程，在我们上面对窗口的安排中，仅需对"播放"按钮cb_1的clicked事件录入下述代码即可（不愿编代码的读者可以用鼠标右击窗口的OLE控件界面，打开属性页填写）：

ole_1.Object.movie=sle_1.text
ole_1.Object.scale=0
ole_1.Object.loop=true
ole_1.Object.Quality=4
ole_1.Object.Scale=2
ole_1.Object.menu=true

---- 为方便退出，在另一个命令按钮cb_2的clicked事件中录入代码：close(parent)