delphi2010以后加上 ReportMemoryLeaksOnShutdown:=boolean(DebugHook); delphi 7 使用fastmm4 去检测 如果有多线程操作同一io,加线程锁