定时刷文字内容,颜色也经常变换,如何实现呢?

解决方案 »

  1.   


        statusbar1.Panels[0].Style :=psOwnerDraw;
        statusbar1.Canvas.font.Color :=clred;
        statusbar1.Canvas.brush.style:=bsclear;
        statusbar1.Canvas.TextOut(2,2,'This is sample');
      

  2.   

    用一个timer来控制输入的内容
      

  3.   

    Canvas.clear
    或者使用空的进行覆盖也可以啊
      

  4.   

    每次写之前先擦除就可以了,如果要滚动效果就联系我,我给你一个控件,邮箱:[email protected]