急啊!!!用TStrm和TStrmServer传送文件的问题(100分)

  • 主题发起人 主题发起人 lovelypengpeng
  • 开始时间 开始时间
L

lovelypengpeng

Unregistered / Unconfirmed
GUEST, unregistred user!
接收方如何知道收到的文件名?
 
在传输之前先发送标志位+文件名,接收方因标志位知道将接收文件
delete(filename,1,1)获得文件名;很容易啊!
 
是啊!吧文件名称加在信息头中即可!

_HD=Record
_FileS:String[81];
_Size:DWord;
End;
Var
_H:_HD;
begin
_H._FileS:='Command.com';
_H._Size:=93872;{假设用其他方法得到文件长度}

strm1.sendbuffer(_H,sizeof(_HD));//发送信息头

strm1.sendbuffer(DataP,length);//发送数据
end;
 
后退
顶部