Add(MainForm,2953706,203,98)
{
Visible=1
Position=1
Point(doVisible)
link(onCreate,15591400:doPass,[])
}
Add(ChildFormEx,15591400,273,112)
{
link(onTrue,2953706:doVisible,[(334,118)(334,79)(181,79)(181,132)])
}
BEGIN_SDK
Add(EditMultiEx,7613607,21,21)
{
WorkCount=#6:doPass|
EventCount=#6:onTrue|
Width=356
link(doPass,420551:doShowModal,[(53,27)(53,146)])
}
Add(MainForm,420551,84,112)
{
Left=35
Top=105
Width=319
Height=119
Visible=1
Position=1
Point(doShowModal)
}
Add(Edit,2935332,161,56)
{
Left=20
Top=20
Width=260
Text=""
Password=0
link(onEnter,11712562:doHashsum,[(205,69)(205,37)(147,37)(147,125)])
}
Add(Hashsum,11712562,161,119)
{
link(onResult,11975890:doCompare,[])
link(Data,2935332:Text,[])
}
Add(If_else,11975890,231,119)
{
link(onTrue,8574456:doEvent1,[])
link(onFalse,12707242:doMessage,[(274,132)(274,160)])
link(Op2,726434:Value,[])
}
Add(Memory,726434,238,56)
{
@Hint=#17:Password HashSumm|
Default=String(E10ADC3949BA59ABBE56E057F20F883E)
AddHint(115,-25,118,13,@Hint)
}
Add(Hub,8574456,280,119)
{
link(onEvent1,420551:doClose,[(305,125)(305,27)(67,27)(67,139)])
link(onEvent2,7613607:onTrue,[(336,132)(336,27)])
}
Add(Message,12707242,315,154)
{
Message="Incorrect Password"
Caption="Error"
}
END_SDK
Пароль 123456. Вариант со статическим паролем. Для изменяемого надо проверять список HAshSumm, заготовленный ранее по допустимым паролям, или подставлять HashSumm извне



Поиск
Друзья
Администрация