<div dir="ltr"><div class="gmail_default" style="font-size:small">Hi All,</div><div class="gmail_default" style="font-size:small"><br></div><div class="gmail_default" style="font-size:small">We created a class CUserInterface and subclassed all of our forms from there and did the following.  Widgets have tabStop (should tab stop here) and tabOrder, they respond to hasTabFocus:  and implement onTabFocus and onTabExit, which basically add or remove highlights the field, sents the keyboard focus, (and tells the screen reader for blind users to read the field name).   </div><div class="gmail_default" style="font-size:small"><br></div><div class="gmail_default" style="font-size:small">CUserInterface >> onTab<br>      | allElements selectedElement i |<br>     allElements := SortedCollection sortBlock: [:a :b | a tabOrder < b tabOrder].<br>      self allElementsDo: [:a |<br>   (a tabStop and: [a tabOrder > -1]) ifTrue: [<br>      allElements add: a<br>   ].<br> ].<br>    i := 0.<br>       selectedElement := allElements detect: [:a | i := i + 1. a hasTabFocus = true] ifNone: [nil].<br> selectedElement ifNotNil: [:a | a hasTabFocus: false].<br>        (allElements at: (i+1) ifAbsent: [allElements first]) hasTabFocus: true.<br></div><div class="gmail_default" style="font-size:small"><br></div><div class="gmail_default" style="font-size:small">There is also a onShiftTab to go backwards.  </div><div class="gmail_default" style="font-size:small"><br></div><div class="gmail_default" style="font-size:small">onShiftTab<br>   | allElements selectedElement i |<br>     allElements := SortedCollection sortBlock: [:a :b | a tabOrder < b tabOrder].<br>   self allElementsDo: [:a |<br>   (a tabStop and: [a tabOrder > -1]) ifTrue: [<br>      allElements add: a<br>   ].<br>].<br>      i := 0.<br>       selectedElement := allElements detect: [:a | i := i + 1. a hasTabFocus = true] ifNone: [nil].<br> selectedElement ifNotNil: [:a | a hasTabFocus: false].<br>        (allElements at: (i-1) ifAbsent: [allElements last]) hasTabFocus: true.<br></div><div class="gmail_default" style="font-size:small"><br></div><div class="gmail_default" style="font-size:small">All the best,</div><div class="gmail_default" style="font-size:small"><br></div><div class="gmail_default" style="font-size:small">Ron Teitelbaum</div></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">On Mon, Aug 3, 2020 at 4:30 AM Marcel Taeumel <<a href="mailto:marcel.taeumel@hpi.de">marcel.taeumel@hpi.de</a>> wrote:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><div id="gmail-m_4347999870772448291__MailbirdStyleContent" style="font-size:10pt;font-family:Arial;color:rgb(0,0,0)">Hi all!<div></div><div><br></div><div>> <span style="font-family:sans-serif;font-size:13px">A related topic might be the absence of tab navigation in Squeak. In many GUI systems there is a key to move the focus to the next widget, mostly the tab key. There is no such thing in Squeak, is it?</span></div><div><span style="font-family:sans-serif;font-size:13px"><br></span></div><div><span style="font-family:sans-serif;font-size:13px">It's not working. But here are code fragments:</span></div><div><span style="font-family:sans-serif;font-size:13px"><br></span></div><div><span style="font-family:sans-serif;font-size:13px">Morph >> #tabAmongFields</span></div><div><span style="font-family:sans-serif;font-size:13px">Morph >> #tabHitWithEvents:</span></div><div><span style="font-family:sans-serif;font-size:13px"><br></span></div><div><span style="font-family:sans-serif;font-size:13px">Also browse senders of both.</span></div><div><span style="font-family:sans-serif;font-size:13px"><br></span></div><div><span style="font-family:sans-serif;font-size:13px">If I would implement it, I would do it as an event filter but only for Pluggable*Morph classes. The tool builder can then install those filters after building the widgets. Note that there is #keyboardFocusDelegate, which configures calls to HandMorph >> #newKeyboardFocus:. There is also #hasKeyboardFocus:.</span></div><div><span style="font-family:sans-serif;font-size:13px"><br></span></div><div><span style="font-family:sans-serif;font-size:13px">Best,</span></div><div><span style="font-family:sans-serif;font-size:13px">Marcel</span></div></div><br>
</blockquote></div>