Вверх ↑
Ответов: 188
Рейтинг: 2
#1: 2019-01-16 12:47:37 ЛС | профиль | цитата
Tad писал(а):
Ошибку сделал специально.

Я это сразу земетил.
малость доработал))

Add(MainForm,13172333,126,322)
{
Width=797
Height=374
Visible=1
Position=1
Point(onClose)
Point(doShowModal)
link(onCreate,13179759:doEvent1,[])
}
Add(Button,8993294,217,392)
{
Left=690
Top=10
Width=75
Font=[MS Sans Serif,8,1,0,1]
Caption="UPDATE"
link(onClick,7667942:doEvent1,[])
}
Add(StrList,6193653,392,343)
{
Point(doGetString)
Point(onGetString)
link(onGetString,2479743:doSplit,[])
}
Add(For,1910295,301,406)
{
Start=3
link(onEvent,6193653:doGetString,[(363,412)(363,377)])
link(onStop,6418945:doDelete,[])
link(End,6193653:Count,[(314,390)(405,390)])
}
Add(MultiStrData,2479743,441,350)
{
Char=","
From=1
Count=1
link(onPart1,4324985:doString,[])
}
Add(FormatStr,4324985,490,350)
{
DataCount=3
Mask="%1=%1%3%2,"
link(onFString,5706406:doStrCat,[])
link(Str2,8571458:EditText,[(503,331)(489,331)])
link(Str3,16349255:Var1,[(510,296)(524,296)])
}
Add(StrCat,5706406,539,350)
{
Point(doClear)
link(Str1,13425065:Var1,[(545,338)(532,338)(532,388)])
}
Add(Delete,6418945,539,413)
{
Count=1
Direction=1
link(onDelete,8361769:doString,[])
link(Str,13425065:Var2,[])
}
Add(FormatStr,8361769,588,413)
{
Mask="UPDATE price SET %1 WHERE vid_rabot="%2" ;"
link(onFString,15791570:doEvent1,[])
link(Str2,238159:EditText,[(601,327)(335,327)])
}
Add(MT_String,688585,315,343)
{
Delimeter=","
link(onResult,6193653:doAdd,[])
}
Add(DSC_Query,351101,259,343)
{
SQL="pragma table_info(price);"
DSManager="parent.parent.global"
link(onQuery,688585:doStr,[])
link(onColumns,6193653:doClear,[])
}
Add(Memo,3009810,686,413)
{
Left=20
Top=40
Width=750
Height=280
}
Add(GetDataEx,13425065,539,383)
{
link(Data,5706406:Result,[])
}
Add(ComboBox,238159,315,287)
{
Left=115
Top=10
Width=155
Height=21
ReadOnly=0
Point(EditText)
}
Add(DSC_Query,12791313,266,287)
{
SQL="SELECT naimenovanie FROM vid_rabot;"
DSManager="parent.parent.global"
link(onQuery,238159:doAdd,[])
link(onColumns,238159:doClear,[])
}
Add(Hub,13179759,217,336)
{
link(onEvent1,12791313:doQuery,[(249,342)(249,293)])
link(onEvent2,351101:doQuery,[])
}
Add(ComboBox,8571458,469,280)
{
Left=490
Top=10
Height=21
Strings=#1:0|2:20|2:50|
ReadOnly=0
Point(EditText)
}
Add(Label,13674496,182,287)
{
Left=25
Top=15
Width=90
Height=17
Font=[MS Sans Serif,8,1,16711680,1]
Caption="Вид работ"
AutoSize=1
Alignment=1
}
Add(Label,4569099,427,280)
{
Left=420
Top=15
Width=63
Height=17
Font=[MS Sans Serif,8,1,16711680,1]
Caption="Сумма"
AutoSize=1
Alignment=1
}
Add(Hub,7667942,259,392)
{
OutCount=3
link(onEvent1,5706406:doClear,[(527,398)(527,363)])
link(onEvent2,3009810:doClear,[(669,405)(669,426)])
link(onEvent3,1910295:doFor,[])
}
Add(DSC_Exec,3397730,686,455)
{
DSManager="parent.parent.global"
link(onExec,1352640:doMessage,[(751,461)(751,433)])
link(onError,14134584:doMessage,[(744,468)(744,496)])
}
Add(Hub,15791570,630,413)
{
link(onEvent1,3009810:doAdd,[])
link(onEvent2,3397730:doExec,[(660,426)(660,461)])
}
Add(Message,14134584,770,490)
{
}
Add(Message,1352640,784,427)
{
Message="Запрос выполнен. ожидайте 10 мин. процесс происходит без индикации!"
Caption="Внимание!"
Icon=4
}
Add(ComboBox,4804176,462,182)
{
Left=295
Top=10
Width=110
Height=21
Strings=#9:Прибавить|6:Отнять|8:Умножить|6:Делить|
Text="математический оператор"
Point(Index)
link(onClick,16349255:doWork1,[(506,195)(506,216)])
}
Add(MultiElement,16349255,518,210)
{
link(Data1,4804176:Index,[(524,198)(503,198)(503,226)(482,226)])
}
BEGIN_SDK
Add(EditMulti,406527,21,21)
{
WorkCount=1
DataCount=1
VarCount=1
Width=706
Height=494
link(doWork1,11370421:doEvent,[(49,27)(49,118)])
link(Var1,6236579:Var,[(27,393)(321,393)])
}
Add(IndexToChanel,11370421,77,112)
{
Count=4
Point(Index)
link(onEvent1,8489596:doWork1,[])
link(onEvent2,8489596:doWork2,[])
link(onEvent3,8489596:doWork3,[])
link(onEvent4,8489596:doWork4,[])
link(Index,406527:Data1,[(83,63)(27,63)])
}
Add(Memory,12844391,224,49)
{
Default=String(+)
}
Add(Memory,7395151,322,56)
{
Default=String(-)
}
Add(Memory,9047176,364,49)
{
Default=String(*)
}
Add(Memory,11484163,427,119)
{
Default=String(/)
}
Add(GetIndexData,6236579,315,182)
{
Count=4
link(Data1,12844391:Value,[(321,132)(230,132)])
link(Data2,7395151:Value,[])
link(Data3,9047176:Value,[(335,138)(370,138)])
link(Data4,11484163:Value,[(342,170)(433,170)])
}
Add(ChanelToIndex,8489596,133,112)
{
Count=4
link(onIndex,6236579:doIndex,[(198,118)(198,188)])
}
END_SDK

выбор арифметического оператора)

--- Добавлено в 2019-01-16 12:48:52

А вообще ты прав, по поводу прайса. Буду новую структуру рисовать. Более логичную что-ли.

--- Добавлено в 2019-01-16 12:54:03

А вообще кучи этих элементов можно было бы избежать если доработать компоненты добавить еще точку с помощью которой переключать на следующий элемент массива и так пока они не закончатся
 Add(ArrayEnum,14276055,266,602){
}
и
 Add(MT_Enum,2126823,518,602)
{
}

и хотя бы этот
Add(MT_MTArrayEnum,2854284,385,595)
{
}

карма: 0

0
Редактировалось 5 раз(а), последний 2019-01-16 13:01:34