statusbar学习(2)—在statusbar上显示图标和自动以颜色
来源:互联网 发布:json解析乱码 编辑:程序博客网 时间:2024/06/07 02:46
procedure TForm2.FormCreate(Sender: TObject);
begin
StatusBar1.Panels[0].Style := psOwnerDraw;
StatusBar1.Panels[1].Style := psOwnerDraw;
end;
procedure TForm2.StatusBar1DrawPanel(StatusBar: TStatusBar;
Panel: TStatusPanel; const Rect: TRect);
begin
with StatusBar.Canvas do
begin
case Panel.Index of
0:
begin
Brush.Color := clRed;
Font.Color := clNavy;
Font.Style := [fsBold];
end;
1:
begin
Brush.Color := clYellow;
Font.Color := clTeal;
Font.Style := [fsItalic];
end;
end;
FillRect(Rect);
TextRect(Rect, 2 + ImageList1.Width + Rect.Left, 2 + Rect.Top, Panel.Text);
end;
// draw graphics
ImageList1.Draw(StatusBar1.Canvas, Rect.Left, Rect.Top, Panel.Index);
end;
- statusbar学习(2)—在statusbar上显示图标和自动以颜色
- 如何修改状态栏Statusbar(SystemUI)图标和字体颜色
- 把控件的Hint显示在StatusBar上
- UIImagePickerController自动修改statusbar文字颜色
- iOS自定义statusbar上icon的颜色
- StatusBar
- statusbar
- StatusBar
- statusBar
- StatusBar
- statusbar—上通知条
- 个性化定制statusBar,UINavigationBar背景和颜色
- Android Wi-Fi StatusBar(状态栏)流量上下行图标显示流程
- Android StatusBar增加图标
- iOS statusBar 颜色问题
- 自定义statusbar颜色
- 设置statusBar的颜色
- 修改StatusBar颜色
- java exception java异常汇总(2)
- QuickCSharp框架开发(10)------进一步地完善验证方法(验证部分)
- SQL SERVER 和EXCEL的数据导入导出
- 中国空军真正实现大发展
- 传递数组给函数
- statusbar学习(2)—在statusbar上显示图标和自动以颜色
- DAY0|WINDOWSXP环境下硬盘安装UBUNTU9.10
- Java语言引出泛型的好处是保险简略
- Java语言引出泛型的好处是保险简略
- 遥感成像原理与遥感图像特征
- 继承中多态和拷贝构造函数
- IQuit
- c++学习方法11
- NHibernate实体映射文件生成模版(MyGeneration)