CBuilder6.0采用NMUDP控件写UDP发送程序，最多只能发送8K的数据，求高手指导

[紫龙2012]

CBuilder6.0采用NMUDP控件写UDP发送程序，最多只能发送8K的数据，求高手指导。贴代码如下：
//发送数据
void __fastcall TForm1::Button2Click(TObject *Sender)
{
if(Edit1->Text == "")
{
ShowMessage("请选择一个文件进行传送！");
return;
}
if(Edit2->Text == ""||Edit3->Text == "")
{
ShowMessage("请正确填写远程主机IP和端口号");
return;
}

NMUDP1->RemoteHost = Edit2->Text;
NMUDP1->RemotePort = StrToInt(Edit3->Text);

NMUDP1->ReportLevel = Status_Basic;
Memo2->Clear();
//载入文件流
TFileStream *Strm = new TFileStream(Edit1->Text,fmOpenRead);
const int bufLength = 2048;
char *Buffer = new char[bufLength];
int BuffSize = Strm->Size;
int Buf = BuffSize/bufLength;

for(int i=0;i<Buf+1;i++)
{
if(BuffSize>bufLength)
{
Strm->Read(Buffer,bufLength);
NMUDP1->SendBuffer(Buffer,bufLength,bufLength);
}
else
{
Strm->Read(Buffer,BuffSize);
NMUDP1->SendBuffer(Buffer,BuffSize,BuffSize);
}
BuffSize=BuffSize-bufLength;
}

delete Buffer;
delete Strm;

接收方
void __fastcall TForm1::NMUDP1DataReceived(TComponent *Sender,
int NumberBytes, AnsiString FromIP, int Port)
{
char *TmpBuff = new char[NumberBytes+1];
int i ;
//读取接收到的文件流
NMUDP1->ReadBuffer(TmpBuff,NumberBytes,i);
TmpBuff[NumberBytes] = '\0';
Memo2->Text = Memo2->Text+TmpBuff;
int iFileHandle;
if(!FileExists("E:\\dd.txt"))
iFileHandle = FileCreate("E:\\dd.txt");
else
{
iFileHandle = FileOpen("E:\\dd.txt",fmOpenReadWrite);
}

FileSeek(iFileHandle,0,2);
FileWrite(iFileHandle,TmpBuff,NumberBytes+1);
FileClose(iFileHandle);
delete TmpBuff;
}

[紫龙2012]

是不是太简单了 都没有人回答 好伤心~~··

[紫龙2012]

我是分成了2048个字节在传输，可还是只能传8k,所以才郁闷呢，说硬件限制也不太可能吧，都什么年代了 随便一个交换机也应该不止8k，我问了高手同事，他说网卡的缓存是8k，应该跟这个有关系，但他也没空细究

[我不懂电脑]

8k是因为网络硬件的限制造成的。需要更换更好的网络硬件

[缘中人]

能不能分多次发

[土著巫师]

什么年代了，居然还有人用NMUDP开发UDP通讯程序。 可以肯定与硬件一毛钱关系木有。初步扫了一下代码，如果代码本身没有错误（从来没用过NMUDP这个垃圾，推荐你用ICS异步组件，ICS官网可下载），可能是丢包造成的，建议不要在接收事件里每次数据来的时候重新打开或新建文件，建议把文件打开或新建的动作移到事件外面预先准备好，这样每次数据来时定位文件末尾写入即可。当然也有可能是NMUDP本身不完善你使用不得法的原因，暂不在考虑中。