本文整理自网络,侵删。
1、利用粘贴板 uses Vcl.Clipbrd;
复制
Clipboard.AsText := AStr;
粘贴
AStr := Clipboard.AsText;
2、利用方法
Edit类:
TEdit(AEdit).CopyToClipboard;
TEdit(AEdit).PasteFromClipboard;
相关阅读 >>
Delphi application.processmessages的作用
winapi 字符及字符串函数(6): ischaralphanumeric - 是否是个文字(字母或数字)
更多相关阅读请进入《Delphi》频道 >>