【聚杰网数据库编程】关于PB播放AVI文件的补充

本人拜读了闫宗孝先生的如何在PB6中播放AVI多媒体文件",觉得其中的使用Child window 作为播放AVI文件的输出窗口不太实用,程序员更喜欢把它放到自己的窗口中去,而且PowerBuilder 也提供了该可能,我对此作了些改动!

　 1. 建立一个空数据窗口 dw_avi:

　 2. 建立一OLE 控件 "Microsoft Multimedia Control Cersion 6.0"

 long hdd // 改动处
 hdd=handle(dw_avi) //  ole_1.visible=false ole_1.object.FileName = "AVI文件.avi"  // 注意：AVI文件带路径 ole_1.object.hWndDisplay=hdd ole_1.object.Command = "Open" ole_1.object.command = "play"