` Detect large font settings (Geoff Spillane) - Icetips Article
Icetips - Templates, Tools & Utilities for Clarion Developers

Templates, Tools and Utilities
for Clarion Developers

Icetips Article

Back to article list   Search Articles     Add Comment     Printer friendly     Direct link  

Windows API: Detect large font settings
2003-09-09 -- Geoff Spillane
 
Newsgroups: comp.lang.clarion,softvelocity.products.c55ee Hi Andy, For determining if large fonts are used I use the following: GetDialogBaseUnits(),LONG,PASCAL ! Define Group for use in GetDialogBaseUnits() API function WordGrp GROUP,OVER(DialogBaseUnits) LowOrderWord USHORT HiOrderWord USHORT END DialogBaseUnits = GetDialogBaseUnits() IF WordGrp.HiOrderWord > 16 ! Screen set to large fonts Best Regards, Geoff Spillane On Mon, 8 Sep 2003 15:33:25 -0500, "Andy Morgan" wrote: >I am having issues regarding Windows Large Fonts Option - so I need to >determin if the PC is set up to use Small (normal - default) fonts or Large >Fonts. I found the following code posted in the NG but cannot seem to grasp >it. > >I have placed the following inside my Global Map: > >MODULE('WINAPI') > GetDeviceCaps(UNSIGNED, UNSIGNED),UNSIGNED,PASCAL > GetDC(UNSIGNED),UNSIGNED,PASCAL > ReleaseDC(UNSIGNED,UNSIGNED),UNSIGNED,PASCAL >END > >Now, how do i actually use it > >I need something like: > >IF LargeFontsUsed = TRUE > do something >ELSE > do somethingelse >END > >Thanks in advance >Andy Morgan >c55h >

Today is November 21, 2024, 3:37 am
This article has been viewed 35189 times.
Google search has resulted in 37 hits on this article since January 25, 2004.


Back to article list   Search Articles   Add Comment   Printer friendly

Login

User Name:

Password:


Gold Subscription
Buy Now
Silver Subscription
Buy Now
Solo Subscription
Buy Now
Multiple Copy Pricing
Renew Subscription