.
Нужно следующее:
1. в начальный момент времени кнопка неактивна.
2 только при заполнении всех полей ввода она активируется
3. при нажатии на активируемую кнопку, происходит событие для записи в БД и очищаются поля ввода.
Выкладываю что наделал, правда тут 3 поля, в реальном проекте их 13.
Короче нужна помощь или правильное направление для решения..
Make(delphi)
ver(4.05 build 186)
Add(MainForm,2953706,21,105)
{
Width=666
Height=693
}
Add(Button,4573931,490,287)
{
Left=92
Top=162
Width=140
Font=[MS Sans Serif,8,1,0,1]
Caption="Сохранить в БД"
Point(doEnabled)
link(onClick,15479712:doEvent1,[(527,293)(527,286)])
}
Add(Hub,15479712,532,280)
{
link(onEvent1,9545359:doWork1,[(558,286)(558,277)(398,277)])
}
Add(Edit,12628318,245,161)
{
Left=15
Top=35
Text=""
}
Add(Edit,561928,294,161)
{
Left=15
Top=105
Text=""
}
Add(ComboBox,10894054,343,147)
{
Left=15
Top=160
Height=21
Strings=#2:12|2:23|2:34|
Point(EditText)
}
Add(BitsToInt,7748796,287,287)
{
Count=3
link(onNumber,233264:doCompare,[])
link(Bit1,12628318:Text,[(293,212)(251,212)])
link(Bit2,561928:Text,[])
link(Bit3,10894054:EditText,[(307,239)(363,239)])
}
Add(If_else,233264,350,287)
{
Type=5
Op2=Integer(7)
link(onTrue,9545359:doWork3,[(398,293)])
link(onFalse,15581685:doWork2,[])
}
Add(ChanelToIndex,15581685,427,287)
{
link(onIndex,4573931:doEnabled,[])
}
Add(HubEx,9545359,394,280)
{
link(onEvent,15581685:doWork1,[(414,286)(414,293)])
}
Поиск
Друзья
Администрация