int cmd = IDE_SENDFILE;
TMemoryStream *mStream = new TMemoryStream();
mStream->LoadFromFile(filename);
mStream->Seek(0, soFromBeginning);
FClient->Socket->SendBuf(&fid, 4);
FClient->Socket->SendBuf(&cmd, 4);
//都是我定义的标识
FClient->Socket->SendStream(mStream);
然后﹐服务器得到文件
int fid;
int cmd;
int nSize;
int len;
len = Socket->ReceiveLength();
if (len <= 0)
return;
Socket->ReceiveBuf(&fid, 4);
Socket->ReceiveBuf(&cmd, 4);