建立窗口,并拖拽 扩展控件==>Web浏览器
设置Web浏览器控件属性 “显示东西栏”,“显示状况栏”勾选去失落
窗口按钮或窗口事务
a) 窗口==>事务==>打开时
Dim proPath
proPath= Sys.ProjectDir
proFilePath="file:///"&proPath&"\video\index.html"
Web浏览器0.Url=proFilePath
文本框0.Text=proFilePath
b) 按钮“加载默认视频”==>事务==>左键按下
Dim proPath
proPath= Sys.ProjectDir
proFilePath="file:///"&proPath&"\video\index.html"
Web浏览器0.Url=proFilePath
文本框0.Text=proFilePath
添加新的视频操作
a) 放视频到对应的项目根目次中的“video/vedios”
b) 点窜H5页面“index.html”
0 篇文章
如果觉得我的文章对您有用,请随意打赏。你的支持将鼓励我继续创作!