装扮工具提示条

页面导航:首页 > 软件编程 > Delphi > 装扮工具提示条

装扮工具提示条

来源: 作者: 时间:2016-02-05 11:47 【

Delphi技巧之 装扮工具提示条什么是工具提示条?在Windows程序中,当鼠标移动到工具条相应的按钮上时,会弹出一个小窗口来说明该按钮的作用,这个小窗口就叫做工具提示条。一般情况

 

 Delphi技巧之

装扮工具提示条

什么是工具提示条?在Windows程序中,当鼠标移动到工具条相应的按钮上时,会弹出一个小窗口来说明该按钮的作用,这个小窗口就叫做工具提示条。一般情况下它的背景色为淡黄色,字体色为黑色。面对这样千篇一律的面孔不知你是不是有些厌烦,是否想过给它化化妆,使其改头换面呢?下面我们就以Delphi为工具,对它动些小手术。

Delphi中,我们可以设置控件的HintShowHint属性来显示工具提示条。当然,这并不是我们所希望的效果。幸好DelphiApplication对象中给我们提供了HintColor属性,用它可以设置工具提示条的背景颜色。在程序主窗体的创建事件中写入Application.HintColor:=clRed,然后运行一下,怎么样?效果不错吧,背景变成红色了。接下来的问题是,我们如何来改变显示文字的颜色。(嗯,让我好好想想)

Delphi中有一个THintWindow类,看名字就知道它是干什么的了。不错,Delphi就是通过它来实现工具提示条的。在它的创建方法(Create)中只有四条语句:

Constructor THintWindow.Create(AOwner: TComponent);

Begin

  Inherited Create (AOwner);

  Color := $80FFFF;

  Canvas.Font := Screen.HintFont;

  Canvas.Brush.Style := bsClear;

End;

它首先重载了父类的创建方法,然后设置了背景颜色、字体和画刷样式。从这里可以设想一下,如果我们创建一个THintWindow的派生类,并重载它的创建方法,然后在此方法中重新定义字体,不就实现了我们所希望的效果吗?那就让我们行动起来吧。

Tags:

相关文章

    文章评论

    最 近 更 新
    热 点 排 行
    Js与CSS工具
    代码转换工具
    
    <