安装字体或直接调用非注册字体 z

1.安装字体
//程序直接将字体文件安装的系统中。
函数声明:
[DllImport("kernel32.dll", SetLastError = true)] 
static extern int WriteProfileString(string lpszSection, string lpszKeyName, string lpszString); 

[DllImport("user32.dll")] 
public static extern int SendMessage(int hWnd, // handle to destination window 
uint Msg,  
int wParam,
int lParam
); 

[DllImport("gdi32")] 
public static extern int AddFontResource(string lpFileName); 

public static bool installFont(string FontFileName, string FontName) 

string WinFontDir = System.Environment.GetEnvironmentVariable("WINDIR") + "\\fonts"; 
//string FontFileName = "DS-Digital Bold Italic.TTF"; 
//string FontName = "DS-Digital Bold Italic"; 
int Ret; 
int Res; 
string FontPath; 
//const int WM_FONTCHANGE = 0x001D; 
//const int HWND_BROADCAST = 0xffff; 
FontPath = WinFontDir + "\\" + FontFileName; 
try 

if (!File.Exists(FontPath)) 

File.Copy(System.Windows.Forms.Application.StartupPath + "\\font\\" + FontFileName, FontPath); //font是程序目录下放字体的文件夹
Ret = AddFontResource(FontPath); 

//Res = SendMessage(HWND_BROADCAST, WM_FONTCHANGE, 0, 0); 
//WIN7下编译会出错,不清楚什么问题。注释就行了。  
Ret = WriteProfileString("fonts", FontName + "(TrueType)", FontFileName); 

}catch(Exception ex) 

MessageBox.Show("[ "+FontName + " ]字体安装失败!原因:"+ex.Message); 
return false; 

return true; 
}

函数的使用: 
fonts.installFont(字体文件, 字体名称)//fonts类名
fonts.installFont("C39P36DmTt.TTF", "C39P36DmTt")

2.调用字体文件
//程序直接调用字体文件,不用安装到系统字库中。
设置字体对象:
String ls_appPath = System.Windows.Forms.Application.StartupPath + "\\font\\";//font是程序目录下放字体的文件夹
String fontFile1 = ls_appPath + "C39P36DmTt.TTF";
String fontFile2 = ls_appPath + "GWGLYPTT.TTF";
......
pfc.AddFontFile(fontFile1);//字体文件的路径
pfc.AddFontFile(fontFile2);//字体文件的路径
........
Font myFont1 = new Font(pfc.Families[0], 41, FontStyle.Regular, GraphicsUnit.Point, 0);//myFont1就是你创建的字体对象
Font myFont2 = new Font(pfc.Families1], 31, FontStyle.Bold | FontStyle.Regular); 

使用字体:
label1.Font = myFont1;

posted on 2015-04-12 15:27  武胜-阿伟  阅读(336)  评论(0编辑  收藏  举报