image控件中的图像如何拷贝？

Question

我想把image控件中的图像拷贝，粘贴到excel中去，不知应用image控件中的那些函数

Answer 1

Image1.Canvas.Brush.Bitmap.LoadFromFile('图象路径');
 Image1.Canvas.Brush.Bitmap.SaveToFile('保存路径');

Answer 2

image1.Picture.Assign(image2.Picture);

Answer 3

注意需要先引用 Clipbrd 单元.procedure TForm1.Button1Click(Sender: TObject);
var
  MyFormat : Word;  AData : THandle;
  APalette:HPALETTE ;
begin    image1.Picture.Bitmap.SaveToClipboardFormat(MyFormat,AData,APalette);
    ClipBoard.SetAsHandle(CF_BITMAP,AData);  // 这里CF_BITMAP 也可以用MyFormat代替.
end;