Hi,
Search for LBMRES Xtra. Very good for that kind of problems.
take care
Kamil
dimple uppal wrote:
> Hi! I am making a movie where I want to reset the user's screen res to 680 X
> 480.So far I am able to achieve this if the user's screeen res is set to
> 1024 X 768, however, things go wrong if the resolution is set to any other
> number, ie. either the movie size shrinks and all the text text appears in a
> zoomed out form and nothing is readable, or the movie is not centered and
> appears at the top left corner of the screen...any way, it does whatever it
> feels like doing and its very infuriating.
> Please tell me what to do.
>
> TIA
>
> -Dimple-
>
> Here's the code i have used in my movie script....
>
> global gScrHgt
> global gScrWidth
> global gScrDepth
> global gCantBeSet
> global gChanged
>
> -- test & set the display size & depth
> on preparemovie
> --these commands help centre the movie
> (the stage).rect = the deskTopRectList[1]
> (the stage).drawrect = the deskTopRectList[1]
> gScrHgt = baScreenInfo("height")
> gScrWidth = baScreenInfo("width")
> gScrDepth = baScreenInfo("depth")
>
> --I have also tried using: if gscrwidth > 640 then ...
>
> if gScrWidth <> 640 then
> if gScrDepth < 16 then
> gCantBeSet = baSetDisplay (640, 480, 16, "temp", false)
> CheckChangeScreen
> else
> gCantBeSet = baSetDisplay (640, 480, gScrDepth, "temp", false)
> CheckChangeScreen
> end if
> else
> if gScrDepth < 16 then
> gCantBeSet = baSetDisplay (gScrWidth, gScrHgt, 16, "temp", false)
> CheckChangeScreen
> else
> gChanged = FALSE
> gCantBeSet = FALSE
> end if
> end if
> end
>
> on checkchangescreen
> if gscrWidth <> 640 or gscrDepth < 16 then
> gchanged = TRUE
> end if
> end
>
> on stopMovie
> if gChanged then
> baSetDisplay (gScrWidth, gScrHgt, gScrDepth, "temp", false)
> end if
> end
>
> _________________________________________________________________________
> Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com.
>
> [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!]
--
Kamil Dabkowski
Geometrek
http://stop.at/kamil
[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!]
