>The operational information is that if you follow the ordinary rules for
>reference-count and garbage-collection, then every should work as expected.
One would hope so, but I've got another strange one. I have a MIAW that
won't go away.
This happens only on Windows, only in a projector, and only the first time
the MIAW is opened.
I click the OK or Cancel button, and the MIAW stays on-screen, but
inactive. I can drag it; the main movie responds to clicks; but I
can't get rid of the MIAW. I can open it again and it always closes after
the first time.
Here's how I'm handling it (movie scripts):
on OpenModalDLOG dlogPathName, dlogWindowType, optionalDLOGName
set dlogWindow = window (dlogPathName)
if not voidP(optionalDLOGName) then set dlogWindow.title = optionalDLOGName
set stageRect = rect(the stageLeft, the stageTop, the stageRight, the
stageBottom)
set DLOGRect = CenterRectWithin(dlogWindow.sourceRect, stageRect)
set DLOGRect = offset(DLOGRect, 0, -20) -- tweak dlog a little above
dead center.
set dlogWindow.rect = DLOGRect
set dlogWindow.windowType = dlogWindowType
set dlogWindow.modal = 1
gMiawName = dlogPathName
open dlogWindow
end
on CloseModalDLOG gOkPressed
gTeacherPrefsTimeOut = timeOut(gMiawName).new(20, #mForgetWindow, VOID)
end
on mForgetWindow
-- lWindowName = gTeacherPrefsTimeOut.name
lWindowName = gMiawName
window(lWindowName).close()
window(lWindowName).forget()
gTeacherPrefsTimeOut.target = VOID
gTeacherPrefsTimeOut.forget()
gMiawName = VOID
if gOkPressed = TRUE then
gOkPressed = FALSE
currentFrameObject = getFrameObject()
currentFrameObject.resetAccessPrefs()
end if
end
And I'm closing it with this code in the MIAW:
on OKClicked me
gAccessPrefs = pCurrPrefs
gOkPressed = TRUE
tell the stage
closeModalDLOG TRUE
end tell
end
Cordially,
Kerry Thompson
[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!]
