漫画风格的Hint。
可设置背景和边框颜色。
可添加小图标。
可设置显示方向。
支持自绘画。
这里下载:AnyHint.zip
简介
把一个 TAnyHint 组件放入主窗体,就可以使
整个程序的所有提示具有漫画的效果,为您的程序增加趣味性。另外,使用内部的 TCariHint 类,可以在指定的
位置显示一个提示,就象下面的例子一样。
示例
//直接使用内部类 TCariHint
procedure
TForm1.Edit1Enter(Sender: TObject);
begin
with TCariHint.Create(Self) do
begin
Graphic.LoadFromResourceName(HInstance,'INFO');
ActivateHintPos('Any Library'#13#10'Visit http://www.anylib.com for more info.',
Edit1.ClientToScreen(Point(0,0)),6000);
end;
end;
