pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

* Update header state when mouse leaves control

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2581 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
blikblum
2012-10-23 02:46:27 +00:00
parent 1e31f8c41d
commit 2bfd559a3a
1 changed files with 9 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
components/virtualtreeview-new/branches/4.8/VirtualTrees.pas
View File

@ -10109,6 +10109,15 @@ begin
hsHeightTracking, hsHeightTrackPending]; hsHeightTracking, hsHeightTrackPending];
end; end;
// hovering, mouse leave detection // hovering, mouse leave detection
CM_MOUSELEAVE:
with FColumns do
begin
if FHoverIndex > NoColumn then
Invalidate(Items[FHoverIndex]);
FHoverIndex := NoColumn;
FClickIndex := NoColumn;
FDownIndex := NoColumn;
end;
//todo: see the difference to below //todo: see the difference to below
LM_MOUSEMOVE: LM_MOUSEMOVE:
with TLMMouseMove(Message), FColumns do with TLMMouseMove(Message), FColumns do