程式安裝字型或直接調用非註冊字型[c#]

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;