Вверх ↑
Разработчик
Ответов: 26061
Рейтинг: 2120
#1: 2009-01-16 23:46:59 ЛС | профиль | цитата
А чего, вот так нельзя


Add(MainForm,2953706,294,280)
{
}
Add(StrList,8455902,357,329)
{
Strings=#8:1;afandi|5:2;id2|5:3;id3|5:4;id4|
Point(doGetIndex)
Point(onGetIndex)
Point(StrToFind)
Point(onGetString)
Point(doGetString)
link(onGetIndex,12138803:doCase,[])
link(StrToFind,10027621:Text,[])
}
Add(Edit,10027621,371,280)
{
Left=30
Top=10
Width=185
Text="4;id4"
}
Add(Memo,6206649,553,343)
{
Left=30
Top=70
Width=180
Height=160
}
Add(Button,14478309,301,371)
{
Left=30
Top=40
link(onClick,8455902:doGetIndex,[])
}
Add(Case,12138803,413,336)
{
Value=Integer(-1)
DataOnTrue=String(Клиент НЕ авторизован!)
link(onNextCase,1480986:doData,[])
link(onTrue,4863184:doWork2,[])
}
Add(DoData,1480986,469,336)
{
Data=String(Клиент авторизован!)
link(onEventData,4863184:doWork1,[(529,342)])
}
Add(HubEx,4863184,525,336)
{
link(onEvent,6206649:doAdd,[])
}


карма: 22

0