如何监视系统剪贴板变化?
来源:互联网 发布:淘宝手包 编辑:程序博客网 时间:2024/05/11 10:03
今天在上网时,复制了一个数据,可是因为其他事情忘记粘贴了,后来就找不到了,所以想到做一个监视系统剪贴板变化的程序,然后把内容放到一个RIchtextbox中,可是我不知道应该如何监视系统剪贴板变化,所以就用Timer来不断的浏览剪贴板内容,可是这样比较占用内存,不是理想的做法,所以想监视系统剪贴板变化,一旦发现有复制或者剪切,就把剪贴板内的可以转化为文本的内容放到Richtextbox中,实现内容的保存,不知道哪位曾经有过这方面的经验,希望能给予指点!
现在我做的一个放到网上,供大家参考,同时希望有人能给出更好的意见!
Dim CurInfo As String '''用于上次记录的剪贴板信息
Private Sub Form1_Load()Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Interval = 10000 '''十秒刷新
Timer1.Start()
GetInfo()
End Sub
Sub GetInfo()Sub GetInfo() '''获取剪贴板信息
Dim Idata As IDataObject
Idata = System.Windows.Forms.Clipboard.GetDataObject()
If Idata.GetDataPresent(DataFormats.Text) = True Then
If Idata.GetData(DataFormats.Text).ToString = CurInfo Then
Exit Sub
End If
CurInfo = Idata.GetData(DataFormats.Text).ToString
RTBox.AppendText(">>>>>>" & Now & vbCrLf) '''RTBox是一个Richtextbox
RTBox.AppendText(Idata.GetData(DataFormats.Text).ToString & vbCrLf & vbCrLf)
End If
End Sub
Private Sub Timer1_Elapsed()Sub Timer1_Elapsed(ByVal sender As System.Object, ByVal e As System.Timers.ElapsedEventArgs) Handles Timer1.Elapsed
GetInfo()
End Sub
Private Sub Form1_Load()Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Interval = 10000 '''十秒刷新
Timer1.Start()
GetInfo()
End Sub
Sub GetInfo()Sub GetInfo() '''获取剪贴板信息
Dim Idata As IDataObject
Idata = System.Windows.Forms.Clipboard.GetDataObject()
If Idata.GetDataPresent(DataFormats.Text) = True Then
If Idata.GetData(DataFormats.Text).ToString = CurInfo Then
Exit Sub
End If
CurInfo = Idata.GetData(DataFormats.Text).ToString
RTBox.AppendText(">>>>>>" & Now & vbCrLf) '''RTBox是一个Richtextbox
RTBox.AppendText(Idata.GetData(DataFormats.Text).ToString & vbCrLf & vbCrLf)
End If
End Sub
Private Sub Timer1_Elapsed()Sub Timer1_Elapsed(ByVal sender As System.Object, ByVal e As System.Timers.ElapsedEventArgs) Handles Timer1.Elapsed
GetInfo()
End Sub
- 如何监视系统剪贴板变化?
- Java监视系统剪贴板
- 在C#中监视剪贴板的变化
- VC 监视剪贴板的变化和内容监视
- 在应用程序中监视剪贴板的变化和内容
- 在应用程序中监视剪贴板的变化和内容
- 在应用程序中监视剪贴板的变化和内容
- 在应用程序中监视剪贴板的变化和内容
- 如何在Windows下实时监视系统共享文件夹的变化
- Java如何使用系统剪贴板
- 监视剪贴板内容
- 监视剪贴板内容
- 剪贴板监视保存器
- 示例:WPF监视剪贴板
- 【转】c#如何监视文件或者文件夹的变化
- c#如何监视文件或者文件夹的变化
- 关于C#监视剪贴板信息
- 监视文件变化
- 2006-08-02 昨天调试的郁闷问题!
- CCTV内部晚会(放荡版,绝密,不看遗憾)
- 第三十七期:CSDN论坛秀-Delphi版-本期作秀:senhor(百合)
- 实战演习----Windows XP 远程桌面连接
- P2P 之 UDP穿透NAT的原理与实现
- 如何监视系统剪贴板变化?
- Xian dai zhang wen (Language: Chinese)
- good c questions!
- 感冒了
- 程序员的个性与共性
- 感受JTable 与 JTableModel
- CCTV内部晚会(放荡版,绝密,不看遗憾)
- Ajax框架使用总结(1)
- 介绍一个GWT的网站 和 decode javascript.encode using java +FCKEditor 在 jsp中的使用说明