如果剪贴板里有一幅图片,如何点击button1,使这幅图片显示到Image控件里呢??? ( 积分: 55 )

  • 主题发起人 主题发起人 wanglong
  • 开始时间 开始时间
W

wanglong

Unregistered / Unconfirmed
GUEST, unregistred user!
如果剪贴板里有一幅图片,如何点击button1,使这幅图片显示到Image控件里呢??
 
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;



楼主注意的图片类型
 
接受答案了.
 

Similar threads

D
回复
0
查看
744
DelphiTeacher的专栏
D
D
回复
0
查看
718
DelphiTeacher的专栏
D
D
回复
0
查看
672
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部