Что нового

[Элементы GUI] заблокированные поля ввода

mashino

Новичок
Сообщения
21
Репутация
0
привет. Имеется главное окно, оттуда по кнопке вызывается простенькая форма для ввода пользовательских данных.
Почему-то заблокирована большая часть полей ввода. Не могу понять что не так делаю. Подскажите пожалуйста
Код:
Код:
#Include <GUIConstantsEx.au3>
 #include <ButtonConstants.au3>
#Region Main form
$hMain_GUI = GUICreate("Form1", 644, 151, 500, 442)
GUISetBkColor(0xFFFFFF)
$nPrefs_Btn = GUICtrlCreateButton("Настройка", 8, 8, 89, 33)
$nD1_Btn = GUICtrlCreateButton("Проверить модуль", 115, 8, 105, 33)
$nExit_Btn = GUICtrlCreateButton("Exit", 128, 110, 89, 33)
$btnStart = GUICtrlCreateButton("Start", 8, 110, 89, 33)

;$LogList = GUICtrlCreateList("",260,8,360,140)
#EndRegion Main form

#Region Settings form
$hSettings_GUI = GUICreate("Form2", 413, 298, 351, 216)

$nStngs_Save_Btn = GUICtrlCreateButton("Save", 8, 256, 89, 33)
$nStngs_Load_Btn = GUICtrlCreateButton("Load", 165, 256, 89, 33)
$nStngs_Close_Btn = GUICtrlCreateButton("Close", 320, 256, 89, 33)

$lb1 = GUICtrlCreateLabel('$lb1',8, 8, 120, 45 )
$ed_1 = GUICtrlCreateInput(1, 20, 30, 35, 18);поле ввода
$ed_2 = GUICtrlCreateInput(2, 60, 30, 35, 18);поле ввода

$lb2 = GUICtrlCreateLabel('$lb2', 8, 115, 150, 35)
$ed_3 = GUICtrlCreateInput(3, 20, 135, 35, 18)
$ed_4 = GUICtrlCreateInput(4, 60, 135, 35, 18)
$ed_5 = GUICtrlCreateInput(5, 60, 160, 35, 18)

$lb3 = GUICtrlCreateLabel('$lb3', 270, 8, 240, 35)
$ed_6 = GUICtrlCreateInput(6, 275, 30, 35, 18)
$ed_7 = GUICtrlCreateInput(7, 315, 30, 35, 18)

$lb4 = GUICtrlCreateLabel('$lb4', 240, 197, 150, 30)
$ed_8 = GUICtrlCreateInput(8, 275, 220, 35, 18)
$ed_9 = GUICtrlCreateInput(9, 315, 220, 35, 18)

$lb5 = GUICtrlCreateLabel('$lb5', 178, 65, 150, 35)
$ed_10 = GUICtrlCreateInput(10, 178, 85, 35, 18)
$ed_11 = GUICtrlCreateInput(11, 218, 85, 35, 18)


$lb6 = GUICtrlCreateLabel('$lb6', 8, 65, 150, 35)
$ed_12 = GUICtrlCreateInput(12, 20, 85, 35, 18)
$ed_13 = GUICtrlCreateInput(13, 60, 85, 35, 18)


$lb7 = GUICtrlCreateLabel('$lb7', 178, 115, 150, 35)
$ed_14 = GUICtrlCreateInput(14, 178, 135, 35, 18)
$ed_15 = GUICtrlCreateInput(15, 218, 135, 35, 18)



#EndRegion Settings form



    GUISetState(@SW_SHOW,$hMain_GUI)


	While 1
    $aMsg = GUIGetMsg(1)
    Switch $aMsg[0]
        Case $GUI_EVENT_CLOSE, $nExit_Btn, $nStngs_Close_Btn	;exit is here
            If $aMsg[1] = $hMain_GUI Or $aMsg[0] = $nExit_Btn Then
                Exit
            EndIf

            If $aMsg[1] = $hSettings_GUI Or $aMsg[0] = $nStngs_Close_Btn Then
                GUISetState(@SW_HIDE, $hSettings_GUI)
				WinActivate("Form1")
            EndIf

		Case $nPrefs_Btn	;OPEN SETTINGS
            GUISetState(@SW_SHOW, $hSettings_GUI)

	EndSwitch
	Wend

Запускаем->Настройка-> окно Form2
доступны только 5,8,9 поля ввода. остальные "заблокированы"
Хотя определены в коде одинаково.

Премного благодарен за советы
 

Fever

Скриптер
Сообщения
308
Репутация
112
Ваши лэйблы перекрывали инпуты, потому так и получилось, следите за шириной и высотой элементов. :smile:

Код:
#Include <GUIConstantsEx.au3>
 #include <ButtonConstants.au3>
#Region Main form
$hMain_GUI = GUICreate("Form1", 644, 151, 500, 442)
GUISetBkColor(0xFFFFFF)
$nPrefs_Btn = GUICtrlCreateButton("Настройка", 8, 8, 89, 33)
$nD1_Btn = GUICtrlCreateButton("Проверить модуль", 115, 8, 105, 33)
$nExit_Btn = GUICtrlCreateButton("Exit", 128, 110, 89, 33)
$btnStart = GUICtrlCreateButton("Start", 8, 110, 89, 33)

;$LogList = GUICtrlCreateList("",260,8,360,140)
#EndRegion Main form

#Region Settings form
$hSettings_GUI = GUICreate("Form2", 413, 298, 351, 216)

$nStngs_Save_Btn = GUICtrlCreateButton("Save", 8, 256, 89, 33)
$nStngs_Load_Btn = GUICtrlCreateButton("Load", 165, 256, 89, 33)
$nStngs_Close_Btn = GUICtrlCreateButton("Close", 320, 256, 89, 33)

$lb1 = GUICtrlCreateLabel('$lb1',8, 8)
$ed_1 = GUICtrlCreateInput(1, 20, 30, 35, 18);поле ввода
$ed_2 = GUICtrlCreateInput(2, 60, 30, 35, 18);поле ввода

$lb2 = GUICtrlCreateLabel('$lb2', 8, 115)
$ed_3 = GUICtrlCreateInput(3, 20, 135, 35, 18)
$ed_4 = GUICtrlCreateInput(4, 60, 135, 35, 18)
$ed_5 = GUICtrlCreateInput(5, 60, 160, 35, 18)

$lb3 = GUICtrlCreateLabel('$lb3', 270, 8)
$ed_6 = GUICtrlCreateInput(6, 275, 30, 35, 18)
$ed_7 = GUICtrlCreateInput(7, 315, 30, 35, 18)

$lb4 = GUICtrlCreateLabel('$lb4', 240, 197)
$ed_8 = GUICtrlCreateInput(8, 275, 220, 35, 18)
$ed_9 = GUICtrlCreateInput(9, 315, 220, 35, 18)

$lb5 = GUICtrlCreateLabel('$lb5', 178, 65)
$ed_10 = GUICtrlCreateInput(10, 178, 85, 35, 18)
$ed_11 = GUICtrlCreateInput(11, 218, 85, 35, 18)


$lb6 = GUICtrlCreateLabel('$lb6', 8, 65)
$ed_12 = GUICtrlCreateInput(12, 20, 85, 35, 18)
$ed_13 = GUICtrlCreateInput(13, 60, 85, 35, 18)


$lb7 = GUICtrlCreateLabel('$lb7', 178, 115)
$ed_14 = GUICtrlCreateInput(14, 178, 135, 35, 18)
$ed_15 = GUICtrlCreateInput(15, 218, 135, 35, 18)



#EndRegion Settings form



    GUISetState(@SW_SHOW,$hMain_GUI)


    While 1
    $aMsg = GUIGetMsg(1)
    Switch $aMsg[0]
        Case $GUI_EVENT_CLOSE, $nExit_Btn, $nStngs_Close_Btn    ;exit is here
            If $aMsg[1] = $hMain_GUI Or $aMsg[0] = $nExit_Btn Then
                Exit
            EndIf

            If $aMsg[1] = $hSettings_GUI Or $aMsg[0] = $nStngs_Close_Btn Then
                GUISetState(@SW_HIDE, $hSettings_GUI)
                WinActivate("Form1")
            EndIf

        Case $nPrefs_Btn    ;OPEN SETTINGS
            GUISetState(@SW_SHOW, $hSettings_GUI)

    EndSwitch
    Wend
 

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8,673
Репутация
2,486
mashino

[info border=#0000ff float=left]На форуме принято помечать тему решенной после получения ответа на свой вопрос!
Вверху или внизу темы нажмите на ссылку такого вида:
package_old.gif
Тема не решена
[/info]
 
Верх