Здравствуйте, Stepochkin, Вы писали:
в процедуре WriteBuffer прога вылетает с ошибкой_>>В чём может быть дело
S>Вместо Buffer передавай @Buffer[0]
S>Например вместо
S>S>BlockSize := AStream.Read(Buffer, TCP_SOCKET_BUFFER_SIZE);
S>
S>нужно
S>S>BlockSize := AStream.Read(@Buffer[0], TCP_SOCKET_BUFFER_SIZE);
S>
S>Иначе ты перезаписываешь размер массива и естественно Delphi сообщает об ошибке.
Спасибо огромное, проблема решена
