try resizing the window to 1px X 1 px instead of hiding.
Just a friendly suggestion.
property pListRef
property pExpandMem
property pContractMem
global gExpWin
on beginSprite me
pListRef = sprite(me.spriteNum)
pExpandMem = member(51)
pContractMem = member(52)
pListRef.member = pExpandMem
end
on mouseDown me
if pListRef.member = pExpandMem then
sendAllSprites(#ExpandWin)
pListRef.member = pContractMem
else
sendAllSprites(#ContractWin)
pListRef.member = pExpandMem
end if
end
on ExpandWin
window("win1").rect = rect(0, 0, 200, 300)
end
on ContractWin
window("win1").rect = rect(0, 0, 1, 1)
end
on exitFrame
go to the frame
end
[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!]