关于TStatusBar的OnDrawPanel事件

Question

你的将statusbar的panle的style属性设为psOwnerDraw, OnDrawPanel才生效

Answer 1

例如你statusbar有3个panle，在属性面板中挨个给它们的style属性设为psOwnerDraw,
或者用代码设置
procedure TForm1.FormCreate(Sender: TObject);
var
  i: integer;
begin
  for i := 0 to statusbar1.Panels.Count - 1 do
  begin
    statusbar1.Panels[i].Style:=psOwnerDraw;
  end;
end;
也可以给只想重绘的panle设置psOwnerDraw，不需要重绘的保持psText

Answer 2

那我想问下，OnDrawPanel事件是什么时候执行的？为什么我调试时，没有调用此过程，程序也会进到这个事件里去？

Answer 3

大神 你再帮我看下这个问题，好久了，都不知道要怎么搞！
http://bbs.csdn.net/topics/390659539?page=1#post-396255380