paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-06 09:00:33 +02:00
Code Issues Packages Projects Releases Wiki Activity

LCL: formatting

Browse Source 
git-svn-id: trunk@45877 -
This commit is contained in:
mattias 2014-07-15 12:56:05 +00:00
parent b3adaef7a3
commit d44a2412b8
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lcl/include/treeview.inc
View File

@ -5169,8 +5169,8 @@ begin
begin
// mousedown occured on expand sign -> expand/collapse
CursorNode.Expanded:=not CursorNode.Expanded;
end else
if LogicalX >= CursorNode.DisplayIconLeft then
end
else if LogicalX >= CursorNode.DisplayIconLeft then
begin
// mousedown occured in text or icon
// -> select node and begin drag operation