在Powerbuilder中播放Flash动画

  在Powerbuilder中播放Flash动画。
  w_flash.ole_1.object.movie=gs_apppath+"\pic1\泵.swf"
  w_flash.ole_1.Object.loop=true
  w_flash.ole_1.Object.Quality=4
  w_flash.ole_1.Object.Scale=2
  w_flash.ole_1.Object.menu=false
  w_flash.ole_1.object.play()

  //与Flash交互
  //ole_1.Object.setvariable("mytext1","pb与flash")
  //得到总侦数
  //sle_1.text=string(OLE_1.Object.FrameNum)
  //停止
  //ole_1.object.stop()
  //是否播放完成
  //Beend=OLE_1.object.IsPlaying()

  //得到Flash的反馈信息,在OLE的fscommand事件下
  //ll_return = PB_FlashAntiMenu(handle(ole_1))
  //if command='command1' then
  //open(w_data)
  //end if
  //
  //if command='command2' then
  // //parent.post event ue_close()
  //end if

  OLE插入不了问题的解决,可以在高版本的Powerbuilder上插入OLE,然后导出窗体文件,一般可以导入到低版本的程序中。

你可能感兴趣的:(职场,PowerBuilder,休闲,flash动画)