if Active and FDispTabOrder and not HookSvcs.IsDesignRoot(WinControl) and
not HookSvcs.IsDesignContainer(WinControl) and
(csDesigning in WinControl.ComponentState) and Assigned(WinControl.Parent)
and (WinControl.Owner is TWinControl) and IsWindowVisible(WinControl.Handle) then
begin