如果用tlist来保存bmp图形,那么该如何给它赋值呢?我试过tbmp.b.Assign(image1.picture.Bitmap)不能通过。

如果用tlist来保存bmp图形,那么该如何给它赋值呢?我试过tbmp.b.Assign(image1.picture.Bitmap)不能通过。 Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiMultimedia/html/delphi_2006121216591664.html
这是记录结构,里面有一个bitmap类型,如何将外部图形保存在里面呢?  
  pbmp:=bmp;  
      bmp=record  
      name:string;  
      b:tbitmap;  
  end;  
 

var  
      b:   bmp;  
  begin  
      b.b   :=   TBitmap.Create;  
      b.b.Assign(Image1.picture.Bitmap);  
  end;  
 

var  
      ImageList:   TList;  
  begin  
      ImageList   :=   TList.Create;  
      ImageList.Add(Image1.Picture.Bitmap);  
      Image2.Picture.Bitmap   :=   TBitMap(ImageList.Items[0]);  
  end;

posted on 2008-08-25 09:51  delphi2007  阅读(349)  评论(0编辑  收藏  举报