Indy8异常"Cannot allocate socket" |
尚未結案
|
sdshw
一般會員 發表:8 回覆:11 積分:3 註冊:2008-03-24 發送簡訊給我 |
我在Delphi6 + indy8的环境下写了一个传输图片的程序
为了测试,我在client中每500毫秒自动给server端发送两张图片 但是在运行几个小时后出现"Cannot allocate socket"的异常 请各位老师给与帮助. 以下是client的部分代码: 发送是在单独的线程中运行的 [code delphi] procedure TSendThread.Execute; var m: TMemoryStream; begin Self.FreeOnTerminate := True; try FtcpClient.Connect; m := TMemoryStream.Create; try m.Write(FData, SizeOf(FData)); //发送车辆数据 FtcpClient.WriteStream(m, True, True); if TPackFunction(FData.FunID) = pfNew then begin //发送车牌图 FtcpClient.WriteStream(PlateImg, True, True); //发送近景图 FtcpClient.WriteStream(VehicleImg, True, True); end; finally m.Free; FtcpClient.Disconnect; end; except on E: Exception do begin Form1.mmo1.Lines.Add(e.Message); WriteLog('异常, 原因:' e.Message); end; end; end; [/code] 編輯記錄
taishyang 重新編輯於 2008-03-24 16:41:59, 註解 無‧
|
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |