Tcp клиент, отправка сообщений по одному байту

Доброго всем времени суток!!! Проблема такая, создаю сокет QTcpSocket и и в цикле пытаюсь отправить несколько пакетов в которые записываю по одному байту.На упрощенном примере пытаюсь так:В конструкторе объявляю сокет:Код:m_pTcpSocket = new QTcpSocket(this);Далее после коннектаКод:for (int i=0;iwrite("1");}Пытался и так ))) :Код:void SendToServer() { QByteArray arrBlock; QDataStream out(&arrBlock, QIODevice::WriteOnly); out.setVersion(QDataStream::Qt_4_0); out.device()->seek(0); QByteArray comArray=cmdInput->text().toAscii(); for (int i=0;i