Michelle ---

Let me expand a bit on my last post:

lScalable = .F.    && Can use *any* size
nHighSize = 0
nLowSize  = 0
lHasFont=AFONT(aSizes,"MS Sans Serif") 
IF lHasFont   && Font Exists
   IF ALEN(aSizes)=1 AND aSizes[1]=-1  
      lScalable=.T.
   ELSE
      nMax=ALEN(aSizes)
      nHighSize=aSizes[nMax]
      nLowSize =aSizes[1]
   ENDIF
ENDIF

Results are: If lScalable, can use any size, otherwise nHighSize and nLowSize contain the bounds of the font sizes.


>Is there a way to find out what is the smallest size for a font? I've been experimenting with resizing, and if I make the form too small, the fontsize goes to an illegal value. I'd like to know what is the lowest allowed so I can put a check for it. I want this to work for every font, though, so unless they all have the same lowest value, I need some way to check based on the font.
>
>Thanks,
>
>-Michelle