Как убрать всплывающие подсказки в TreeView

Previous  Top  Next

    
 

 

Code:

{

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;

 

©Drkb::01117

Взято с сайта: http://www.swissdelphicenter.ch

 

 


Автор: Eugene Mayevski

 

TCustomTreeView.WMNotify. О том, что такое тип notify'а TTM_NEEDTEXT пpочтешь в хелпе. Убpать хинты можно, пеpекpыв обpаботчик для этого уведомительного сообщения.

©Drkb::01114

http://delphiworld.narod.ru/

DelphiWorld 6.0