FH:=FileOpen(Edit2.Text,fmOpenRead);<br>MH:=CreateFileMapping(FH,nil,Page_ReadOnly,0,FileSize,nil);<br>CloseHandle(FH);<br>MP:=MapViewOfFile(MH,File_Map_Read,0,0,FileSize);<br>CloseHandle(MH); 这是我的传输端的代码<br>FH1:=FileCreate('Files/'+FileName);<br>FileClose(FH1);<br>FH1:=FileOpen('Files/'+FileName,fmOpenreadWrite);<br>FH2:=CreateFileMapping(FH1,nil,Page_ReadWrite,0,size,nil);<br>CloseHandle(FH1);<br>FileMapPointer:=MapViewOfFile(FH2,File_Map_All_Access,0,0,size); 这是接收端的代码,看下什么地方有错误,为什么就是超过1G大的文件就不行呢