[Окна, Диалоги] Диалоговые окна

[Dinis124]

Версия AutoIt: 3.3.10.2

Описание:
Найден рабочий пример, на основе которого и решено писать скрипт далее, кое что с него вырезано кое что добавлено. Требуется создать в исходном примере ссылку на переход и открытие другого диалогового окна, на подобие "О программе" без обратной ссылки с кнопкой закрытия. Так же прошу пояснить, по этому же скпипту, имеется ли возможность скрыть или убрать стандартные кнопки Gui свернуть-развернуть-закрыть в правом углу.
Пример сокращенного кода:

#include <GUIConstantsEx.au3>
 
Example()
Func Example()
    Local $msg
    GUICreate("Пример",250,100) ; Создаёт окно в центре экрана
    GUICtrlCreateCombo("", 5, 5)
    GUICtrlSetData(-1, "Пример1|Пример2|Пример3|Пример4|Пример5|Пример6", "Пример7") ; -1 последняя использованная переменная
    $nLabel = GUICtrlCreateLabel("Описание и пояснение",15,40)
    GUICtrlSetTip(-1,"Всплывающая подсказка")
    GUISetState() ; показывает созданное окно с установленным фокусом на Combo
        ; This will create a tooltip in the upper left of the screen
; Запускается цикл опроса GUI до тех пор пока окно не будет закрыто
    While 1
        $msg = GUIGetMsg()
        If $msg = $GUI_EVENT_CLOSE Then ExitLoop
    WEnd
EndFunc

Примечания:

 

[madmasles]

Предупреждение

За нарушение правил форума (пункт В.11):

Любые отрывки AutoIt кода необходимо заключать в тег [autoit]

(подробнее), а обычный код соответственно в тег [code]

(подробнее). Также большие выдержки текста помещайте под тег [spoiler]

(подробнее), там где это поддерживается естественно. Как в случае с названием темы, также короткое и эргономичное сообщение привлекает больше внимания, и шансы на получение конкретного ответа увеличиваются.

С уважением, ваш Глобальный модератор.

 

[InnI]

#include <GUIConstantsEx.au3>

Example()
Func Example()
    Local $Underlined
    $GUI = GUICreate("Пример", 250, 100, -1, -1, 0x00400000) ; $WS_DLGFRAME
    GUICtrlCreateCombo("", 5, 5)
    GUICtrlSetData(-1, "Пример1|Пример2|Пример3|Пример4|Пример5|Пример6", "Пример7") ; -1 последняя использованная переменная
    $nLabel = GUICtrlCreateLabel("Описание и пояснение", 15, 40, 150)
    GUICtrlSetFont(-1, 9)
    GUICtrlSetColor(-1, 0x0000FF)
    GUICtrlSetTip(-1,"Всплывающая подсказка")
    GUISetState() ; показывает созданное окно с установленным фокусом на Combo
        ; This will create a tooltip in the upper left of the screen
; Запускается цикл опроса GUI до тех пор пока окно не будет закрыто
    While 1
        Switch GUIGetMsg()
          Case $GUI_EVENT_CLOSE
            ExitLoop
          Case $nLabel
            MsgBox(64, "О программе", "Информация о программе", 0, $GUI)
        EndSwitch
        If GUIGetCursorInfo($GUI)[4] = $nLabel Then
          If Not $Underlined Then
            GUICtrlSetFont($nLabel, 9, 0, 4)
            $Underlined = True
          EndIf
        Else
          If $Underlined Then
            GUICtrlSetFont($nLabel, 9)
            $Underlined = False
          EndIf
        EndIf
    WEnd
EndFunc