如何用API取得System menu字型? |
|
尚未結案
|
|
jcjroc
高階會員   發表：21 回覆：279 積分：115 註冊：2002-09-18 發送簡訊給我 |
|
|
g6101
高階會員 發表：22 回覆：129 積分：110 註冊：2002-06-15 發送簡訊給我 |
jcjroc 您好：
請參考BCB範例程式，位置在...
C:\Program Files\Borland\CBuilder6\Examples\Apps\RichEdit\richabt.bpr
專案裏頭之GetFontNames函數範列
或參考以下的連結
http://delphi.ktop.com.tw/topic.php?TOPIC_ID=20021 發表人 - g6101 於 2004/04/06 23:00:01
|
|
jcjroc
高階會員 發表：21 回覆：279 積分：115 註冊：2002-09-18 發送簡訊給我 |
引言: jcjroc 您好： 請參考BCB範例程式，位置在... C:\Program Files\Borland\CBuilder6\Examples\Apps\RichEdit\richabt.bpr 專案裏頭之GetFontNames函數範列 或參考以下的連結 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=20021 發表人 - g6101 於 2004/04/06 23:00:01那是列出所有字型名稱阿! 可是我要的不是那個耶 我要的是目前OS設定給Menu用的字型 |
|
g6101
高階會員 發表：22 回覆：129 積分：110 註冊：2002-06-15 發送簡訊給我 |
取得/寫入Menu字型方法如下：
TLogFont lf;
TNonClientMetrics NM; //取出「圖示文字」字列
SystemParametersInfo(SPI_GETICONTITLELOGFONT,sizeof(lf),&lf,0); //取出整個TNonClientMetrics結構
SystemParametersInfo(SPI_GETNONCLIENTMETRICS,sizeof(NM),&NM,0);
//NM.lfMenuFont <--這個Mune字體結構(TLogFont) //指派Menu字型(以標楷體為例)
strcpy(lf.lfFaceName,"標楷體");
NM.lfMenuFont = lf; //設定「圖示文字」字列
SystemParametersInfo(SPI_SETICONTITLELOGFONT,sizeof(lf),&lf,0); //設定整個TNonClientMetrics結構
SystemParametersInfo(SPI_SETNONCLIENTMETRICS,sizeof(NM),&NM,0);
|
|
jcjroc
高階會員 發表：21 回覆：279 積分：115 註冊：2002-09-18 發送簡訊給我 |
發表時間：2004-04-06 18:40:21
IP:211.75.xxx.xxx 未訂閱
系統時間：2024-05-06 19:48:03
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |