At 3:31 PM -0500 on 1/17/01, MattBeedle@... wrote:


>Interesting, my monitor flashes it the depthMode doesn't change for me, I
>tried all of the different values too!

I doubt their is anything wrong with anyone's code but I tried 
running the following code on my iMac and it set the depth mode for 
each constant I tried.  It changed it between 256, 1000, and Millions 
but that's all.  In some cases though, there was no change in screen 
depth and the function still returned whatever I fed it.

Inside Mac say to use DMCheckDisplayMode to see if modes and pixels 
depths are  are supported.

Try running this code from the FB^3 Lite runtime:

_kFirstVidMode =  128
_kSecondVidMode = 129
_kThirdVidMode =  130
_kFourthVidMode = 131
_kFifthVidMode =  132
_kSixthVidMode =  133


TOOLBOX FN DMSetDisplayMode (LONG,LONG,LONG,LONG,HANDLE) = WORD

CLEAR LOCAL
DIM @deviceHndl AS HANDLE // A handle to our main device
DIM @pixDepth AS LONG
Dim err AS WORD
LOCAL FN ChangeResolutionTest(inPixDepth AS LONG)
pixDepth = inPixDepth
deviceHndl = FN GETMAINDEVICE
err = FN DMSetDisplayMode (deviceHndl, 0, @pixDepth, 0, 0)
END FN = pixDepth

Dim setScreenMode AS LONG
Dim requestedMode as Long

print "Enter desired screen mode"

print " FirstVidMode =  128"
print " SecondVidMode = 129"
print " ThirdVidMode =  130"
print " FourthVidMode = 131"
print " FifthVidMode =  132"
print " SixthVidMode =  133"
print
Input "Enter number of screen mode: ";requestedMode

setScreenMode = FN ChangeResolutionTest(requestedMode)

print "Attempted screen mode: ";requestedMode
print "Set screen mode: ";setScreenMode
------

Heather