delphi为你的窗体有效地提供剪贴板的相关操作

本文整理自网络，侵删。

 如何使用最少的代码为你的窗体有效地提供剪贴板的相关操作
关键字：剪切 复制 粘贴 sendmessage 
类　别：API 
view plaincopy to clipboardprint?
procedure TForm1.Cut1Click(Sender: TObject); 
begin 
SendMessage (ActiveControl.Handle, WM_Cut, 0, 0); 
end; 


procedure TForm1.Copy1Click(Sender: TObject); 
begin 
SendMessage (ActiveControl.Handle, WM_Copy, 0, 0); 
end; 

procedure TForm1.Paste1Click(Sender: TObject); 
begin 
SendMessage (ActiveControl.Handle, WM_Paste, 0, 0); 
end; 

//如果你开发一个MDI应用程序，你需要保证信息发送到活动子窗口，使用： 
ActiveMDIChild.ActiveControl.Handle 

相关阅读 >>

Delphi 我的电脑连接到 internet 了吗？

Delphi完美的线程注入和卸载

Delphi 的内存操作函数(2): 给数组指针分配内存

Delphi10及以上版本安装activex控件

Delphi在memorystream查找字符串

Delphi xe 遍历指定数据库，清空各表记录

Delphi tlist性能注意事项

Delphi post数据到网页

Delphi 判断文本文件的编码格式

Delphi使用hough变换查找直线

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi为你的窗体有效地提供剪贴板的相关操作