線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1682
推到 Plurk!
推到 Facebook!

如何改變PopupMenu中的字型大小

答題得分者是:avex
ALFA
一般會員


發表:8
回覆:11
積分:3
註冊:2003-07-26

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-09-13 11:01:00 IP:61.218.xxx.xxx 未訂閱
請教各位,有誰知道如何改變PopupMenu中的字型大小呢? 謝謝
avex
初階會員


發表:19
回覆:49
積分:43
註冊:2003-03-28

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-09-19 16:14:21 IP:218.163.xxx.xxx 未訂閱
使用 Owner darw menus  "OnDrawItem"    void __fastcall TForm1::Item1DrawItem(TObject *Sender, TCanvas *ACanvas, TRect &ARect, bool Selected)  {      ACanvas->Font->Size = 12; // 字型大小      if(Selected)      {      ACanvas->Brush->Color = clHighlight;      ACanvas->Font->Color = clHighlightText;      }      ACanvas->FillRect(ARect);      DrawText(ACanvas->Handle, dynamic_cast(Sender)-> Caption.c_str(), -1, &ARect, DT_VCENTER | DT_LEFT | DT_SINGLELINE); }
avex
初階會員


發表:19
回覆:49
積分:43
註冊:2003-03-28

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-09-19 16:15:56 IP:218.163.xxx.xxx 未訂閱
對了, 差點忘記 OnMeasureItem event 也要處理. 調整 item 的大小~    >>>(>>>
avex
初階會員


發表:19
回覆:49
積分:43
註冊:2003-03-28

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-09-26 19:46:36 IP:218.163.xxx.xxx 未訂閱
作者可能走了或忘了這題 不過, 在此跟以後要查相關資料的人講,  以上我提出的解法是可用的, 可行的, 沒問題的 請安心使用 
ALFA
一般會員


發表:8
回覆:11
積分:3
註冊:2003-07-26

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-09-26 23:47:04 IP:61.219.xxx.xxx 未訂閱
謝謝你囉~~~avex。。。 非常的抱歉,最近有事沒辦法上來,所以一直沒回你,謝謝你提供的方法!!
系統時間:2024-06-26 9:47:11
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!