只要实现就可以,我完成的是一个bmp格式图像的,打开,花样显示,和伸缩,即在我的产品中,
可以实现对bmp图像的拉伸和收缩,可以通过鼠标(左健的拖动)来控制图像的大小,但是图像的个部分不能对失,不能像windows中的画笔那样,将花布一拉伸,就出现空白,而是很像超级解霸中用鼠标,对视频窗口的大小控制一个意思. 

解决方案 »

  1.   

    bitmap.canvas.strenchdraw 这个函数怎么用哦!
    试过了,不行哦! 
      

  2.   

    StretchBlt(vBitmap1.Canvas.Handle, 0, 0, vWidth, vHeight,
          mBitmapSoruce.Canvas.Handle, 0, 0, mBitmapSoruce.Width, mBitmapSoruce.Height, SRCCOPY);
      

  3.   

    procedure TForm1.BitBtn1Click(Sender: TObject);
    begin
      Image1.Picture.Bitmap.Width := Image1.Width;
      Image1.Picture.Bitmap.Height := Image1.Height;
      StretchBlt(Image1.Picture.Bitmap.Canvas.Handle, 0, 0,
        Image1.Width, Image1.Height,
        Image2.Picture.Bitmap.Canvas.Handle, 0, 0,
        Image2.Picture.Bitmap.Width, Image2.Picture.Bitmap.Height, SRCCOPY);
    //Image2有图
    //Image1无图
    end;
      

  4.   

    StretchBlt拷贝图像只能按比例收缩,即长宽收缩比例相同,
            还没有详细搞清楚它的用法!
      到是用copyrect,帮我把一张图片分为张!
    不过还是感谢!