Fixed fontsize;
RGBColor fontcolor;
FMFontStyle fontstyle;
+ FMFontFamily fontfamily;
+ status = GetEventParameter (event, kEventParamFMFontFamily,
+ typeFMFontFamily, NULL,
+ sizeof (FMFontFamily),
+ NULL, &(fontfamily));
+ check_noerr (status);
+
status = GetEventParameter (event, kEventParamFMFontStyle,
typeFMFontStyle, NULL,
sizeof (FMFontStyle),
//the above have types in SFNTTypes.h
ByteCount theActualLength;
+ ItemCount numFontFaces;
+
+/*
+ ATSUCountFontNames(fontid,
+ &numFontFaces);
+
ATSUGetIndFontName(fontid,
- 0, //first font in index array
+ numFontFaces-1, //first font in index array
0, //need to get length first
NULL, //nothin'
&theActualLength,
Ptr szBuffer = NewPtr(theActualLength);
ATSUGetIndFontName(fontid,
- 0, //first font in index array
+ numFontFaces-1, //first font in index array
theActualLength,
szBuffer,
&theActualLength,
//its unicode - convert it to wx's char value and put it in there
theFont.SetFaceName(wxConvLocal.cMB2WX((char*)szBuffer));
DisposePtr(szBuffer);
-
+*/
+
+ Str255 theFontName;
+ GetFontName(fontfamily, theFontName);
+ theFont.SetFaceName(wxMacMakeStringFromPascal(theFontName));
+
//TODOTODO: Get font family - mayby by the script code?
theFont.SetFamily(wxDEFAULT);