在实际应用中我们经常需要实现多个进程之间共享信息,以及实现互相之间的控制传递。
我们可以有很多的方法,最为常用的是共享一个本地的数据文件,或者是共享一个数据库。但问题也随之而来--不断的对硬盘进行操作会对硬盘硬件造成极大的伤害,另外由于读取硬盘需要大量的时间,也同样对软件的运行效率大打折扣!
因此,更为高级的就是我们共享内存!过去在C/C++中这个似乎比较便捷,但VB6中则需要很多API操作才能实现。对于。NET过去也只能通过委托来实现API.
而现在。NET4为我们提供了强大的功能--内存文件映射功能。通过内存映射可以完美实现多个进程之间的信息共享!
下面一个简单的例子来说明:
实现任务:进程A向内存写入信息,进程B则读取这些信息,实现进程B共享进程A的信息。
进程A代码如下:
Public Class Form1
Dim MF As System.IO.MemoryMappedFiles.MemoryMappedFile 'MemoryMappedFile 内存映射文件对象
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
MF = MF.CreateNew("SYSIO", 5000) '在主共享进程中创建一个非常驻的内存映射文件,其大小为5000字节
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Dim buf(4) As Byte
Dim s As Single
Dim ms As System.IO.MemoryMappedFiles.MemoryMappedViewStream '内存映射文件的视图流
ms = MF.CreateViewStream()
s = Rnd()
buf = BitConverter.GetBytes(s)
ms.Write(buf, 0, buf.Length) '向内存映射文件写入信息
End Sub
End Class
进程B代码如下:
Public Class Form1
Dim MF As System.IO.MemoryMappedFiles.MemoryMappedFile
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
MF = MF.OpenExisting("SYSIO") '打开一个内存中已经存在的映射,也就是主共享进程中创建的内存映射文件
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Dim buf() As Byte = {0, 0, 0, 0, 0}
Dim ms As System.IO.MemoryMappedFiles.MemoryMappedViewStream
ms = MF.CreateViewStream()
ms.Read(buf, 0, buf.Length) '读取该映射文件中的指定内容
Me.TextBox1.Text = BitConverter.ToSingle(buf, 0)
End Sub
End Class
转载于:https://blog.51cto.com/lailjiaaie/915658