Add(MainForm,12142676,175,98)
{
 Width=305
 Height=197
 Caption="Пример Cryptography"
}
Add(Cryptography,6973355,259,161)
{
 link(onCrypt,4588001:doValue,[])
 link(Data,15424103:Text,[])
 link(Key,1782352:Var2,[])
}
Add(Cryptography,5267281,266,245)
{
 link(onCrypt,12306924:doText,[])
 link(Data,4588001:Value,[(272,227)(328,227)])
 link(Key,1782352:Var3,[(279,188)(281,188)(281,145)])
}
Add(Button,7836147,175,161)
{
 Left=10
 Top=45
 Caption="crypt"
 link(onClick,6973355:doCrypt,[])
}
Add(Button,5106960,175,245)
{
 Left=10
 Top=105
 Caption="encrypt"
 link(onClick,5267281:doCrypt,[])
}
Add(Edit,15424103,259,49)
{
 Left=80
 Top=45
 Width=210
 Text="coding text"
}
Add(Edit,12306924,322,245)
{
 Left=80
 Top=105
 Width=210
 Text=""
}
Add(Edit,12437416,427,161)
{
 Left=80
 Top=75
 Width=210
 Text=""
}
Add(Edit,3895954,266,98)
{
 Left=80
 Top=15
 Width=210
 Text="keypass"
}
Add(Label,13384348,175,49)
{
 Left=25
 Top=20
 Width=28
 Height=17
 Font=[MS Sans Serif,8,1,255,1]
 Caption="KEY"
}
Add(GetDataEx,1782352,266,140)
{
 link(Data,3895954:Text,[])
}
Add(StreamConvertor,11115644,371,161)
{
 Mode=2
 link(onResult,12437416:doText,[])
}
Add(Memory,4588001,322,161)
{
 link(onData,11115644:doConvert,[])
}