W wanglong Unregistered / Unconfirmed GUEST, unregistred user! 2007-10-26 #1 如果剪贴板里有一幅图片,如何点击button1,使这幅图片显示到Image控件里呢??
A Avalon Unregistered / Unconfirmed GUEST, unregistred user! 2007-10-26 #2 var Form1: TForm1; implementation uses Clipbrd; {$R *.DFM} procedure TForm1.Button1Click(Sender: TObject); begin Image1.Picture.Bitmap.LoadFromClipboardFormat(CF_BITMAP,clipboard.GetAsHandle(CF_BITMAP),0); end; 楼主注意的图片类型
var Form1: TForm1; implementation uses Clipbrd; {$R *.DFM} procedure TForm1.Button1Click(Sender: TObject); begin Image1.Picture.Bitmap.LoadFromClipboardFormat(CF_BITMAP,clipboard.GetAsHandle(CF_BITMAP),0); end; 楼主注意的图片类型