英雄无敌5地狱英雄哪个:statusbar学习(2)—在statusbar上显示图标和自动以颜色 - SUNSTO...

来源：百度文库编辑：九乡新闻网时间：2024/10/06 15:07:58

statusbar学习(2)—在statusbar上显示图标和自动以颜色收藏
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; 本文来自CSDN博客，转载请标明出处：http://blog.csdn.net/sunstone/archive/2009/11/13/4809128.aspx

statusbar学习(2)—在statusbar上显示图标和自动以颜色 - SUNSTO... Excel单元格自动调整字符大小以完全显示内容如何在电脑时间上再显示星期几和显示姓名【电脑知识】如何在电脑时间上再显示星期几和显示姓名 "显示桌面"图标衣饰颜色搭配图标衣饰颜色搭配图标.. 衣饰颜色搭配图标衣饰颜色搭配图标 ! 衣饰颜色搭配图标学习笔记——HTML背景颜色和背景图片 extbuilder插件自动生成代码在jsp中显示 U盘插在电脑上没显示2 让CorelDRAW和Illustrator、Photoshop颜色显示一致的方法衣饰颜色搭配图标飞衣饰颜色搭配图标5 衣饰颜色搭配图标sdf 衣饰颜色搭配图标0 如何在收藏夹里显示自己的图标 - 小狐狸(FOX)的日志 - 网易博客【代码学习】怎样在图片上加flash和文字怎样在任务栏上显示星期几？在IE上显示自己的名字在IE上显示自己的名字在IE上显示自己的名字