仙
仙侣边缘人
Unregistered / Unconfirmed
GUEST, unregistred user!
hFile:=CreateFileMapping($FFFFFFFF,nil,PAGE_REAdWRITE,0,Fsize,nil);
if hFile=0 then
Raise Exception.create('无法创建');
Pfile:=MapViewOfFile(hFile,FILE_MAP_ALL_ACCESS,0,0,0);
if Pfile=nil then
Raise Exception.create ('无法映射');
上面的这几行代码在exe里读写一个大于400M的没什么问题，但在ActiveXForm里就会出现ERROR_NOT_ENOUGH_MEMORY
if hFile=0 then
Raise Exception.create('无法创建');
Pfile:=MapViewOfFile(hFile,FILE_MAP_ALL_ACCESS,0,0,0);
if Pfile=nil then
Raise Exception.create ('无法映射');
上面的这几行代码在exe里读写一个大于400M的没什么问题，但在ActiveXForm里就会出现ERROR_NOT_ENOUGH_MEMORY