Mega Code Archive

 

Categories / Delphi / VCL

 

How to disable the TreeView Hint

Title: How to disable the TreeView Hint Question: How to disable the TreeView Hint Answer: procedure HideTreeViewHint(hTreeView: THandle; bHide: bool = true); begin if bHide then begin // Hide the Hint. SetWindowLong(hTreeView, GWL_STYLE, GetWindowLong(hTreeView,GWL_STYLE) or $80); end else begin // Show the Hint. SetWindowLong(hTreeView, GWL_STYLE, GetWindowLong(hTreeView,GWL_STYLE) and not $80); end; end; Example: // To Hide; procedure TForm.HideClick(Sender: TObject); begin HideTreeViewHint(TreeView.Handle); end; // To Show procedure TForm.HideClick(Sender: TObject); begin HideTreeViewHint(TreeView.Handle, false); end;