Director综合技巧:定制能够随意拖动地MIAW

2024-09-08 19:26:56

字体：大中小

来源：转载

供稿：网友

定制能够随意拖动的miaw
　　我们经常想要创建一个具有以下属性的miaw（movie in a window，窗口中的影片）：

　　 1. 没有标准的标题栏。

　　 2. 在以窗口模式运行的放映机中，能够被用户在舞台范围内外自由拖动。

　　看起来好像很容易，可是许多开发者发现，即使给windowtype指定了有效值，最终的miaw仍然带有标题栏，且仅能在舞台范围内拖动，或者虽然没有标题栏，但位于舞台范围内，且根本无法拖动。作为一个director开发者，你也许根本不需要这些功能（因此也不需要知道windowtype究竟该如何取值），你也许一直苦于无法算出给windowtype赋予何值才能够得到满意的结果。本文阐述的技巧很好地解决了这一问题，将其用在director程序中非常容易。此外，这项技巧已经通过测试，在mac和pc上都能够工作的很好。

　　做法很简单，只需两步：

　　 1. 选择合适的windowtype值，此处必须令windowtype=2。

　　 2. 给一个“伪造”的标题栏添加lingo代码，以便鼠标能够随意拖动这个miaw。

　　为什么在这个miaw中，必须令windowtype=2呢？简单地说，是因为一个取值为2的“窗口”实际上根本就不是窗口，而是一个对话框。真正的窗口（windowtype取其他的有效值）必须在当前舞台环境的父窗口边界内，这不是director的特性，这是所有视窗操作系统的一个基本概念。通过令windowtype=2，实际上创建了一个“对话框中的影片”，而对话框能够存在于桌面上的任何地方，且与创建它的主窗口的大小和位置都没有关系。因此只要能够在预期的位置用lingo在一个对话框（windowtype=2）中打开影片，那么随后就可以在运行时用lingo改变它的位置。

　　首先，在miaw的“热点”上添加相应的lingo代码，以便当鼠标按下时跟踪其位置，并相应地调整窗口（实际上是对话框）的rect值。

　　将下面的代码粘贴到script window中，并确保将其设置成movie script。

on dragwindow dwhichmiaw
tell the stage
set mpt to point ( the mouseh , the mousev )
set origrect to the rect of dwhichmiaw
repeat while the mousedown
set newpt to point ( the mouseh , the mousev )
set deltapt to newpt - mpt
set newrect to offset (origrect, getat (deltapt, 1 ), ?
getat (deltapt, 2 ))
set the rect of dwhichmiaw to newrect
tell dwhichmiaw to updatestage
updatestage
end repeat
end tell
end

　　正如你看到的那样，这个带有参数（dwhichmiaw）的剧本被miaw引用，同时根据传递的参数值运行。可是从哪里调用剧本呢？很简单，你的miaw看起来可能像下图那样，注意我是如何使用一个director中的shape演员来“伪造”标题栏的。

　　其次，将下面的剧本放在“伪造”的标题栏上。

global gvideoplayer
- the global reference to your miaw

on mousedown
repeat while the mousedown
tell the stage to dragwindow(gvideoplayer)
end repeat
end

　　这就是要做的一切。当你打开这个miaw时，没有标题栏，点击“伪造的标题栏”能够在屏幕上任意拖动miaw而不受舞台尺寸和边界的限制。

　　虽然这项技巧很简单，但在director开发中，确实为定制能够随意拖动的影片打开了创造性的大门。

上一篇：Director综合技巧:Director 怎么样检查测试演员地载入进度

下一篇：Director综合技巧:Director 对象列表地调用与删除