我有一例子,要不要。
mailto:[email protected]

解决方案 »

  1.   

    要,mailto:[email protected]谢谢!
      

  2.   

    我也有同样的问题谢谢了
    [email protected]
      

  3.   

    我的意见,看看又没帮助
    (1)if MyReceviceLength>10000 then
            {分几次收取数据,在合并}
        else
            {一次性收取数据}
    (2)Socket.ReceiveBuf(MyBuffer, MyReceviceLength); {接收数据包并读入缓冲区内}
       MyBuffer可能包含了MySize 的值,你没分离出来,
    注意你的循环语句  if MySize = 0 then {MySize为服务端发送的字节数,如果为0表示为尚未开始图象接收}
    begin
    S := Socket.ReceiveText;
    MySize := Strtoint(S); {设置需接收的字节数}
    Clientsocket1.Socket.SendText('ready'); {发指令通知服务端开始发送图象}
    end
    else
    begin {以下为图象数据接收部分}顺便我想问一下:MyStream.Position := 0;{注意:必须添加此句}是何意?
      

  4.   

    MyStream.Position := 0;  的意思是回到MyStream开始处。
      

  5.   

    是win2000/xp的吧,系统可能有问题
    我有过同样的经历
    方法:
    if 系统=win2000/xp then 
      if 重装后=有问题 then
         if 其它机器(98/me)上运行=有问题 then
            if 程序=没问题 then 
               halt;
      

  6.   

    欢迎到:http://www.csdn.net/expert/topic/1026/1026938.xml?temp=5.489528E-03讨论,谢谢...