Здравствуйте!
Есть форма:
1 Вопрос: При изменении пункта в $Cultur как автоматически изменять значения в $N $P $K? Каждому пункту в $Cultur соответсвуют значения $N $P $K, их надо будет вывести в форму.
2 Вопрос: Возможно ли при нажатии на кнопку $AddPole добавлять еще часть формы
. Тоисть, добавлять еще рядок для ввода данных.
Надеюсь на Вашу помощь! Спасибо!
Есть форма:
Код:
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=D:\ЦентрДержРодючість\Програми\Баланс\Balans.kxf
$Balans = GUICreate("Balans", 924, 200, 192, 124)
$AddPole = GUICtrlCreateButton("Поле +", 8, 8, 75, 25)
$Calculate = GUICtrlCreateButton("Порахувати", 96, 8, 75, 25)
$Export = GUICtrlCreateButton("Експорт", 184, 8, 75, 25)
$PoleNum = GUICtrlCreateInput("№ Поля", 16, 48, 65, 21)
$Cultur = GUICtrlCreateCombo("Культура", 88, 48, 145, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUICtrlSetData(-1, "Пшениця озима (богара)|Пшениця озима (зрош)|Жито озиме")
$Area = GUICtrlCreateInput("Площа", 240, 48, 65, 21)
$Urozh = GUICtrlCreateInput("Урож.", 312, 48, 65, 21)
$Vynos = GUICtrlCreateGroup("Винос 1ц / кг", 384, 32, 153, 41)
$N = GUICtrlCreateInput("N", 392, 48, 41, 21)
$P = GUICtrlCreateInput("P", 440, 48, 41, 21)
$K = GUICtrlCreateInput("K", 488, 48, 41, 21)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Passport = GUICtrlCreateGroup("Паспорт поля", 544, 32, 201, 41)
$VmistPozh = GUICtrlCreateInput("Вміст пож. реч.", 552, 48, 89, 21)
$Schilnist = GUICtrlCreateInput("Щільність зл.", 648, 48, 89, 21)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Dostupna = GUICtrlCreateGroup("Доступна", 752, 32, 153, 41)
$NDost = GUICtrlCreateInput("N", 760, 48, 41, 21)
$PDost = GUICtrlCreateInput("P", 808, 48, 41, 21)
$KDost = GUICtrlCreateInput("K", 856, 48, 41, 21)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
1 Вопрос: При изменении пункта в $Cultur как автоматически изменять значения в $N $P $K? Каждому пункту в $Cultur соответсвуют значения $N $P $K, их надо будет вывести в форму.
2 Вопрос: Возможно ли при нажатии на кнопку $AddPole добавлять еще часть формы
Код:
$PoleNum = GUICtrlCreateInput("№ Поля", 16, 48, 65, 21)
$Cultur = GUICtrlCreateCombo("Культура", 88, 48, 145, 25, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
GUICtrlSetData(-1, "Пшениця озима (богара)|Пшениця озима (зрош)|Жито озиме")
$Area = GUICtrlCreateInput("Площа", 240, 48, 65, 21)
$Urozh = GUICtrlCreateInput("Урож.", 312, 48, 65, 21)
$Vynos = GUICtrlCreateGroup("Винос 1ц / кг", 384, 32, 153, 41)
$N = GUICtrlCreateInput("N", 392, 48, 41, 21)
$P = GUICtrlCreateInput("P", 440, 48, 41, 21)
$K = GUICtrlCreateInput("K", 488, 48, 41, 21)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Passport = GUICtrlCreateGroup("Паспорт поля", 544, 32, 201, 41)
$VmistPozh = GUICtrlCreateInput("Вміст пож. реч.", 552, 48, 89, 21)
$Schilnist = GUICtrlCreateInput("Щільність зл.", 648, 48, 89, 21)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Dostupna = GUICtrlCreateGroup("Доступна", 752, 32, 153, 41)
$NDost = GUICtrlCreateInput("N", 760, 48, 41, 21)
$PDost = GUICtrlCreateInput("P", 808, 48, 41, 21)
$KDost = GUICtrlCreateInput("K", 856, 48, 41, 21)
Надеюсь на Вашу помощь! Спасибо!