opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-14 18:12:05 +08:00
Code Issues Packages Projects Releases Wiki Activity

Restore old look of tooltips in grids and trees, like it was before the recent VirtualTree update.

Browse Source
This commit is contained in:
Ansgar Becker
2019-01-03 20:38:48 +01:00
parent 027f1b8669
commit ab67e03265
1 changed files with 5 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
source/apphelpers.pas
View File

@ -1486,7 +1486,11 @@ begin
VT.OnScroll := MainForm.AnyGridScroll; VT.OnScroll := MainForm.AnyGridScroll;
VT.OnMouseWheel := MainForm.AnyGridMouseWheel; VT.OnMouseWheel := MainForm.AnyGridMouseWheel;
VT.ShowHint := True; VT.ShowHint := True;
VT.HintMode := hmToolTip;
if toVariableNodeHeight in VT.TreeOptions.MiscOptions then
VT.HintMode := hmHint // Show cell contents with linebreakds in datagrid and querygrid's
else
VT.HintMode := hmTooltip; // Just a quick tooltip for clipped nodes
// Apply case insensitive incremental search event // Apply case insensitive incremental search event
if VT.IncrementalSearch <> VirtualTrees.isNone then if VT.IncrementalSearch <> VirtualTrees.isNone then
VT.OnIncrementalSearch := Mainform.AnyGridIncrementalSearch; VT.OnIncrementalSearch := Mainform.AnyGridIncrementalSearch;