[size=-2]------ Добавлено в 08:42
Galkov писал(а):
Сборка автомата производится в порядке обратном разборкеСогласен насчет автомата. Если ZLIB при распаковке выдает данные в точку Stream, а Bitmap при считывании их оттуда забирает, получается следующая схемка. Результат, правда, тот же.
Не пугайтесь, Galkov, она маленькая
Add(MainForm,68161,21,98)
{
Left=21
Top=106
Width=395
Height=299
}
Add(ZLIB,43492,238,245)
{
link(onStream,27261:doDeCompress,[])
link(Stream,4325848:Var3,[(244,219)])
}
Add(Hub,56102,91,238)
{
OutCount=3
link(onEvent1,8560105:doWrite,[])
link(onEvent2,43492:doCompress,[])
link(onEvent3,93822:doClear,[(156,258)(156,181)])
}
Add(BitmapStream,30541,364,238)
{
link(onRead,10971577:doLoad,[])
link(Stream,1996246:Var2,[(370,231)(342,231)])
}
Add(ZLIB,27261,301,238)
{
link(onStream,30541:doRead,[])
link(Stream,1996246:Var1,[(307,219)])
}
Add(MemoryStream,93822,189,168)
{
}
Add(ClipboardHook,85182,28,231)
{
link(onBitmap,56102:doEvent1,[])
}
Add(Image,10971577,427,238)
{
Left=1
Top=1
Width=1024
Height=768
}
Add(GetDataEx,4325848,182,210)
{
link(Data,93822:Stream,[])
}
Add(BitmapStream,8560105,189,231)
{
link(Stream,4325848:Var2,[])
}
Add(GetDataEx,1996246,329,210)
{
link(Data,11282045:Stream,[(342,204)(342,204)])
}
Add(MemoryStream,11282045,336,161)
{
}