delphi xe5复制粘贴操作

1、利用粘贴板 uses Vcl.Clipbrd;

复制

Clipboard.AsText := AStr;

粘贴

AStr := Clipboard.AsText;

2、利用方法

Edit类：

TEdit(AEdit).CopyToClipboard;

TEdit(AEdit).PasteFromClipboard;