if ActiveImage.ZoomSize < 0.2 then exit;
  ActiveImage.ZoomSize := ActiveImage.ZoomSize / 1.25;

解决方案 »

  1.   

    但当我在设计时如果就加载图片,则正常。但图片并不是缩小后的,而是原图的一部分。 ================================
    这时你将Image的AutoSize设成true就会变成显示全图了!
      

  2.   

    那不是很费资源!可以把它画到canva上吗?
      

  3.   

    当然可以画上去^_^,先读入图片,然后
    使用StrechDraw便可以了,很简单的。赶快试一下吧
      

  4.   

    StrechDraw确实可以,很奇怪为什么Strechblt那么糟糕。难道StrechDraw
    没有调用Strechblt?我已决定用listview了。不过问题又来了,那就是重画,
    画面简直像拉长的口香糖。请各位继续。
      

  5.   

    StrechDraw去确实没有调用Strechblt,它大概调用StrechDIBblt吧.