[求助]图片怎么样做到单击放大呀?
用JPEG.u32
初始化就写:
y1:=WindowWidth/2-150
x1:=WindowHeight/2-200
y2:=WindowWidth/2+150
x2:=WindowHeight/2+200
M_ShowJPG(FileLocation^"1.jpg",x1,y1,x2,y2
要放大就写:
x2:=x2+10 ';宽度增加10
y2:=y2+10 ';高度增加10
M_ShowJPG(FileLocation^"1.jpg",x1,y1,x2,y2)
要缩小就写:
x2:=x2-10
y2:=y2-10
M_ShowJPG(FileLocation^"1.jpg",x1,y1,x2,y2)
如果要做到等比例缩放,在计算方式里要改一下!
比如获取原始图片的高宽比例后,在放大中就改高或者宽,然后按照比例得出宽或者高。