Вверх ↑
Ответов: 8918
Рейтинг: 823
#1: 2006-03-12 00:00:00 ЛС | профиль | цитата
botan, элемент "BitmapArray" не поможет?, эффекты могут быть очень разными, вот простейший ("5 мин., включая почёсывание в затылке")
Add(MainForm,3751151,602,154)
{
Left=20
Top=105
Height=390
}
Add(GetData,3771552,497,280)
{
link(Data,7792880:Position,[])
}
Add(BitmapArray,13235940,399,105)
{
Bitmaps=[]
UseName=1
}
Add(GetData,10296800,553,280)
{
link(Data,15985140:Position,[])
}
Add(Counter,2598396,350,154)
{
Max=5
Default=-1
link(onNext,11891691:doRead,[])
}
Add(ArrayRW,11891691,399,154)
{
link(onRead,9037911:doEvent1,[])
link(Array,13235940:Array,[])
}
Add(Bitmap,7573527,532,154)
{
Point(Height)
Point(Width)
}
Add(Hub,9037911,448,154)
{
link(onEvent1,7573527:doLoad,[(513,160)(513,160)])
link(onEvent2,7792880:doFor,[(488,167)(488,230)])
}
Add(Img_GetPoint,9324686,532,343)
{
link(onGetPixel,3943382:doDraw,[])
link(Bitmap,7573527:Bitmap,[])
link(X,10296800:Data1,[(545,332)(559,332)])
link(Y,3771552:Data1,[(552,325)(503,325)])
}
Add(Img_Point,3943382,602,343)
{
DrawSource=1
link(Bitmap,3751151:Handle,[])
link(X,10296800:Data2,[(615,331)(566,331)])
link(Y,3771552:Data2,[(622,320)(510,320)])
}
Add(Button,7529505,301,154)
{
Left=50
Top=275
link(onClick,2598396:doNext,[])
}
Add(For,7792880,497,224)
{
Start=1
link(onEvent,15985140:doFor,[])
link(End,7573527:Height,[(510,205)(545,205)])
}
Add(For,15985140,553,224)
{
Start=1
link(onEvent,9324686:doGetPixel,[(595,230)(595,265)(473,265)(473,349)])
link(End,7573527:Width,[(566,205)(552,205)])
}
не забудьте заполнить BitmapArray картинками :)
карма: 19

0