如何在组中使用命令“mobileControlCreate”创建播放器? - 动态代码

时间:2014-05-23 10:50:10

标签: livecode

我想在移动设备上创建播放器。

我使用此命令" mobileControlCreate"用于创建玩家。

这是我的代码:

   mobileControlCreate "player", "videoControl"
   mobileControlSet "videoControl", "filename", specialFolderPath("engine") & "/vdo.mp4"
   mobileControlSet "videoControl", "preserveAspect", true
   mobileControlSet "videoControl", "showController", true
   mobileControlSet "videoControl", "visible", true
   mobileControlSet "videoControl", "rect", the rect of grp "o_c2"

我该怎么办?

2 个答案:

答案 0 :(得分:1)

本机控件浮动在堆栈上方而不是卡片的一部分,所以 - 不幸的是 - 你不能将它们放在一个组中。

答案 1 :(得分:0)

使用mobileControlCreate创建播放器,就像您目前一样。现在使用mobileControlCreate创建一个滚动条。

local lMovieScrollerID // declare outside handler

on createScroller
  mobileControlCreate "scroller","Movie Scroller"
  put the result into lMovieScrollerID
  mobileControlSet lMovieScrollerID,"rect",the rect of this cd
  put the rect of this cd into myRect
  put item 3 of myRect * 2 into item 3 of myRect
  put item 4 of myRect * 2 into item 4 of myRect
  mobileControlSet lMovieScrollerID,"contentRect",myRect
end createScroller

createScroller处理程序创建一个滚动条,可以滚动一个4倍于卡的区域。因此,您可以完全在屏幕上滚动电影。您将需要进行实验以找出您实际需要的rect的kinf(myRect的值)。

在下一个处理程序中,我们假设你的组的矩形是100,100,200,200。

on scrollerDidScroll theScrollH,theScrollV
  put "100,100,200,200" into myInitialRect
  add theScrollH to item 1 of myInitialRect
  add theScrollH to item 3of myInitialRect
  add theScrollV to item 2 of myInitialRect
  add theScrollV to item 4 of myInitialRect
  // obviously myInitialRect is no longer "initial" here
  set the rect of grp "o_c2" to myInitialRect
  mobileControlSet lMovieScrollerID,"rect",myInitialRect
end scrollerDidScroll

应该很清楚,这些处理程序是未经测试的,需要进行一些实验,但我很确定这是您必须遵循的路径。