剪贴板 Clipbrd 直接用法 不用定义类 新建类 uses Clipbrd; procedure TForm1.Button1Click(Sender: TObject); begin Clipboard.Assign(SpeedButton1.Glyph); Image1.Stretch := True; Image1.Picture.Assign(Clipboard); end;
c++
d:\program files (x86)\embarcadero\rad studio\12.0\include\windows\vcl\Vcl.Clipbrd.hpp
extern DELPHI_PACKAGE TClipboard* __fastcall Clipboard(void);