Z zyqks Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-18 #1 如何在delphi程序中实现将某一个字体安装到当前的操作系统中去?
C commandor Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-18 #2 Screen.Fonts是一个TStrings对象，用IndexOf('你的字体') 方法可以知道是否安装此字体。 如果没有安装，则安装新字体： AddFontResource('c:/YouyFontFile.ttf'); SendMessage( HWND_BROADCAST, WM_FONTCHANGE, 0, 0 );
Screen.Fonts是一个TStrings对象，用IndexOf('你的字体') 方法可以知道是否安装此字体。 如果没有安装，则安装新字体： AddFontResource('c:/YouyFontFile.ttf'); SendMessage( HWND_BROADCAST, WM_FONTCHANGE, 0, 0 );
B biyesheng Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-18 #4 用代码实现把你的字体文件拷到windows下的font目录下就行了。
