亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb

首頁 > 學院 > 開發設計 > 正文

實現StatusBar的Flat風格

2019-11-18 18:15:11
字體：大 中 小
來源：轉載
供稿：網友
具有Flat風格的StatusBar　　效果見右圖，OfficeXP里就是這樣的風格，其實實現很簡單，不必專門在網上找別人控件。
　　把StatusBar的SimplePanel設為False，點擊Panels添加StatusPanel，把所有StatusPanel的Bevel設為pbNone、Style設為psOwnerDraw因為我們要自己繪制Flat風格。下面是StutasBar的OnDrawPanel事件代碼：

PRocedure TForm1.StatusBar1DrawPanel(StatusBar: TStatusBar;
  Panel: TStatusPanel; const Rect: TRect);
var
    uAlign: UINT;
    R: TRect;
begin
    case Panel.Alignment of
        taLeftJustify  : uAlign := DT_LEFT;
        taCenter       : uAlign := DT_CENTER;
        taRightJustify : uAlign := DT_RIGHT;
    end;
    uAlign := uAlign or DT_VCENTER;
    with StatusBar.Canvas do begin
        Pen.Color := $E1E1E1;
        Brush.Color := StatusBar.Color;
        Rectangle(Rect);
        Brush.Style := bsClear;
        R.Left := Rect.Left + 1;
        R.Right := Rect.Right - 1;
        R.Top := Rect.Top + 1;
        R.Bottom := Rect.Bottom - 1;
        DrawText(StatusBar.Canvas.Handle, PChar(Panel.Text), -1, R, uAlign);
    end;
end;

　　右圖的界面中，第一StatusPanel應該是自動調整大小的，所以還得處理StatusBar.OnResize事件，代碼如下：
procedure TForm1.StatusBar1Resize(Sender: TObject);
var
    i, w: integer;
begin
    w := StatusBar1.Width;
    for i:=1 to StatusBar1.Panels.Count-1 do
        w := w - StatusBar1.Panels[i].Width;
    StatusBar1.Panels[0].Width := w;
end;

　　效果還不錯吧

上一篇：SQLServer中按某字段排列名次

下一篇：來自SVG的靈感

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
學習交流
熱門圖片

新聞熱點

疑難解答

圖片精選

網友關注

亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb
国产欧美日韩亚洲精品| 911国产网站尤物在线观看| 欧美黑人巨大精品一区二区| 亚洲天堂第二页| 91理论片午午论夜理片久久| 97视频人免费观看| 一区二区三区国产视频| 亚洲欧美日韩天堂一区二区| 精品国产91久久久久久老师| 日韩美女在线播放| 亚洲精品99999| 亚洲a一级视频| 欧美小视频在线观看| 国产精品久久久久久搜索| 久久精品亚洲热| 亚洲欧美日韩中文在线制服| 性色av香蕉一区二区| 日韩av快播网址| 国产精品视频网站| 亚洲区在线播放| 亚洲第一综合天堂另类专| 欧美大尺度在线观看| 中文字幕成人精品久久不卡| 国产成人精品视频| 中文字幕无线精品亚洲乱码一区| 欧美成人中文字幕| 国内精品久久久久久久久| 欧美激情综合色综合啪啪五月| 亚洲热线99精品视频| 成人在线国产精品| 全球成人中文在线| 国产成人综合av| 久久国产精品99国产精| 国产成人精彩在线视频九色| 国产99视频精品免视看7| 97在线视频精品| 欧美片一区二区三区| 色悠久久久久综合先锋影音下载| 亚洲精品一区久久久久久| 欧美性猛交xxxx黑人| 中文字幕精品一区二区精品| 国产精品久久婷婷六月丁香| 国产免费一区视频观看免费| 91色精品视频在线| 国产精品中文字幕久久久| 一区二区欧美在线| 日韩最新av在线| 欧美日韩国产精品| 欧美黑人视频一区| 另类专区欧美制服同性| 精品亚洲va在线va天堂资源站| 国产伦精品一区二区三区精品视频| 最好看的2019年中文视频| 欧美精品18videosex性欧美| 欧美另类在线观看| 国产亚洲激情在线| 久久精品免费电影| 91久久久亚洲精品| 亚洲电影免费观看| 欧美一区二区三区精品电影| 在线观看视频99| 国内免费久久久久久久久久久| 国产亚洲视频在线观看| 欧美性xxxxx| 亚洲三级av在线| 国产小视频91| 国产成人精品久久二区二区91| 亚洲国产精品人人爽夜夜爽| 国产欧美日韩中文| 久久这里有精品视频| 精品久久久久久久久久久久久久| 欧美日韩在线视频一区二区| 国产精品久久久久7777婷婷| 日韩激情av在线免费观看| 中文精品99久久国产香蕉| 亚洲最大的网站| 亚洲欧美精品伊人久久| 日韩亚洲国产中文字幕| 久久99精品久久久久久青青91| 91社区国产高清| 亚洲欧美日韩天堂| 精品亚洲一区二区三区四区五区| 国内揄拍国内精品少妇国语| 欧美夫妻性视频| 国产精品一区二区3区| 久久69精品久久久久久久电影好| 亚洲第一区中文99精品| 欧美精品第一页在线播放| 浅井舞香一区二区| 久久精品99久久久久久久久| 久久久免费精品视频| 国产精品嫩草视频| 日韩综合视频在线观看| 狠狠爱在线视频一区| 国模精品系列视频| 久久久久久久网站| 国产精品视频午夜| 国产精品69精品一区二区三区| 亚洲精品网站在线播放gif| 日韩最新在线视频| 岛国av午夜精品| 成人精品在线视频| 97国产精品视频人人做人人爱| 日韩av电影手机在线观看| 国产黑人绿帽在线第一区| 国产精品私拍pans大尺度在线| 日韩欧美主播在线| 欧美在线欧美在线| 精品亚洲国产成av人片传媒| 国产欧洲精品视频| 欧美一区三区三区高中清蜜桃| 日本最新高清不卡中文字幕| 国产亚洲精品成人av久久ww| 久久91亚洲精品中文字幕奶水| 久久91精品国产91久久跳| 中日韩美女免费视频网站在线观看| 午夜美女久久久久爽久久| 久久国产精品久久久久久| 国产精品狼人色视频一区| 亚洲欧美日韩中文在线制服| 国产日韩欧美视频| 在线日韩av观看| 久久成人国产精品| 久久亚洲电影天堂| 精品亚洲国产视频| 亚洲激情在线观看| 国产精品久久久久久久久借妻| 日韩高清人体午夜| xxx一区二区| 亚洲成人黄色在线观看| 国产日韩欧美夫妻视频在线观看| 国产精品高清在线| 久久久久久高潮国产精品视| 国产精品热视频| 欧美在线观看视频| 久久久国产精品x99av| 国产一区二区三区在线| 日韩高清不卡av| 欧美大胆a视频| 欧美片一区二区三区| 日韩在线激情视频| 日韩激情av在线免费观看| 亚洲的天堂在线中文字幕| 91高潮精品免费porn| 成人夜晚看av| 欧美黄色免费网站| 中文字幕精品一区二区精品| 日韩免费黄色av| 欧美丰满少妇xxxx| 欧日韩在线观看| 欧亚精品中文字幕| 精品欧美国产一区二区三区| 免费av一区二区| 久久国产精品久久久久久久久久| 日韩中文字幕免费| 亚洲自拍在线观看| 欧美日韩国产精品一区二区三区四区| 久久中文精品视频| 国产成人精品电影久久久| 国产成人精品av在线| 日韩经典中文字幕在线观看| 中文字幕不卡在线视频极品| 国模视频一区二区三区| 精品高清美女精品国产区|