meant smaller at higher... --- In AccessDevelopers@yahoogroups.com, "jmw95823" <[EMAIL PROTECTED]> wrote: > Thanks, Tom. No one has asked for it, but I don't like the way the > screens are smaller at the lower resolution. I'll copy your post > and code and look at it. I have an Access db that can determine the > user's screen resolution with probably a similar module in it. > I agree, two fe's is not the way to simplify the workday. Jim > --- In AccessDevelopers@yahoogroups.com, "Tom Oakes" <[EMAIL PROTECTED]> > wrote: > > I think maintaining two front-ends is a horrible idea, but it's > your > > workday. I design everything at 800 x 600 unless the client > specifically > > asks for/agrees to be tethered to 1024 x 768. > > > > I don't know of a way to read the resolution via DOS, but you > certainly can > > via this API: > > > > '***** code start *****' > > Private Declare Function api_GetDeviceCaps Lib "gdi32" > Alias "GetDeviceCaps" > > (ByVal hdc As Long, ByVal nIndex As Long) As Long > > > > Public Function atGetdevcaps%(ByVal intCapability%) > > '=========================================================== > > ' Purpose: Returns information on the capabilities of > > ' a given device. Which device is determined > > ' by the arguments to api_CreateIC. Which > > ' capability is determined by the intCapability > > ' argument which is one of the constants > > ' defined for the GetDeviceCaps Windows API > > ' function. > > ' Arguments: intCapability - index of capability to check > > ' see win32api.txt for list of values > > ' Returns: Results of call to GetDeviceCaps > > '----------------------------------------------------------- > > On Error GoTo getdevcapsError > > 'LogPixels X = 88 for capability > > 'LogPixels Y = 90 for capability > > > > Dim hdc& 'handle for the device context > > 'Specify the device -- use "DISPLAY' to check screen capabilities > > Const DRIVER_NAME = "DISPLAY" > > Const DEVICE_NAME = 0& > > Const OUTPUT_DEVICE = 0& > > Const LPDEVMODE = 0& > > > > 'Get a handle to a device context (hDC) > > hdc = api_CreateIC(DRIVER_NAME, DEVICE_NAME, OUTPUT_DEVICE, > LPDEVMODE) > > If hdc > 0 Then > > 'If a valid hDC was returned, call GetDeviceCaps and then > release the DC > > atGetdevcaps = api_GetDeviceCaps(hdc, intCapability) > > hdc = api_DeleteDC(hdc) > > End If > > > > getdevcapsExit: > > Exit Function > > getdevcapsError: > > MsgBox "Error: " & Error$, 48, "System Information" > > Resume getdevcapsExit > > End Function > > '***** code end *****' > > > > atGetdevcaps(10) will give you the vertical > > atGetdevcaps(8) will give you the horizontal > > > > ...however, I've found that the horizontal is quirky. It works > very well as > > the source of a form textbox, but running it in the immediate > window (or in > > code), it will return 0 about half the time. I hack around this > by looping > > about 5 times, until it's non-zero - this has worked very > consistently. > > > > Anyway, back to your problem, you could have them start an > external Access > > or VB file that uses this API to read the resolution and open the > > appropriate file. > > > > Tom Oakes > > Personal PC Consultants, Inc. > > [EMAIL PROTECTED] > > 503.230.0911 (O) > > 402.968.6946 (C) > > 734.264.0911 (F) > > > > > > > > > > _____ > > > > From: AccessDevelopers@yahoogroups.com > > [mailto:[EMAIL PROTECTED] On Behalf Of jmw95823 > > Sent: Friday, August 05, 2005 10:14 AM > > To: AccessDevelopers@yahoogroups.com > > Subject: [AccessDevelopers] Determining Screen Resolution Via a > Batch File > > > > > > We've played around a bit with changing the size of controls on a > > form > > based on users' screen resolution(s). We still need to work with > it > > some more to get it right because we had some problems with it. > > Temporarily I was thinking that I might resize the forms to fit > > 1024x768 and make that a second front-end in addition to the > original > > designed at 800x600. > > We have a batch file that looks at the network to determine if > there > > is a newer version of the front end on the user's pc. If there > is, > > the new version is copied to the local drive. > > In this startup batch file is there some code I could use to > > determine > > the user's screen resolution and then have it open the mdb that > > corresponds to it? Thanks for any help. Jim > > > > > > > > > > > > Please zip all files prior to uploading to Files section. > > > > > > > > > > SPONSORED LINKS > > Microsoft > > <http://groups.yahoo.com/gads? > t=ms&k=Microsoft+access+database&w1=Microsoft+ > > > access+database&w2=Free+microsoft+access+database&w3=Microsoft+access > +develo > > > per&w4=Microsoft+access&w5=Microsoft+access+database+design&w6=Micros > oft+acc > > ess+database+training&c=6&s=199&.sig=hi30IqLkuABFugfT9filIA> > access database > > Free > > <http://groups.yahoo.com/gads? > t=ms&k=Free+microsoft+access+database&w1=Micro > > > soft+access+database&w2=Free+microsoft+access+database&w3=Microsoft+a > ccess+d > > > eveloper&w4=Microsoft+access&w5=Microsoft+access+database+design&w6=M > icrosof > > t+access+database+training&c=6&s=199&.sig=8aWfZOdhV- CniHJ94pwcNA> > microsoft > > access database Microsoft > > <http://groups.yahoo.com/gads? > t=ms&k=Microsoft+access+developer&w1=Microsoft > > > +access+database&w2=Free+microsoft+access+database&w3=Microsoft+acces > s+devel > > > oper&w4=Microsoft+access&w5=Microsoft+access+database+design&w6=Micro > soft+ac > > cess+database+training&c=6&s=199&.sig=N4ByQG88k5msTEkYfiqr5A> > access > > developer > > Microsoft > > <http://groups.yahoo.com/gads? > t=ms&k=Microsoft+access&w1=Microsoft+access+da > > > tabase&w2=Free+microsoft+access+database&w3=Microsoft+access+develope > r&w4=Mi > > > crosoft+access&w5=Microsoft+access+database+design&w6=Microsoft+acces > s+datab > > ase+training&c=6&s=199&.sig=caIXrnkA0j_IkiWQ2YhnBg> access > Microsoft > > <http://groups.yahoo.com/gads? > t=ms&k=Microsoft+access+database+design&w1=Mic > > > rosoft+access+database&w2=Free+microsoft+access+database&w3=Microsoft > +access > > > +developer&w4=Microsoft+access&w5=Microsoft+access+database+design&w6 > =Micros > > > oft+access+database+training&c=6&s=199&.sig=BGgv9psemJdkdjRCvcygZA> > access > > database design Microsoft > > <http://groups.yahoo.com/gads? > t=ms&k=Microsoft+access+database+training&w1=M > > > icrosoft+access+database&w2=Free+microsoft+access+database&w3=Microso > ft+acce > > > ss+developer&w4=Microsoft+access&w5=Microsoft+access+database+design& > w6=Micr > > > osoft+access+database+training&c=6&s=199&.sig=308KnMkTEj0KSRo7LpDQRw> > access > > database training > > > > _____ > > > > YAHOO! GROUPS LINKS > > > > > > > > * Visit your group "AccessDevelopers > > <http://groups.yahoo.com/group/AccessDevelopers> " on the web. > > > > > > * To unsubscribe from this group, send an email to: > > [EMAIL PROTECTED] > > <mailto:[EMAIL PROTECTED] > subject=Unsubscribe> > > > > > > * Your use of Yahoo! Groups is subject to the Yahoo! Terms of > Service > > <http://docs.yahoo.com/info/terms/> . > > > > > > _____
------------------------ Yahoo! Groups Sponsor --------------------~--> <font face=arial size=-1><a href="http://us.ard.yahoo.com/SIG=12h6kidqo/M=362131.6882499.7825260.1510227/D=groups/S=1705115370:TM/Y=YAHOO/EXP=1123277602/A=2889191/R=0/SIG=10r90krvo/*http://www.thebeehive.org ">Get Bzzzy! (real tools to help you find a job) Welcome to the Sweet Life - brought to you by One Economy</a>.</font> --------------------------------------------------------------------~-> Please zip all files prior to uploading to Files section. Yahoo! Groups Links <*> To visit your group on the web, go to: http://groups.yahoo.com/group/AccessDevelopers/ <*> To unsubscribe from this group, send an email to: [EMAIL PROTECTED] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
