Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Ветеран


Сообщения: 825
Благодарности: 50

Профиль | Отправить PM | Цитировать


Maza Faka, Sorry. У меня работает! Вот еще сократил. Оставил одну вкладку и все почистил.
Код: Выделить весь код
;Автор скрипта: NikLok (http://forum.oszone.net/member.php?u=15218)
; 12 March 2008 - SRISA _ LNM
#include <GuiConstants.au3>
AutoItSetOption("TrayIconDebug",1)
AutoItSetOption("SendKeyDelay",40)

Opt("WinWaitDelay",100)
Opt("WinTitleMatchMode",4)
Opt("WinDetectHiddenText",1)
Opt("MouseCoordMode",0)

Global $CfgFile = "winnt.sif"
Global $AccessOpt_state=$GUI_CHECKED
Global $Appsrv_console_state=$GUI_UNCHECKED
Global $Aspnet_state=$GUI_UNCHECKED

$hGUI = GuiCreate("WIndows XP winnt.Sif managers - feesh 0.0.1", 1020, 620)

$LoadButton   = GUICtrlCreateButton("Load", 600, 5, 80, 25 )
$SaveButton   = GUICtrlCreateButton("Save", 700, 5, 80, 25 )
$ExitButton   = GUICtrlCreateButton("Exit", 800, 5, 80, 25 )
$AcceptButton = GUICtrlCreateButton("Ok",   500, 5, 60, 25)
$CancelButton = GUICtrlCreateButton("Cancel",900,5, 60, 25)

GuiCtrlCreateTab(30, 10, 960, 590)
GuiCtrlCreateTabItem("Components")
;CreateGUI
$AccessOpt = GUICtrlCreateCheckbox("AccessOpt",35,50,210,15)
GUICtrlSetState($AccessOpt,$AccessOpt_State)
$Appsrv_console = GUICtrlCreateCheckbox("Appsrv_console",35,90,210,15)
GUICtrlSetState($Appsrv_console,$Appsrv_console_State)
$Aspnet = GUICtrlCreateCheckbox("Aspnet",35,130,210,15)
GUICtrlSetState($Aspnet,$Aspnet_State)

; GUI MESSAGE LOOP
GuiSetState()
While 1
    $msg = GUIGetMsg()
    Switch $msg
    Case $GUI_EVENT_CLOSE, $CancelButton
        ExitLoop
    Case $AcceptButton
        ExitLoop
    EndSwitch
WEnd
Exit
Нужно провести по чекбоксам и увидите.

Отправлено: 16:35, 13-03-2008 | #224