QB64/InForm
QB64/InForm
1
1
Fork 0
mirror of https://github.com/FellippeHeitor/InForm.git synced 2025-01-14 19:49:33 +00:00
Code Issues Releases Wiki Activity

Prevent controls from getting focus if inside a hidden container.

Browse source 
Closes #92.
This commit is contained in:
FellippeHeitor 2019-02-09 14:15:44 -02:00
parent e178ed331a
commit d9c688ded7
1 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
InForm/InForm.ui
View file

@ -717,8 +717,10 @@ SUB __UI_ProcessInput
FOR i = 1 TO UBOUND(Control)
IF Control(i).ID > 0 AND Control(i).Type <> __UI_Type_MenuItem AND ((Control(i).Hidden = False AND __UI_DesignMode = False) OR (__UI_DesignMode = True)) THEN
IF Control(i).Type = __UI_Type_ContextMenu AND __UI_DesignMode AND __UI_ShowInvisibleControls = False THEN _CONTINUE
IF Control(i).Hidden = True AND __UI_ShowInvisibleControls = False THEN _CONTINUE
Control(i).HoveringVScrollbarButton = 0
IF Control(i).ParentID > 0 THEN
IF Control(Control(i).ParentID).Hidden = True THEN _CONTINUE
ContainerOffsetTop = Control(Control(i).ParentID).Top
ContainerOffsetLeft = Control(Control(i).ParentID).Left
'First make sure the mouse is inside the container: