В общем смотрите чего я достиг в этом деле.
MS_Res - стрим который нужно разослать
MS_Res_Bak - пытаюсь сохранять этот же стрим
Этот код работает с двумя клиентами (как в НонБлокинг, так и в ТредБлокинг режимах):
| Код | MS_Res_Bak := TMemoryStream.Create;
MS_Res.Position := 0;
MS_Res_Bak.CopyFrom ( MS_Res, MS_Res.Size );
MS_Res.Position := 0;
Sender_ServerSocket.Socket.Connections[0].SendStream( MS_Res );
MS_Res_Bak.Position := 0;
Sender_ServerSocket.Socket.Connections[1].SendStream( MS_Res_Bak );
|
Пытаюсь написать тот же код, но с циклом. И уже не получается:
| Код |
MS_Res_Bak := TMemoryStream.Create;
for I := 0 to Sender_ServerSocket.Socket.ActiveConnections-1 do begin
MS_Res.Position := 0;
MS_Res_Bak.Position := 0;
MS_Res_Bak.CopyFrom ( MS_Res, MS_Res.Size );
MS_Res.Position := 0;
Sender_ServerSocket.Socket.Connections[I].SendStream( MS_Res );
MS_Res.Position := 0;
MS_Res_Bak.Position := 0;
MS_Res.CopyFrom( MS_Res_Bak, MS_Res_Bak.Size );
end;
|
У сервера возникает AccessViolation. Ясно, что в отправке ошибка. И где же тут возникает неверное обращение к памяти?? вроде всё просчитал.. нет?
Добавлено через 5 минут и 28 секунд
| Цитата | | Здесь нужно делать поправку на многопользовательский режим. |
Мда, видимо в своём вышеидущем посте я сделал именно такую ошибку...
Т.е. мне теперь, что нужно этот стрим перегнать в String тип? Если так, то как отправлять его? Через SendText? 
Или опять через SendStream? Но если так. то непонятен смысл перегона в String, если после надо будет заново в Стрим кидать..
блин видимо я совсем запутался :(
Добавлено через 12 минут и 33 секунды
| Цитата | | И код нужно строить с учётом того, что другой коннект всегда может вмешаться до завершения процесса. |
А.. вот терь до меня дошло в чём юмор тут.. Только остаётся за гранью понимания как я "эту переменную", которая будет без указателя пошлю клиентам... через какой метод??
Добавлено через 14 минут и 51 секунду
Хм.. если ты говоришь, что String хранить может и бинарные данные, то может и правда перекачать Стрим в Стринг и этот Стринг отправить через SendText? Или бред? |
