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
}