Add(EnCrypt,7694506,385,112)
{
 HashMode=0
 Key="1262GeqJewB1K"
 link(onEnCrypt,5223505:doConvert,[])
 link(Data,13489714:Text,[(391,100)(359,100)(359,149)(328,149)])
}
Add(Edit,13489714,322,105)
{
 Left=60
 Top=95
 Width=250
 link(onEnter,7694506:doEnCrypt,[])
}
Add(StrList,2403787,532,112)
{
 FileName="encryption"
 link(onChange,2403787:doSave,[(576,118)(576,136)(520,136)(520,153)])
}
Add(DeCrypt,14261023,658,189)
{
 HashMode=0
 Key="1262GeqJewB1K"
 link(onDeCrypt,9069609:doAdd,[])
}
Add(StreamConvertor,5223505,469,112)
{
 Mode=2
 link(onResult,2403787:doAdd,[])
}
Add(StreamConvertor,3703891,602,189)
{
 Mode=3
 link(onResult,14261023:doDeCrypt,[])
}
Add(Button,5287699,364,203)
{
 Left=55
 Top=165
 link(onClick,2406965:doEvent1,[])
}
Add(ArrayEnum,6151433,497,238)
{
 link(onItem,3703891:doConvert,[(565,244)(565,195)])
 link(Array,14502957:Array,[])
}
Add(Memo,9069609,749,189)
{
 Left=350
 Top=25
 Width=270
 Height=345
}
Add(StrList,14502957,483,175)
{
 FileName="encryption"
}
Add(Hub,2406965,441,203)
{
 link(onEvent1,14502957:doLoad,[])
 link(onEvent2,6151433:doEnum,[(476,216)(476,244)])
}

Add(MainForm,2953706,217,119)
{
 Width=307
 Height=194
}
Add(EnCrypt,7694506,336,126)
{
 HashMode=0
 Key="1262GeqJewB1K"
 link(onEnCrypt,5223505:doConvert,[])
 link(Data,13489714:Text,[(342,114)(310,114)(310,163)(279,163)])
}
Add(Edit,13489714,273,119)
{
 Left=10
 Top=10
 Width=270
 Text=""
 link(onEnter,7694506:doEnCrypt,[])
}
Add(DeCrypt,14261023,399,189)
{
 HashMode=0
 Key="1262GeqJewB1K"
 link(onDeCrypt,9069609:doAdd,[])
}
Add(StreamConvertor,5223505,392,126)
{
 Mode=7
 link(onResult,5926469:doCopyFromStream,[])
}
Add(StreamConvertor,3703891,350,189)
{
 Mode=6
 link(onResult,14261023:doDeCrypt,[])
}
Add(Button,5287699,217,189)
{
 Left=115
 Top=125
 Width=70
 Caption="Decrypt"
 link(onClick,14265961:doEvent1,[])
}
Add(Memo,9069609,448,189)
{
 Left=10
 Top=35
 Width=270
 Height=85
}
Add(FileStream,5926469,448,112)
{
 FileName="encryption.bin"
 Mode=1
 AutoCopy=0
 Point(doCopyFromStream)
}
Add(FileStream,15106730,301,189)
{
 FileName="encryption.bin"
 link(onLoad,3703891:doConvert,[])
}
Add(Hub,14265961,273,189)
{
 link(onEvent1,15106730:doOpen,[])
 link(onEvent2,15106730:doClose,[])
}

Add(MainForm,8308775,154,126)
{
 Height=224
 Caption="Crypt/Decrypt"
 BorderStyle=1
 Position=1
}
Add(Edit,4011429,245,126)
{
 Left=60
 Top=5
 Width=320
 Text="123456"
}
Add(Label,15199179,154,175)
{
 Left=10
 Top=10
 Width=48
 Height=17
 Caption="Пароль:"
}
Add(Label,7423167,154,224)
{
 Left=10
 Top=35
 Width=37
 Height=17
 Caption="Текст:"
}
Add(Button,10235240,455,322)
{
 Left=170
 Top=140
 Width=100
 Height=25
 Caption="Расшифровать"
 link(onClick,6995826:doConvert,[])
}
Add(Button,3271176,371,161)
{
 Left=60
 Top=140
 Width=95
 Height=25
 Caption="Зашифровать"
 link(onClick,6643402:doEncrypt,[])
}
Add(LineBreakEx,760123,560,294)
{
 Caption="pass"
 Type=2
}
Add(LineBreakEx,3037814,245,168)
{
 Caption="pass"
 Type=3
 link(_Data,4011429:Text,[])
}
Add(Message,3952053,609,329)
{
 Caption="Ошбика"
 Icon=1
}
Add(Memo,4574646,735,140)
{
 Left=60
 Top=35
 Width=320
 Height=95
 Strings=#9:абвгд1234|
 ScrollBars=2
}
Add(StreamConvertor,12754747,602,161)
{
 Mode=2
 link(onResult,10856346:doEvent1,[])
}
Add(StreamConvertor,6995826,504,322)
{
 Mode=3
 Point(Data)
 link(onResult,10309613:doDecrypt,[])
 link(Data,2985829:getVar,[])
}
Add(LineBreakEx,6214002,434,133)
{
 Caption="pass"
 Type=2
}
Add(Hub,10856346,700,161)
{
 InCount=2
 OutCount=1
 link(onEvent1,4574646:doText,[])
}
Add(LineBreakEx,12562536,735,203)
{
 Caption="dt"
 Type=3
 link(_Data,4574646:Text,[])
}
Add(LineBreakEx,6499969,427,105)
{
 Caption="dt"
 Type=2
}
Add(LineBreakEx,2985829,504,294)
{
 Caption="dt"
 Type=2
}
Add(Label,13984803,609,203)
{
 Left=60
 Top=170
 Width=320
 Caption=""
 AutoSize=1
}
Add(Hub,7370935,525,161)
{
 link(onEvent1,12754747:doConvert,[])
 link(onEvent2,14161964:doReplace,[(549,174)(549,209)])
}
Add(Replace,14161964,560,203)
{
 SubStr="\0"
 DestStr="."
 link(onReplace,13984803:doText,[])
}
Add(EnCrypt,6643402,427,161)
{
 Mode=7
 Point(onError)
 link(onEncrypt,7370935:doEvent1,[])
 link(Data,6499969:getVar,[])
 link(Key,6214002:getVar,[])
 link(onError,610738:doMessage,[])
}
Add(DeCrypt,10309613,553,322)
{
 Mode=7
 Point(onError)
 link(onDecrypt,10856346:doEvent2,[(671,328)(671,174)])
 link(Key,760123:getVar,[])
 link(onError,3952053:doMessage,[])
}
Add(Message,610738,476,168)
{
 Caption="Ошбика"
 Icon=1
}