[futurebasic] RE: [FB] FontFamily etc.

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : December 2002 : Group Archive : Group : All Groups

From: "Edwards, Waverly" <Waverly.Edwards@...>
Date: Fri, 13 Dec 2002 22:40:48 -0500
Check the case in the headers.  If the case has to match perfectly
the name in the library.

FMGetFontFamilyFromName 


The only thing I can think of.


W.

-----Original Message-----
From: Robert Covington
To: futurebasic@...
Sent: 12/13/02 6:13 PM
Subject: [FB] FontFamily etc.



I have CarbonLib in some modern incarnation 1.4+, but even when
including
Toolbx Fonts Include, I get a missing toolbox message at program startup
(the crash warning, missing from this machine) for


FMGetFontFamilyFromName

even though Apple docs say available since Carbonlib v1.0?

Is there an alternative for the below without that FM call?

RC

LOCAL FN MenuFont (ItemID,wnd)
DIM MenuH as handle
DIM FontName$
MenuH = FN GETMHANDLE(_FontPopup)
GETITEM (MenuH,ItemID,FontName$)
#IF CarbonLib
gStyle.FontID = Fn FMGetFontFamilyFromName(FontName$)
#Else
GETFNUM (FontName$,gStyle.FontID)
#endif
gText.font(wnd) = gStyle.FontID
Def CheckOneitem(_FontPopup,itemID)
FN SetStyle(wnd)
END FN



--
To unsubscribe, send ANY message to
<futurebasic-unsubscribe@...>