Вверх ↑
Ответов: 223
Рейтинг: 24
#1: 2009-06-21 12:29:21 ЛС | профиль | цитата
Может это поможет

Add(Hashsum,11669152,316,105)
{
link(onResult,621927:doText,[])
}
Add(StrCat,15532344,262,105)
{
link(onStrCat,11669152:doHashsum,[])
link(Str1,16445262:Text,[])
link(Str2,1173363:Text,[(275,89)(314,89)])
}
Add(Button,16177721,215,162)
{
Left=14
Top=10
Color=12632256
Caption="Читаем"
link(onClick,13504553:doRead,[])
}
Add(Registry,13504553,366,162)
{
HKey=1
Key="Code"
Value="code"
link(onRead,3171426:doText,[])
link(Data,621927:Text,[])
}
Add(Edit,621927,366,105)
{
Left=75
Top=7
Width=235
Text=""
}
Add(Button,2645585,215,198)
{
Left=14
Top=32
Color=12632256
Caption="Запись"
link(onClick,13504553:doWrite,[(317,204)(317,175)])
}
Add(Edit,16445262,262,42)
{
Left=125
Top=60
Width=85
Text="Логин"
}
Add(Edit,1173363,308,42)
{
Left=260
Top=60
Width=90
Text="Пароль"
}
Add(Button,750690,217,105)
{
Left=15
Top=60
Caption="Занести"
link(onClick,15532344:doStrCat,[])
}
Add(If_else,10493087,365,252)
{
Op2=String(A765E63FFC6F0217EBA6CAC738735600)
link(onTrue,7488957:doMessage,[])
link(onFalse,1806044:doMessage,[(413,265)(413,298)])
}
Add(Registry,1542674,279,252)
{
HKey=1
Key="Code"
Value="code"
Point(doEnumKeys)
Point(onEnumKey)
link(onRead,10493087:doCompare,[])
}
Add(MainForm,15063601,154,35)
{
Height=164
}
Add(Message,1806044,430,292)
{
Message="не правельный"
Caption="Закрываем"
}
Add(Message,7488957,431,252)
{
Message="правельный"
Caption="Запуск"
}
Add(Button,13131513,217,252)
{
Left=10
Top=100
Width=80
Caption="проверка"
link(onClick,1542674:doRead,[])
}
Add(Edit,3171426,429,162)
{
Left=120
Top=102
Width=235
Text=""
}
Add(Shape,13889777,213,239)
{
Width=270
Height=102
Text="Сверяем"
Transparent=0
}
Add(Shape,6594341,206,36)
{
Width=277
Height=200
Transparent=0
}
Add(PointHint,3601182,384,36)
{
Info=#13:З а н о с и м|
Frame=2
Width=99
Height=25
}


карма: 0

0
файлы: 1code_13848.txt [1.9KB] [128]