如何自定义提示窗口(Hint Window)
2016-02-19 14:05
有一种朋友不在生活里，却在生命力；有一种陪伴不在身边，却在心间。图老师即在大家的生活中又在身边。这么贴心的服务你感受到了吗？话不多说下面就和大家分享如何自定义提示窗口(Hint Window)吧。
// 自定义 THintWindow 类
class TCcrunHintWindow : public THintWindow
{
bool FActivating;
__fastcall TCcrunHintWindow(TComponent* Owner)
: THintWindow(Owner)
{
Canvas-Font-Name = "宋体";
Canvas-Font-Color = clBlack;
Canvas-Font-Size = 9;
}
void __fastcall Paint(void)
{
TRect rect = ClientRect;
// Hint边框颜色
Canvas-Brush-Color = TColor(0xDBB8BA);
Canvas-FillRect(rect);
// 绘制整个Hint的边框
Canvas-Pen-Color = TColor(0x69230E);
Canvas-Rectangle(rect);
// Hint背景的颜色
Color = clWhite;
// Hint文字透明
Canvas-Brush-Style = bsClear;
// 绘出Hint文字
Canvas-Font-Color = clBlack;
Canvas-TextOut(4, int(rect.Bottom / 2)
- int(Canvas-TextHeight(Caption) / 2), Caption);
}
virtual void __fastcall NCPaint(HDC hdc)
{
// 63 63 72 75 6E 2E 63 6F 6D
Invalidate();
}
virtual void __fastcall CreateParams(TCreateParams &Params)
{
// 去掉Hint窗口的边框
Params.Style = Params.Style & ~WS_BORDER;
THintWindow::CreateParams(Params);
}
// Code by ccrun(老妖)，做人要厚道，转载请留名
virtual void __fastcall ActivateHint(const TRect &Rect, const String AHint)
{
FActivating = true;
try
{
Caption = AHint;
TRect r = Rect;
r.Left -= 10;
r.Right += 10;
r.Top -= 5;
r.Bottom += 5;
// 更新区域
UpdateBoundsRect(r);
// Hint窗口处于屏幕边缘时的调整
if(r.Top + Height Screen-DesktopHeight)
r.Top = Screen-DesktopHeight - Height;
if(r.Left + Width Screen-DesktopWidth)
r.Left = Screen-DesktopWidth - Width;
if(r.Left Screen-DesktopLeft)
r.Left = Screen-DesktopLeft;
if(r.Bottom Screen-DesktopTop)
r.Bottom = Screen-DesktopTop;
// 创建一个矩形
// 63 63 72 75 6E 2E 63 6F 6D
HRGN hrgn = CreateRectRgn(0, 0, r.Width(), r.Height());
// HRGN hrgn = CreateRoundRectRgn(0, 0, r.Width(), r.Height(), 4, 4);
// 设置指定句柄的窗口外形
SetWindowRgn(Handle, hrgn, true);
// 改变窗口的位置,Z Order,及其他一些属性
SetWindowPos(Handle, HWND_TOPMOST, r.Left, r.Top, r.Width(),
r.Height(), SWP_SHOWWINDOW SWP_NOACTIVATE);
// 重画窗口
Invalidate();
}
__finally
{
FActivating = false;
}
}
};
//---------------------------------------------------------------------------
// 实现代码
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
HintWindowClass = __classid(TCcrunHintWindow);
//
ShowHint = true;
Button1-Hint = "这是一个按钮";
Edit1-Hint = "这是一个文本框";
}
