Вверх ↑
Этот топик читают: Гость
Гость
Ответов: 17029
Рейтинг: 0
#1: 2013-04-01 16:53:57 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-03 00:11:52
карма: 0

0
Ответов: 8926
Рейтинг: 823
#2: 2013-04-01 17:54:36 ЛС | профиль | цитата
85.132.99.203, code_30737.txt
карма: 19

0
файлы: 1code_30737.txt [1.2KB] [244]
Гость
Ответов: 17029
Рейтинг: 0
#3: 2013-04-01 18:09:05 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-03 00:11:53
карма: 0

0
Ответов: 8926
Рейтинг: 823
#4: 2013-04-01 18:29:58 ЛС | профиль | цитата
85.132.99.203, записывайте в реестр или в собственный *.ini файл
code_30738.txt
карма: 19

0
файлы: 1code_30738.txt [1.7KB] [307]
Гость
Ответов: 17029
Рейтинг: 0
#5: 2013-04-01 18:30:12 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-03 00:12:11
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#6: 2013-04-01 18:37:51 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-03 00:12:11
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#7: 2013-04-01 19:05:04 ЛС | профиль | цитата
Леонид, ещё MD5 добавить.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 8926
Рейтинг: 823
#8: 2013-04-01 19:18:04 ЛС | профиль | цитата
Tad, тест:
dontknow.gif
карма: 19

0
файлы: 1dontknow.gif [274B] [317]
Разработчик
Ответов: 26160
Рейтинг: 2127
#9: 2013-04-01 19:42:44 ЛС | профиль | цитата
Берем схему Леонида и прилепляем к ней контроль по MD5

Add(MainForm,591829,175,203)
{
Point(onClose)
link(onCreate,3918034:doEvent1,[(214,223)(214,209)])
link(onClose,12671262:doSave,[])
}
Add(Button,15833385,168,329)
{
Left=20
Top=50
Width=100
Height=22
Caption="Войти"
link(onClick,6021352:doEvent1,[])
}
Add(Edit,15115653,357,266)
{
Left=5
Top=21
Width=255
Text="12345"
Password=0
ClearAfterEnter=1
link(onEnter,6021352:doEvent2,[(445,279)(445,412)(235,412)(235,342)])
}
Add(If_else,4658087,329,329)
{
Op2=String(12345)
link(onTrue,10768938:doOff,[])
link(onFalse,14200650:doEvent1,[])
link(Op2,12332918:Item,[(342,306)(293,306)])
}
Add(Hub,6021352,245,329)
{
InCount=2
OutCount=1
link(onEvent1,14238770:doHashsum,[])
}
Add(Message,14951369,406,371)
{
Message="пароль введен не верно!"
Icon=3
}
Add(Edit,6925702,357,189)
{
Left=55
Top=180
Width=100
Text="54321"
}
Add(Button,10100688,168,273)
{
Left=20
Top=155
Width=165
Caption="Установить новый пароль"
link(onClick,16430796:doHashsum,[])
}
Add(LED,10768938,406,322)
{
Left=185
Top=80
ColorOff=32768
Value=0
}
Add(Hub,14200650,371,336)
{
link(onEvent1,10768938:doOn,[])
link(onEvent2,14951369:doMessage,[(396,349)(396,377)])
}
Add(StrList,12671262,273,189)
{
FileName="pw.ini"
Strings=#32:827CCB0EEA8A706C4C34A16891F84E7B|
}
Add(ArrayRW,12332918,287,266)
{
link(Array,12671262:Array,[])
link(Index,1355439:Value,[(300,249)(321,249)])
}
Add(Memory,1355439,315,189)
{
Default=Integer(0)
}
Add(Hub,3918034,224,203)
{
link(onEvent1,12671262:doLoad,[(263,209)(263,223)])
link(onEvent2,12332918:doRead,[(249,216)(249,272)])
}
Add(Hashsum,14238770,280,329)
{
link(onResult,4658087:doCompare,[])
link(Data,15115653:Text,[(286,320)(363,320)])
}
Add(Hashsum,16430796,217,273)
{
link(onResult,12332918:doWrite,[])
link(Data,6925702:Text,[(223,257)(363,257)])
}


карма: 22

0
9
Сообщение
...
Прикрепленные файлы
(файлы не залиты)