#32002/6/17 9:03:39
字体相关的U32 函数(哪个免费就用哪个呗)
Budapi.u32
Result := baFontList( FontType )
Result := baFontStyleList( FontName )
Result := baFontInstalled( FontName, Style )
ActiveM!.u32
Result:=M_AddNewFont(FontName)
Mfont.u32
Result := CreateFonts( FontFile, ID, DebugOn )
Result := IsFontInstalled( FontName, FontStyle )
RemoveFonts( ID, DebugOn )
Winapi.u32
int = AddFontResource(LPCSTR)
HFONT = CreateFont(int, int, int, int, int, DWORD, DWORD, DWORD,DWORD, DWORD, DWORD, DWORD, DWORD, LPCSTR)
HFONT = CreateFontIndirect(CONST LOGFONTA *)
DWORD = GetFontData(HDC, DWORD, DWORD, LPVOID, DWORD)
DWORD = GetFontLanguageInfo( HDC )
…………
另外用Add/Remove Font Resource Knowledge Object也可以(其实就是用WINAPI.32)
编辑历史:[这消息被Rock编辑过(编辑时间2002-06-17 09:09:49)]
[这消息被Rock编辑过(编辑时间2002-06-17 09:11:54)]