By TServerSocket solve two terminal access
One is sent via TClientSocket terminal access, HEX code, through ReceiveBuf receiving;
One is through http://127.0.0.1:7001/? EmpID=233 & amp; ID=3 & amp; Machine_id=910000 browser to access, through ReceiveText receiving;

Now the problem is, if two ways to separate test no problem, if the support visit the following two statements have a problem,

Socket. ReceiveBuf (RBuf, 1024);
RStr:=socket. ReceiveText;

Because behind the first sentence execution does not perform, cache should be emptied, please?