我运行 Indy 9.0 例程中的 TCPDataset ,客户端点击 Get Meta Data 按钮后,就死了,服务器端 也运行了,查了一下通讯源码 发现 其程序死在IdTCPConnection单元中的 ReadBuffer procedure TIdTCPConnection.ReadBuffer(var ABuffer; const AByteCount: Integer); begin if (AByteCount > 0) and (@ABuffer <> nil) then begin // Read from stack until we have enough data while (InputBuffer.Size < AByteCount) do begin ReadFromStack;//在此处 CheckForDisconnect(True, True); end; // Copy it to the callers buffer Move(InputBuffer.Memory^, ABuffer, AByteCount); // Remove used data from buffer InputBuffer.Remove(AByteCount); end; end; 我怀疑 是 while (InputBuffer.Size < AByteCount) do begin 有问题,InputBuffer.Size为什么始终是 0呢?谁能帮我解答一下呀!谢谢

加入 application.ProcessMessages

提問者您好:


以上回應是否已得到滿意的答覆？


若已得到滿意的答覆，請在一週內結案，否則請在一週內回覆還有什麼未盡事宜，不然，
將由版主(尚無版主之區域將由副站長或站長)採自由心證,選擇較合適之解答予以結案處理，
被選上之答題者同樣會有加分獎勵，同時發問者將受到扣 1 分的處分。不便之處，請見諒。


有問有答有結案，才能有良性的互動，良好的討論環境需要大家共同維護，感謝您的配合。

------
我是機器人,我不接受簡訊.