On Fri, 30 Jun 2017 11:59:56 +0300
Alexey via Lazarus wrote:
> procedure TCustomTreeView.MouseLeave;
> begin
>FStates:=FStates-[tvsDblClicked,tvsTripleClicked,tvsQuadClicked,
> tvsEditOnMouseUp,tvsSingleSelectOnMouseUp];
>if Assigned(FHintWnd) and FHintWnd.Visible
>
procedure TCustomTreeView.MouseLeave;
begin
FStates:=FStates-[tvsDblClicked,tvsTripleClicked,tvsQuadClicked,
tvsEditOnMouseUp,tvsSingleSelectOnMouseUp];
if Assigned(FHintWnd) and FHintWnd.Visible
and not PtInRect(ClientRect, ScreenToClient(Mouse.CursorPos)) then
FHint