read_object(VectorField, '')
read_image(Imageleft, '')
get_image_size(Imageleft,Width, Height)
step:=100
times:=Height/step
Height:=step
gen_empty_obj(orgs)
for i := 1 to times by 1
gen_rectangle1(Rectangle, step*(i-1), 0, step*i-1, Width-1)
reduce_domain(Imageleft, Rectangle, Imageleftreduce1)
crop_domain(Imageleftreduce1, ImageleftImagePart1)
concat_obj (orgs, ImageleftImagePart1, orgs)
endfor
gen_empty_obj(imgs)
for i := 1 to times by 1
select_obj(orgs, ObjectSelected, i)
map_image(ObjectSelected,VectorField, Imageleftresult1)
concat_obj (imgs, Imageleftresult1, imgs)
endfor
tile_images(imgs, TiledImage, 1, 'vertical')
上面这样子写,能跑出结果,but下面这样子写,循环运行到第6次的时候,就报11,崩了
read_object(VectorField, '')
read_image(Imageleft, '')
get_image_size(Imageleft,Width, Height)
step:=100
times:=Height/step
Height:=step
gen_empty_obj(imgs)
for i := 1 to times by 1
gen_rectangle1(Rectangle, step*(i-1), 0, step*i-1, Width-1)
reduce_domain(Imageleft, Rectangle, Imageleftreduce1)
crop_domain(Imageleftreduce1, ImageleftImagePart1)
map_image(ImageleftImagePart1,VectorField, Imageleftresult1)
concat_obj (imgs, Imageleftresult1, imgs)
endfor
tile_images(imgs, TiledImage, 1, 'vertical')
|