Вверх ↑
Ответов: 1536
Рейтинг: 176
#1: 2013-05-17 17:33:00 ЛС | профиль | цитата
RinniX писал(а):
У Леонид, заумно как-то!
Я, например, часто пользуюсь подобным алгоритмом.
Add(MainForm,2953706,210,63)
{
}
Add(Edit,11691394,210,119)
{
Left=65
Top=25
Width=210
link(onChange,8895335:doEvent1,[])
}
Add(Label,13069886,546,175)
{
Left=290
Top=25
Caption=""
}
Add(Str_Enum,3886399,301,126)
{
Delimiter=""
link(onEnum,13334760:doCompare,[])
link(onEndEnum,1977923:doOperation,[(347,139)(347,216)])
}
Add(StrMask,13334760,357,126)
{
Mask="#"
link(onFalse,7453646:doClear,[])
link(onTrue,12121445:doClear,[(400,139)(400,174)])
}
Add(Memory,7453646,441,119)
{
Default=Integer(1)
}
Add(Memory,12121445,448,161)
{
Default=Integer(2)
}
Add(StrList,1496625,497,168)
{
Strings=#0:|5:Текст|5:Цыфры|14:И то, и другое|
Point(doGetString)
Point(onGetString)
link(onGetString,13069886:doText,[])
}
Add(Math,1977923,441,210)
{
link(onResult,1496625:doGetString,[])
link(Op1,7453646:Value,[])
link(Op2,12121445:Value,[])
}
Add(Hub,9375891,357,84)
{
link(onEvent1,7453646:doValue,[(416,90)(416,125)])
link(onEvent2,12121445:doValue,[(407,97)(407,167)])
}
Add(Hub,8895335,259,119)
{
link(onEvent1,6039347:doData,[(284,125)(284,90)])
link(onEvent2,3886399:doEnum,[])
}
Add(DoData,6039347,301,84)
{
Data=Integer(0)
link(onEventData,9375891:doEvent1,[])
}
Вот, слегка упростил схему Леонида.
карма: 1
Не так страшна ошибка, как опасность её не заметить.

0