Вверх ↑
Разработчик
Ответов: 26170
Рейтинг: 2127
#1: 2010-10-14 01:52:31 ЛС | профиль | цитата
Tad писал(а):
Да, а _event_onError у нас просто для мебели ?

Да, наверное для мебели
------------ Дoбавленo в 01.47:
Кажется я понял -- не закрывается транзакция, пока не закончится очередь событий. Надо вызывать анализ ошибки из другой транзакции



Add(Label,16376725,231,42)
{
Left=15
Top=15
Width=40
Height=20
Color=16777215
Font=[Tahoma,10,0,0,1]
Caption="Login"
AutoSize=1
Alignment=1
}
Add(MainForm,2953706,56,154)
{
Width=288
Height=130
Color=16777215
Caption="Регистрация"
BorderStyle=3
Position=1
}
Add(Edit,3557179,168,42)
{
Left=65
Top=15
Width=200
Color=16777215
Font=[Tahoma,10,0,0,1]
Text=""
}
Add(Label,4511899,399,42)
{
Left=15
Top=40
Width=40
Height=20
Color=16777215
Font=[Tahoma,10,0,0,1]
Caption="Pass"
AutoSize=1
Alignment=1
}
Add(Edit,8423193,343,42)
{
Left=65
Top=40
Width=200
Color=16777215
Font=[Tahoma,10,0,0,1]
Text=""
}
Add(Button,1789237,56,105)
{
Left=65
Top=65
Width=200
Height=25
Font=[MS Sans Serif,8,1,0,1]
Caption="Зарегистрироваться"
link(onClick,5055753:doCompare,[])
}
Add(Message,5109666,581,224)
{
Icon=1
}
Add(StyleXP,5418415,56,196)
{
}
Add(If_else,5055753,168,105)
{
Type=5
Op2=String()
link(onTrue,6133223:doValue,[])
link(onFalse,15349296:doWork2,[(217,118)(217,265)])
link(Op1,11406448:Var2,[])
}
Add(If_else,9234116,343,105)
{
Type=5
Op2=String()
link(onTrue,14926189:doHashsum,[])
link(onFalse,15349296:doWork1,[(387,118)(387,258)])
link(Op1,15707847:Var2,[])
}
Add(Memory,6133223,231,105)
{
Point(Data)
link(onData,9234116:doCompare,[])
link(Data,11406448:Var3,[(237,89)])
}
Add(GetDataEx,11406448,168,84)
{
link(Data,3557179:Text,[])
}
Add(GetDataEx,15707847,343,84)
{
link(Data,8423193:Text,[])
}
Add(StrList,16104221,490,210)
{
Strings=#22:Не заполнено поле Pass|23:Не заполнено поле Login|18:Ошибка записи в БД|14:Повторите ввод|18:Ошибка открытия БД|
Point(String)
Point(doGetString)
Point(onGetString)
link(onGetString,12491241:doEvent1,[])
}
Add(ChanelToIndex,15349296,434,252)
{
Count=5
link(onIndex,16104221:doGetString,[])
}
Add(Hashsum,14926189,399,105)
{
link(onResult,15593523:doEvent1,[(443,111)(443,166)(170,166)(170,328)])
link(Data,15707847:Var3,[(405,89)])
}
Add(InfoTip,5296874,105,21)
{
Info=#23:Проверка Login на пусто|
Width=169
Height=123
}
Add(InfoTip,7551163,287,21)
{
Info=#22:Проверка Pass на пусто|
Width=218
Height=123
}
Add(InfoTip,7362293,420,189)
{
Info=#6:Ошибки|
Width=204
Height=123
}
Add(FormatStr,3211383,231,336)
{
Mask="SELECT count() FROM LogsAndPass WHERE Login='%1' OR Pass='%2';"
Point(FString)
link(onFString,10006124:doOpen,[(276,342)(276,379)(106,379)(106,398)])
link(Str1,5134847:Var2,[])
}
Add(SQLite_DB,10006124,119,392)
{
FileName="data.db"
WaitClose=0
link(onOpen,573349:doEvent1,[])
link(onError,15349296:doWork5,[(171,405)(171,489)(424,489)(424,286)])
}
Add(SQLite_Exec,12729625,357,448)
{
link(onError,15349296:doWork3,[(405,454)(405,272)])
link(dbHandle,10006124:dbHandle,[(363,436)(125,436)])
link(SQL,13596474:FString,[])
}
Add(InfoTip,7824113,98,308)
{
Info=#47:Проверка на повтор и если нет повтора то запись|
VAlign=2
Width=358
Height=200
}
Add(SQLite_Query,13090410,224,392)
{
link(onQuery,7658787:doValue,[])
link(SQL,3211383:FString,[])
}
Add(If_else,16101148,287,448)
{
Op2=Integer(0)
link(onTrue,12729625:doExec,[])
link(onFalse,15349296:doWork4,[(414,461)(414,279)])
link(Op1,7658787:Value,[])
}
Add(FormatStr,13596474,364,322)
{
Mask="INSERT INTO LogsAndPass VALUES ('%1', '%2')"
Point(FString)
link(Str1,5134847:Var3,[(370,313)])
}
Add(GetDataEx,5134847,231,308)
{
link(Data,6133223:Value,[])
}
Add(Hub,15593523,182,322)
{
link(onEvent1,13596474:doString,[])
link(onEvent2,3211383:doString,[(214,335)(214,342)])
}
Add(Hub,12491241,539,217)
{
link(onEvent1,10006124:doClose,[(565,223)(565,527)(106,527)(106,405)])
link(onEvent2,5109666:doMessage,[])
}
Add(Hub,573349,189,392)
{
link(onEvent1,13090410:doQuery,[])
link(onEvent2,16101148:doCompare,[(215,405)(215,454)])
}
Add(Memory,7658787,287,392)
{
}

------------ Дoбавленo в 01.52:
К тому же, я только заметил, что ты сравниваешь в If типы String и Integer, что не есть правильно
карма: 22

1
Голосовали:Tad