[轉]嵌入字型到程式 Winform C#

標籤：des   winform   style   class   blog   code   

http://www.cnblogs.com/top5/archive/2011/06/20/2084942.html

程式安裝字型或直接調用非註冊字型[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;