怎样才能把PrintScreen键(VK_SNAPSHOT)Copy的内容考到一个Image中显示出来呢?该怎么解决

怎样才能把PrintScreen键(VK_SNAPSHOT)Copy的内容考到一个Image中显示出来呢?
如题

------解决方案--------------------
procedure TForm1.Button1Click(Sender: TObject);

var
Bitmap : TBitmap;
begin
Bitmap := TBitMap.create;
try
Bitmap.LoadFromClipBoardFormat(cf_BitMap,ClipBoard.GetAsHandle(cf_Bitmap),0);
Canvas.draw(0,0,Bitmap);
finally
Bitmap.free;
end;
end;
------解决方案--------------------
//uses Clipbrd;
procedure TForm1.Button1Click(Sender: TObject);
begin
Image1.Picture.LoadFromClipBoardFormat(cf_BitMap,ClipBoard.GetAsHandle(cf_Bitmap),0);
Canvas.draw(0,0,Image1.Picture.Bitmap);
end;