Как убрать всплывающие подсказки в TreeView
Falk0ner, вс, 06/07/2008 - 15:34.
Как убрать всплывающие подсказки в TreeView
{
If you have installed the Internet Explorer 4.0 or high, in TTreeView component
always displaying a hint for cutted items. It's useful but sometimes prevents and
irritates (at least, me). But there is a simple way to switch off this feature:
}
procedure TForm1.FormShow(Sender: TObject);
const
TVS_NOTOOLTIPS = $0080;
begin
SetWindowLong(Treeview1.Handle, GWL_STYLE,
GetWindowLong(TreeView1.Handle, GWL_STYLE) xor TVS_NOTOOLTIPS);
end;
If you have installed the Internet Explorer 4.0 or high, in TTreeView component
always displaying a hint for cutted items. It's useful but sometimes prevents and
irritates (at least, me). But there is a simple way to switch off this feature:
}
procedure TForm1.FormShow(Sender: TObject);
const
TVS_NOTOOLTIPS = $0080;
begin
SetWindowLong(Treeview1.Handle, GWL_STYLE,
GetWindowLong(TreeView1.Handle, GWL_STYLE) xor TVS_NOTOOLTIPS);
end;
Взято с сайта: http://www.swissdelphicenter.ch
Автор: Eugene Mayevski
TCustomTreeView.WMNotify. О том, что такое тип notify'а TTM_NEEDTEXT пpочтешь в хелпе. Убpать хинты можно, пеpекpыв обpаботчик для этого уведомительного сообщения.
http://delphiworld.narod.ru/
DelphiWorld 6.0
Отправить комментарий