求助 delphi 使用image 怎么手动调整图像的大小,改变图片的位置
delphi吧
全部回复
仅看楼主
level 7
如题。我把图片加载到image组件上。然后怎么才能手动调整图片的大小,也就是要手动放大,缩小,改变图片的位置。。还有就是怎么固定图片。
大神给个思路吧。先感谢!
2014年04月10日 05点04分 1
level 11
移动就比较好实现,可以把image先放到一个有句柄的容器中,在image的MouseMove事件里加上以下代码就可以(假设容器是个Panel1),然后设置image的Align为alClient。
ReleaseCapture;
SendMessage(Self.Panel1.Handle,WM_NCLBUTTONDOWN,HTCAPTION,0)
至于手动调整大小,这个就比较麻烦,建议还是通过其他的按钮来进行缩放,因为Delphi本身并具有这些缩放操作的特性。如果非要实现的话,可以参考Delphi盒子上的一个例程,名字叫Resizer吧(记不大清),那个设计就非常全面了。
2014年04月11日 08点04分 2
谢谢!
2014年04月13日 23点04分
1