пример авторизации без использования компонентов вкладки MRA
Add(MainForm,14923284,336,119)
{
Width=617
Height=416
link(onCreate,1914739:doWork1,[])
}
Add(TCP_Client,14856684,721,259)
{
link(onRead,14090909:doEvent1,[])
link(onConnect,14856684:doSend,[(771,272)(771,302)(709,302)(709,279)])
link(onDisconnect,12847959:doWork3,[(762,279)(762,297)(949,297)])
link(IP,1914739:Var1,[])
link(Data,7191482:Value,[(734,247)(682,247)(682,303)(664,303)])
link(Port,1914739:Var2,[(741,212)(734,212)])
}
Add(Button,14962059,336,252)
{
Left=30
Top=20
Caption="connect"
link(onClick,1931414:doWork1,[])
}
Add(Stream2Hex,12773608,560,252)
{
Mode=3
link(onResult,5332646:doEvent1,[])
}
Add(Memory,7191482,658,259)
{
link(onData,14856684:doOpen,[])
}
Add(Stream2Hex,6150605,812,259)
{
Mode=5
link(onResult,2301140:doCompare,[])
}
Add(Hub,5332646,609,252)
{
link(onEvent1,7001567:doConvert,[(641,258)(641,195)])
link(onEvent2,7191482:doValue,[])
}
Add(Memo,8656376,1092,189)
{
Left=30
Top=50
Width=540
Height=100
ScrollBars=2
}
Add(Stream2Hex,7001567,1029,189)
{
Mode=5
link(onResult,8656376:doAdd,[])
}
Add(HubEx,12847959,945,259)
{
link(onEvent,885846:doAdd,[])
}
Add(Memory,15108513,504,119)
{
Default=String(EFBEADDE0E0001000200000038100000%dlen%000000000000000000000000000000000000000000000000%mail%%pass%010000000D0000005354415455535F4F4E4C494E4503000000264D4C0C000000616E646D6C2E6F72672E7275FF030000450000006E616D653D22264D4C22207469746C653D22264D4C222076657273696F6E3D22302E312E3620625F3122206275696C643D223134222070726F746F636F6C3D22312E313422)
}
Add(Edit,14199846,511,161)
{
Left=145
Top=20
Width=145
Text=""
}
Add(Edit,10638138,518,203)
{
Left=340
Top=20
Width=175
Text=""
}
Add(MultiElement,1931414,504,252)
{
link(onEvent1,12773608:doConvert,[])
link(Data1,15108513:Value,[])
link(Data2,14199846:Text,[])
link(Data3,10638138:Text,[])
}
BEGIN_SDK
Add(EditMulti,1087012,21,21)
{
EventCount=1
WorkCount=1
DataCount=3
Width=706
Height=326
link(doWork1,14065067:doEvent1,[(42,27)(42,97)])
}
Add(Replace,14807320,98,182)
{
SubStr="%mail%"
link(onReplace,6541999:doReplace,[])
link(Str,1087012:Data1,[(104,74)(27,74)])
link(Dest,8780050:Var2,[])
}
Add(Replace,6541999,161,182)
{
SubStr="%pass%"
link(onReplace,2450767:doWork1,[])
link(Dest,7476449:Var1,[])
}
Add(MultiElement,12035283,112,91)
{
@IsLib=True
link(Data1,1087012:Data2,[(118,56)(34,56)])
}
BEGIN_SDK
Add(EditMulti,1704855,21,21)
{
WorkCount=1
DataCount=1
VarCount=1
Width=811
Height=410
link(doWork1,1861887:doLength,[(35,27)(35,146)])
link(Var1,4643906:Value,[(27,351)(699,351)])
}
Add(Length,1861887,49,140)
{
link(onLength,11877087:doConvert,[])
link(Str,7369682:Var2,[])
}
Add(Stream2Hex,10652,581,238)
{
Mode=2
link(onResult,14127129:doStrCat,[])
link(Data,7369682:Var3,[(587,103)])
}
Add(Convertor,11877087,98,140)
{
Mode=6
link(onResult,15200020:doValue,[])
}
Add(Length,14263963,189,140)
{
link(onLength,449228:doCompare,[])
}
Add(If_else,449228,238,140)
{
Type=1
Op2=Integer(8)
link(onTrue,11170798:doOperation,[])
}
Add(Math,11170798,287,140)
{
OpType=1
Op1=8
link(onResult,3959218:doFor,[])
}
Add(StrCat,7123033,532,140)
{
Point(doClear)
link(Str2,6368846:Var3,[(545,128)(554,128)(554,183)])
}
Add(For,3959218,336,140)
{
IncludeEnd=1
link(onEvent,5296326:doData,[])
link(onStop,16527600:doEvent1,[(408,153)(408,244)])
link(End,11170798:Result,[(349,128)(325,128)(325,184)(293,184)])
}
Add(DoData,5296326,427,140)
{
Data=Integer(0)
link(onEventData,7123033:doStrCat,[])
}
Add(Memory,15200020,147,140)
{
link(onData,14263963:doLength,[])
}
Add(StrCat,3643019,532,238)
{
Point(doClear)
link(onStrCat,10652:doConvert,[])
link(Str1,15200020:Value,[(538,205)(153,205)])
link(Str2,6368846:Var2,[])
}
Add(Hub,16527600,448,238)
{
OutCount=4
link(onEvent1,3643019:doStrCat,[])
link(onEvent2,3643019:doClear,[])
link(onEvent3,7123033:doClear,[(480,258)(480,153)])
link(onEvent4,14127129:doClear,[(485,265)(485,293)(624,293)(624,251)])
}
Add(GetDataEx,6368846,539,178)
{
Angle=3
link(Data,7123033:Result,[(538,183)])
}
Add(StrCat,14127129,637,238)
{
Point(doClear)
link(onStrCat,4643906:doValue,[])
link(Str1,3643019:Result,[(643,226)(599,226)(599,284)(538,284)])
}
Add(GetDataEx,7369682,49,98)
{
link(Data,1704855:Data1,[(55,60)(27,60)])
}
Add(Memory,4643906,693,238)
{
Default=String(EFBEADDE0E000100020000003810000098000000000000000000000000000000000000000000000000000000%mail%%pass%010000000D0000005354415455535F4F4E4C494E4503000000264D4C0C000000616E646D6C2E6F72672E7275FF030000450000006E616D653D22264D4C22207469746C653D22264D4C222076657273696F6E3D22302E312E3620625F3122206275696C643D223134222070726F746F636F6C3D22312E313422)
}
END_SDK
Add(MultiElement,7476449,175,98)
{
elink(12035283)
link(Data1,1087012:Data3,[(181,60)(41,60)])
}
Add(Hub,14065067,63,91)
{
OutCount=3
link(onEvent1,12035283:doWork1,[])
link(onEvent2,7476449:doWork1,[])
link(onEvent3,14807320:doReplace,[(87,111)(87,188)])
}
Add(GetDataEx,8780050,112,147)
{
link(Data,12035283:Var1,[])
}
Add(MultiElement,2450767,238,182)
{
link(onEvent1,1087012:onEvent1,[(498,188)(498,27)])
link(Data1,8780050:Var3,[(244,152)])
}
BEGIN_SDK
Add(EditMulti,14307582,21,21)
{
EventCount=1
WorkCount=1
DataCount=1
VarCount=1
Width=643
Height=396
link(doWork1,3112547:doValue,[(59,27)(59,167)])
}
Add(MultiElement,6915274,525,161)
{
}
BEGIN_SDK
Add(EditMulti,1704855,21,21)
{
WorkCount=1
VarCount=1
Width=741
Height=410
link(doWork1,1861887:doLength,[(35,27)(35,146)])
link(Var1,4643906:Value,[(27,351)(601,351)])
}
Add(Length,1861887,49,140)
{
link(onLength,11877087:doConvert,[])
}
Add(Convertor,11877087,98,140)
{
Mode=6
link(onResult,15200020:doValue,[])
}
Add(Length,14263963,189,140)
{
link(onLength,11170798:doOperation,[])
}
Add(Math,11170798,287,140)
{
OpType=1
Op1=8
link(onResult,3959218:doFor,[])
}
Add(StrCat,7123033,532,140)
{
Point(doClear)
link(Str2,6368846:Var3,[(545,128)(554,128)(554,183)])
}
Add(For,3959218,336,140)
{
IncludeEnd=1
link(onEvent,5296326:doData,[])
link(onStop,16527600:doEvent1,[(408,153)(408,244)])
link(End,11170798:Result,[(349,128)(325,128)(325,184)(293,184)])
}
Add(DoData,5296326,427,140)
{
Data=Integer(0)
link(onEventData,7123033:doStrCat,[])
}
Add(Memory,15200020,147,140)
{
link(onData,14263963:doLength,[])
}
Add(StrCat,3643019,532,238)
{
Point(doClear)
link(onStrCat,4643906:doValue,[])
link(Str1,15200020:Value,[(538,205)(153,205)])
link(Str2,6368846:Var2,[])
}
Add(Hub,16527600,448,238)
{
OutCount=3
link(onEvent1,3643019:doStrCat,[])
link(onEvent2,3643019:doClear,[])
link(onEvent3,7123033:doClear,[(480,258)(480,153)])
}
Add(GetDataEx,6368846,539,178)
{
Angle=3
link(Data,7123033:Result,[(538,183)])
}
Add(Memory,4643906,595,238)
{
Default=String(EFBEADDE0E000100020000003810000098000000000000000000000000000000000000000000000000000000%mail%%pass%010000000D0000005354415455535F4F4E4C494E4503000000264D4C0C000000616E646D6C2E6F72672E7275FF030000450000006E616D653D22264D4C22207469746C653D22264D4C222076657273696F6E3D22302E312E3620625F3122206275696C643D223134222070726F746F636F6C3D22312E313422)
}
END_SDK
Add(Position,15588212,147,161)
{
ShortSearch=1
link(onSearch,1872228:doLength,[])
link(Target,14307582:Data1,[(160,91)(27,91)])
}
Add(Copy,11057517,308,161)
{
Position=1
link(onCopy,3478421:doConvert,[])
link(Str,14299762:Var2,[])
link(Position,15588212:Position,[(321,149)(237,149)(237,205)(153,205)])
}
Add(Stream2Hex,3478421,357,161)
{
Mode=3
link(onResult,9579594:doEvent1,[])
}
Add(Length,1872228,210,161)
{
link(onLength,11057517:doCopy,[])
link(Str,14041555:Var2,[])
}
Add(GetDataEx,14041555,210,98)
{
Angle=3
link(Data,3112547:Value,[(117,103)(117,205)(104,205)])
}
Add(Hub,9579594,455,161)
{
link(onEvent1,6915274:doWork1,[])
link(onEvent2,5868472:doReplace,[(490,174)(490,237)])
}
Add(GetDataEx,14299762,308,112)
{
link(Data,14041555:Var3,[(314,103)])
}
Add(Replace,5868472,511,231)
{
SubStr="%dlen%"
link(onReplace,14307582:onEvent1,[(569,237)(569,27)])
link(Str,14299762:Var3,[(517,117)])
link(Dest,6915274:Var1,[])
}
Add(Memory,3112547,98,161)
{
link(onData,15588212:doSearch,[])
}
END_SDK
END_SDK
Add(If_else,2301140,854,259)
{
Type=5
Op2=String(пѕ............................................Invalid login)
link(onTrue,12847959:doWork2,[])
link(onFalse,1089024:doEvent1,[])
}
Add(Memo,885846,1092,259)
{
Left=30
Top=155
Width=540
Height=100
ScrollBars=2
}
Add(Label,10105637,336,161)
{
Left=115
Top=20
Width=25
Caption="mail"
Alignment=1
}
Add(Label,10222468,336,203)
{
Left=305
Top=20
Width=30
Caption="pass"
Alignment=1
}
Add(Message,8960684,966,273)
{
Message="Invalid login"
Caption="error"
Icon=1
}
Add(Hub,1089024,896,266)
{
link(onEvent1,14856684:doClose,[(923,272)(923,313)(698,313)(698,272)])
link(onEvent2,8960684:doMessage,[])
}
Add(Stream2Hex,15591180,812,322)
{
Mode=2
link(onResult,267628:doAdd,[])
}
Add(Memo,267628,1092,322)
{
Left=30
Top=260
Width=540
Height=100
ScrollBars=2
}
Add(Hub,14090909,784,259)
{
link(onEvent1,6150605:doConvert,[])
link(onEvent2,15591180:doConvert,[(805,272)(805,328)])
}
Add(MultiElement,1914739,721,133)
{
}
BEGIN_SDK
Add(EditMulti,7858217,21,21)
{
WorkCount=1
VarCount=2
Width=580
Height=270
link(doWork1,11740922:doIPByHost,[(98,27)(98,153)])
link(Var1,7567652:Part1,[(27,235)(419,235)])
link(Var2,7567652:Part2,[(34,235)(426,235)])
}
Add(TCP_Client,13653633,301,147)
{
Port=2042
link(onRead,10623915:doReplace,[])
}
Add(Host,11740922,231,140)
{
link(onIPByHost,13653633:doOpen,[])
link(HostName,2102272:Value,[])
}
Add(Memory,2102272,238,91)
{
Default=String(mrim.mail.ru)
}
Add(MultiStrPart,7567652,413,147)
{
Char=":"
}
Add(Replace,10623915,350,147)
{
SubStr="
"
link(onReplace,7567652:doSplit,[])
}
END_SDK
|
Поиск
Друзья
Администрация