我要把在一张IMAGE上产生的动态图片和IMAGE保存为一张图片,有何高见?

解决方案 »

  1.   

    Image1.picture.bitmap.savetofile('MyImage.bmp');
      

  2.   

    procedure TForm1.BitBtn2Click(Sender: TObject);
    begin
     with savepicturedialog1  do
       begin
         filename:=openpicturedialog1.filename;
         if execute then
          begin
           Image1.picture.bitmap.savetofile('MyImage.bmp');
         end;
      end;
      

  3.   

    Image1.picture.savetofile('MyImage.bmp');
      

  4.   

    用一个SAVEPICTUREDLG啊。
    image1.picture.savetofile(savepicturedlg.filename);
    楼上的问题可能事目标文件没有创建的原因。
      

  5.   

    详细就是你在form上放个文件保存dialog,然后保存的代码要这样写with 保存dialog.execute do 
    保存不然可能会出错
      

  6.   

    我是要把在一张IMAGE上产生的动态图片和IMAGE保存为一张图片,而不是单纯保存IMAGE,有何高见?
      

  7.   

    我有个提议,你可以试一试,创建tmetafile,然后使用将image的handle传给tmetafile的canvas,用tmetafile来保存.
      

  8.   

    if savedialog1.Execute then
     TImage.Picture.SaveToFile(savedialog1.FileName);
    以上是俺的程序中的一段,用起来没什么问题.顺便问一下,楼上各位老大一直说的是把图片保存成bmp格式,有没有什么办法直接转换成jpeg格式保存(转换成流文件的方法俺会,就不用说了)有没有类似于保存成bmp格式那样方便的方法?