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

lcl: don't start immediate drag on dock header click

Browse Source 
git-svn-id: trunk@20063 -
This commit is contained in:
paul 2009-05-20 03:47:00 +00:00
parent 7761318ad8
commit ce9041ea17
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/ldocktree.pas
View File

@ -507,7 +507,7 @@ begin
case APart of case APart of
ldhpAll, ldhpCaption: ldhpAll, ldhpCaption:
// mouse down on not buttons => start drag // mouse down on not buttons => start drag
AControl.BeginDrag(True); AControl.BeginDrag(False);
end; end;
end; end;