摘要: uses Clipbrd; procedure TForm1.Button1Click(Sender: TObject); begin Clipboard.AsText := Text; ShowMessage(Clipboard.AsText); {Form1} end; -------------------- 阅读全文
posted @ 2018-09-23 13:04 麦麦提敏 阅读(1056) 评论(0) 推荐(0) 编辑