以下代码片段说明打开XPS文件时的内存泄漏。如果您运行它并观察任务管理器,它将会增长并且不会释放内存,直到应用程序退出。在.Net中打开XPS文档导致内存泄漏
'******控制台应用程序BEGINS。
Module Main
Const DefaultTestFilePath As String = "D:\Test.xps"
Const DefaultLoopRuns As Integer = 1000
Public Sub Main(ByVal Args As String())
Dim PathToTestXps As String = DefaultTestFilePath
Dim NumberOfLoops As Integer = DefaultLoopRuns
If (Args.Count >= 1) Then PathToTestXps = Args(0)
If (Args.Count >= 2) Then NumberOfLoops = CInt(Args(1))
Console.Clear()
Console.WriteLine("Start - {0}", GC.GetTotalMemory(True))
For LoopCount As Integer = 1 To NumberOfLoops
Console.CursorLeft = 0
Console.Write("Loop {0:d5}", LoopCount)
' The more complex the XPS document and the more loops, the more memory is lost.
Using XPSItem As New Windows.Xps.Packaging.XpsDocument(PathToTestXps, System.IO.FileAccess.Read)
Dim FixedDocSequence As Windows.Documents.FixedDocumentSequence
' This line leaks a chunk of memory each time, when commented out it does not.
FixedDocSequence = XPSItem.GetFixedDocumentSequence
End Using
Next
Console.WriteLine()
GC.Collect() ' This line has no effect, I think the memory that has leaked is unmanaged (C++ XPS internals).
Console.WriteLine("Complete - {0}", GC.GetTotalMemory(True))
Console.WriteLine("Loop complete but memory not released, will release when app exits (press a key to exit).")
Console.ReadKey()
End Sub
End Module
'****** Console application ENDS。
循环一千次的原因是因为我的代码很快处理大量文件并快速泄漏内存,强制执行OutOfMemoryException。强制垃圾收集不起作用(我怀疑它是XPS内部的非托管块内存)。
该代码原本是在另一个线程和类,但已简化为此。
任何帮助非常感谢。
瑞安
任何证明这是一个真正的错误?它是否被报告,以及repro步骤? – Will 2009-03-30 21:33:30
证明是在布丁中,运行它并查看(评论上面的DirectCast,你会得到一个泄漏)。我没有提出MS Connect,但与MS社交(http://social.msdn.microsoft.com/Forums/en-US/windowsxps/thread/e31edefa-b07e-450d-8ab8-5a171ee8d4c1/?ppud= 4)。 – 2009-03-31 13:47:36