本文整理自网络,侵删。
uses clipbrdprocedure TForm1.N16Click(Sender: TObject);var jpg: TJPEGImage;begin jpg := TJPEGImage.Create; jpg.Assign(Image1.Picture.Graphic); Clipboard.Assign(JPG); //放到剪贴板内 jpg.Free;end;
相关阅读 >>
Delphi cxdbtreelist1判断当父节点含有子节点时 不能删除此父节点
Delphi xe8中的正则表达式提取日语(平假名,片假名,汉字)
Delphi 的字符及字符串 - char、ansichar、widechar、pchar、pansichar、pwidechar
Delphi tpath.combine(); {结合路径}
更多相关阅读请进入《Delphi》频道 >>