在Delphi中制作分行提示

软件世界

山水 · 2004年11月22日

　　Delphi中大部分控件都有一个实用的Hint属性，即浮动条提示。比如开发的程序界面为英文，需要做中文提示，就可以在这里设置。但如果提示较长就需要分行显示，如何使浮动提示条分行显示呢？很简单，Hint本身是一个字符串(string)， Delphi显示该字符串时会自动处理其中的回车控制符，所以只要在适当的地方加上回车控制符就能达到目的。依此原理，我们还能做出别具一格的垂直提示条。

　　示例：

　　1.新建一个应用程序，在窗体上添加Label1。

　　2.在窗体的OnShow事件中写代码：

　　procedure TForm1.FormShow(Sender: TObject);

　　begin

　　Label1.ShowHint:=true;

　　Label1.Hint :='分'+#13+'行'+#13+'提'+#13+'示';

　　end;