bcb如何实现气球提示？

[andyho1107]

想让输入控件弹出气球提示，不知道bcb有没有现成的方法调用，如果没有，不知道该如何实现呢？

[andyho1107]

谢谢haiqian119，不过我想要的是在输入控件的地方弹出一个气球提示，而不是在任务栏那里弹出气球提示。

[ydlchina]

http://www.ccrun.com/article.asp?i=642&d=u7p4j5

[myy]

http://delphiarea.com/products/tooltips/

[andyho1107]

请问楼上，那个pas文件下载下来之后怎么用呢？我不是很熟悉这个。我的程序是C++编写的dll。

[海嵌]

void __fastcall TForm1::Label5MouseEnter(TObject *Sender)
{
NOTIFYICONDATA IconData = {0};
IconData.cbSize = sizeof(NOTIFYICONDATA);
IconData.hWnd = this->Handle;
IconData.uID = 0;
IconData.uFlags = NIF_INFO | NIF_ICON | NIF_TIP | NIF_MESSAGE;
IconData.hIcon=Application->Icon->Handle;

lstrcpy(IconData.szInfo, TEXT("有人和你说话！"));
lstrcpy(IconData.szInfoTitle, TEXT("张胜强"));
IconData.uTimeout = 15000; // in milliseconds
IconData.dwState = NIS_SHAREDICON;
IconData.dwStateMask = 0;
IconData.dwInfoFlags = NIF_INFO;
IconData.uCallbackMessage = WM_USER+100;//这是一个自定义消息，当你在提示框上按下鼠标后，
//会给IconData.hWnd发这个自定义消息，
//其lParam是NIN_BALLOONUSERCLICK，如此你可以响应这个消息。
Shell_NotifyIcon(NIM_ADD, &IconData); //显示提示框
//Shell_NotifyIcon(NIM_DELETE, &IconData);//删除提示框
}