[Vadikan]

AZJIO, отличная работа! Мы почти у цели Есть несколько пожеланий.

1. При выборе пункта из Избранного нужно автоматически переходить в раздел. Просто сейчас раздел просто добавляется в историю, но его нужно вручную выбирать из конца списка. Делать его активным в поле ввода, пожалуй, не нужно.

2. Предлагаю снова перегруппировать меню: Избранное, История, Regedit, ?. История - Экспорт, Восстановить, Размер.

3. Восстановить историю должно выводить ошибку, если не найден файл: Файл JumpRegSet.reg не найден. Он создается командой 'Экспорт'.

4. Из справки, пожалуй, можно убрать упоминание про менеджер реестра. А вот ссылки можно сделать гипер. Я тут нашел скрипт, почему-то в справке не обнаружил. OSzone тоже можно указать, наверное

читать дальше »

Код:

;===============================================================================
;
; Function Name:    _GuiCtrlCreateHyperlink()
; Description:    Creates a label that acts as a hyperlink
;
; Parameter(s):  $s_Text       - Label text
;                  $i_Left        - Label left coord
;                  [$i_Top]   - Label top coord
;                   [$i_Width]    - Label width
;                  [$i_Height]    - Label height
;                   [$i_Color]    - Text Color
;                   [$s_ToolTip]  - Hyperlink ToolTip
;                   [$i_Style]    - Label style
;                   [$i_ExStyle]  - Label extended style
;
; Requirement(s):   None
; Return Value(s):  Control ID
;
; Author(s):        Saunders <krawlie@hotmail.com>
;
;===============================================================================

Func _GuiCtrlCreateHyperlink($s_Text, $i_Left, $i_Top, $i_Width = -1, $i_Height = -1, $i_Color = 0x0000ff, $s_ToolTip = '', $i_Style = -1, $i_ExStyle = -1)
    Local $i_CtrlID
    $i_CtrlID = GUICtrlCreateLabel($s_Text, $i_Left, $i_Top, $i_Width, $i_Height, $i_Style, $i_ExStyle)
    If $i_CtrlID <> 0 Then
        GUICtrlSetFont($i_CtrlID, -1, -1, 4)
        GUICtrlSetColor($i_CtrlID, $i_Color)
        GUICtrlSetCursor($i_CtrlID, 0)
        If $s_ToolTip <> '' Then
            GUICtrlSetTip($i_CtrlID, $s_ToolTip)
        EndIf
    EndIf
    
    Return $i_CtrlID
EndFunc  ;==>_GuiCtrlCreateHyperlink

Добавлю еще кое-что. Мы пообщались с Morpheus и консенсус таков, что мигание регедита напрягает Т.е. нужно встраивать консольный regjump.exe, чтобы этого избежать. Правильная строка запуска

Код:

Run(@ComSpec & " /c " & 'regjump.exe '&$comboreg0, "", @SW_HIDE)

Ну и надо закомментировать строки 151-154.

Мы также протестировали 64-разрядную версию (в обоих вариантах). В принципе, все работает, но история не отображается в списке (хотя в реестр пишется). Мне кажется, что имеет смысл использовать вариант с MRU, который предлагал Yashied тут. В итоге получится интересный вариант от всех инициативных лиц