最近一直为自己制作的相册软件(http://www.tonixsoft.com/ultraalbum/index.php?lang=chs)打开大文件时速度慢而郁闷,我以前的做法是先用tfilestream打开一个文件,然后在其中找到其中的数据段,把其中内容复制给一个tmemorystream,之所以要再将它复制给一个独立的tmemorystream是因为,后续处理的一个文件型数据库组件必须接受一整个tstream,作为其存储媒介,整个过程简直慢得无法忍受.
【程序编程相关:蛙蛙推荐:PB开发规范.doc】 【推荐阅读:Delphi程序设计规范】之所以速度慢,是有两方面的原因: 【扩展信息:蛙蛙推荐:.net开发规范】 1.用tfilestream打开文件,操作系统在打开文件后会为文件生成内存镜像,文件一大,那么开辟空间以及内存拷贝的工作就会变得极为缓慢. 2.将tfilestream中的一部分再复制给tmemorystream,这个复制过程会开辟新的内存再进行复制,理所当然内存大了,复制时间也会变长. 我决心针对目前我所遇到的问题,再写一个文件读取类,目前就叫tfastfilestream吧,它必须从tstream继承而来,这样才能与其它组件方便地结合起来. 首先,要解决的是打开大文件慢的问题,对于这个,使用mapviewoffile(),将文件直接当作内存镜像来访问就可以了,关于mapviewoffile(),以及文件内存镜像,可以参考这篇文章:http://www.vccode.com/file_show.php?id=2409 delphi下建立文件镜像的方法为: constructor tfastfilestream.create(const afilename:string); var filesizehigh:longword; begin ffilehandle:=createfile(pchar(afilename),generic_read,file_share_read,nil,open_existing,file_attribute_normal,0); if ffilehandle=invalid_handle_value then begin raise fastfilestreamexception.create(error when open file); end; ... 下一页