怎样去掉delphi 3中TreeView的Hint(100分)

当鼠标移动到 TreeView 上的 item 上时，会自动弹出暗示，
十分讨厌，如何清除?
另外，资源管理器 - 我的电脑中 Desktop 前面竟然没有虚
线，如何实现的?

在Delphi的菜单上，选择'目录及环境'选项,在第一个PageCard上就有与Hint有关
的复选框，点击它即可！

> 当鼠标移动到 TreeView 上的 item 上时，会自动弹出暗示，

当Item在横向不够显示才会自动弹出暗示， 提示Item 的完整内容。

在Delphi 4中只要将Treeview.ToolTips置为False即可关闭。

在Delphi 3 要自己用API
procedure TForm1.BitBtn1Click(Sender: TObject);
Var Va,style :Integer ;
begin
Va := $0080 ;
Style := GetWindowLong(treeview1.Handle, GWL_STYLE);
Style := Style or Va;
//注 如果要实现提示 用 Style := Style and not Va;
SetWindowLong(treeview1.Handle, GWL_STYLE, Style);
end;

> 另外，资源管理器 - 我的电脑中 Desktop 前面竟然没有虚
> 线，如何实现的?

Treeview1.Showroot := False ; //取消Root部分的虚线。

回答得很漂亮, 可以给分了

to seasky: 在 delphi3 中不是Item在横向不够显示才会自动弹出暗示，而是
指到 treenode 就会弹出暗示。d4 不存在此问题。你的代码解决了问题，会加
分的。
弟2问只是 items[0] 的前面没有竟然没有虚线，而其他是有的，再放几天看看

seasky 2答不是很好吗？

Treeview1.Showroot := False ; //取消Root部分的虚线。

Root当然也就是Items[0]呀。

在资源管理器中Desktop 是Root , 并且没有和它平级的。 我说的属性
就是管理Root的虚线属性的呀。

接受答案了.