关于剪贴板的，高手请进。。。

Question

uses
  Clipbrd;procedure TForm1.Button1Click(Sender: TObject);
begin
  Image1.Picture.Bitmap.Assign(ClipBoard);
end;

Answer 1

Image1.Picture.Bitmap.LoadFromClipBoardFormat(cf_BitMap, ClipBoard.GetAsHandle(cf_Bitmap), 0);
Image1.Picture.Bitmap.SaveToFile('c:\taxi.bmp');

Answer 2

谢谢各位的回答，我已经解决了，其中taxi的回答是正确的，谢谢
我知道二位是高手，zswang的方法也对，但有缺陷，有的时候图片会变成256色的样子。