Unzip progress dialog: missing keyboard navigation

[StatusQuo]

TC 7.5b6:
When unzipping a single zip file (Alt+F9, internal unzip) TC shows 3 buttons in the progress dialog:
Pause, Cancel, Background.
You can navigate through the buttons using TAB and cursor keys left/right and up/down.

When unzipping multiple zip files though the Background button is missing (what's OK),
just Pause and Cancel are there.
But you can't navigate through the buttons by keyboard in any way.

Expected:
Same keyboard navigation abilities also when there is no Background button.

[Boofo]

Support++

[ghisler(Author)]

Sorry, this isn't currently supported. Maybe in a later version.

[StatusQuo]

Improved, but not completely solved in TC 7.50pb8:

For internal unzip (and un-tgz):
- TAB works as expected (toggling between Pause and Cancel)
- Cursor keys (all directions) navigate to not existing buttons, e.g. right/down:
Cancel -> (invisible focus) -> (invisible focus) -> Pause

For external unrar:
No navigation possible yet.

For internal unrar:
All OK.

[ghisler(Author)]

Sorry, I could make it work for internal functions only. I'm using "TranslateMessage", which is normally not used for Delphi controls, but the only way to make it work here. I will move this to "will not be changed" now.

[StatusQuo]

Navigation with cursor keys is still strange in the internal dialog, too (where Tab key is working),
the focus also goes to the progress bars.

TButton3 (Cancel) => msctls_progress321 => msctls_progress322 => TButton1 (Pause)

AHK workaround, that fixes both internal and external unpack progress dialog navigation:

Code: Select all

#IfWinActive, ahk_class TDLG2FILEACTIONMIN
	Tab::
	+Tab::
	Right::
	Left::
	Up::
	Down::
		ControlGetFocus, tcud_sFocus
		if (tcud_sFocus = "TButton1")	; or (SubStr(tcud_sFocus, 17) = "msctls_progress32")
		{
			ControlFocus, TButton3	; Cancel
		} else {
			ControlFocus, TButton1	; Pause
		}
		Return