Add(ZLIB,29583,266,70)
{
 link(onStream,13446509:doEvent1,[])
}
Add(MainForm,6154164,70,70)
{
 Caption="Пример использования компонента ZLIB"
}
Add(FileStream,3591058,203,70)
{
 FileName="License.txt"
 link(onLoad,29583:doCompress,[])
}
Add(FileStream,8781623,378,77)
{
 FileName="license.zipp"
 Mode=1
 Point(doCopyFromStream)
 link(onLoad,9334310:doMessage,[])
}
Add(Button,4479836,126,133)
{
 Left=155
 Top=155
 Width=75
 Caption="DeCompress"
 link(onClick,7520501:doEvent1,[])
}
Add(Hub,13446509,315,70)
{
 OutCount=3
 link(onEvent1,8781623:doOpen,[(361,76)(361,83)])
 link(onEvent2,8781623:doCopyFromStream,[(356,83)(356,97)])
 link(onEvent3,8781623:doClose,[])
}
Add(ZLIB,15977970,266,126)
{
 link(onStream,4932148:doEvent1,[])
}
Add(FileStream,2618446,203,133)
{
 FileName="license.zipp"
 AutoCopy=0
 link(onLoad,15977970:doDeCompress,[])
}
Add(FileStream,8181486,378,133)
{
 FileName="license_dec.txt"
 Mode=1
 Point(doCopyFromStream)
 link(onLoad,15758870:doMessage,[])
}
Add(Hub,4932148,315,126)
{
 OutCount=3
 link(onEvent1,8181486:doOpen,[(361,132)(361,139)])
 link(onEvent2,8181486:doCopyFromStream,[(354,139)(354,153)])
 link(onEvent3,8181486:doClose,[])
}
Add(Button,3924294,126,70)
{
 Left=155
 Top=90
 Width=75
 Caption="Compress"
 link(onClick,1789216:doEvent1,[])
}
Add(Message,9334310,434,77)
{
 Message="Compress OK!"
 link(Caption,8781623:Size,[(447,65)(478,65)(478,121)(391,121)])
}
Add(Message,15758870,434,133)
{
 Message="DeCompress OK!"
}
Add(Hub,1789216,175,70)
{
 link(onEvent1,3591058:doOpen,[])
 link(onEvent2,3591058:doClose,[])
}
Add(Hub,7520501,175,133)
{
 link(onEvent1,2618446:doOpen,[])
 link(onEvent2,2618446:doClose,[])
}