> Hello!
> If sombody could help me, how to create a transparent MIAW (background),
> how to create a dragging window with Lingo (without titlebar).
You could do a search on MediaMacros. I think there was some code there that
you could modify.
You might also try: (Courtesy of Chuck Neal).
on DragWindow
mPt = the mouseLoc
rList = []
if (the windowList).count > 0 then
repeat with x = 1 to (the windowList).count
rList.add((the windowList)[x].rect)
end repeat
repeat while the mouseDown
newPt = the mouseLoc
d = newPt - mPt
repeat with x = 1 to (the windowList).count
newRect = offset(rList[x],d[1], d[2])
(the windowList)[x].rect = newRect
end repeat
repeat with x = 1 to (the windowList).count
tell (the windowList)[x] to updatestage
end repeat
updateStage
end repeat
end if
end
--Judy
[To remove yourself from this list, or to change to digest mode, go to
http://www.penworks.com/LUJ/lingo-l.cgi To post messages to the list,
email [EMAIL PROTECTED] (Problems, email [EMAIL PROTECTED])
Lingo-L is for learning and helping with programming Lingo. Thanks!]
