Как отправить при помощи "ServerSocket" Переменную типа массив?

← →
Galiaf (2005-04-26 22:33) [0]

Переменная A:array[0..10] of string, необходимо послать клиенту всё содержимое этой пераменной. Кто знает, поделитесь

← →
kami © (2005-04-27 00:33) [1]

Проще всего так:
(s,s1:array[0..10] of string)
На сервере:
procedure TForm1.Button1Click(Sender: TObject); var ms:TMemoryStream; begin ms:=TMemoryStream.Create; ms.Write(s,SizeOf(s)); ms.Seek(0,soFromBeginning); ServerSocket.Socket.Connections[0].SendStream(ms); end;
На клиенте:
procedure TForm1.ClientSocketRead(Sender: TObject;Socket:TCustomWinSocket); begin Socket.ReceiveBuf(s1,Socket.ReceiveLength); end;
Но так неправильно, пересылка массива может разбиться по пакетам, да и сам массив может не влезть в один пакет. Я бы пересылал в первую очередь размер массива (sizeof), а потом - сам массив.
На приемной стороне использовал бы тот же ReceiveBuf, но дописывал в созданный при приеме первого пакета поток, контролируя оставшуюся длину. После приема всех данных - записать из потока в массив.

← →
Digitman © (2005-04-27 08:14) [2]

> Galiaf (26.04.05 22:33)

в цикле от 0 до 10 посылаешь сначала длину i-й строки, следом - собственно стр.данные i-й строки

можно поступить и еще смешнее - загрузить свой массив в StringList, затем прочитать в стр.переменную s св-во StringList.Lines.Text, далее послать длину s и следом собственно буфер s

← →
atruhin © (2005-04-28 13:07) [3]

>>kami © (27.04.05 00:33) [1]
>> Но так неправильно,
Так точно не правильно так как ты оправил только указатели на строки.

← →
atruhin © (2005-04-28 13:07) [4]

>>kami © (27.04.05 00:33) [1]
>> Но так неправильно,
Так точно не правильно так как ты оправил только указатели на строки.

Сознаю свою вину, меру, степень, глубину
И прошу меня направить на текущую войну
Нет войны - я все приму -
Ссылку, каторгу, тюрьму...
Но желательно в июле
И желательно - в Крыму.
:)
(с)Леонид Филатов. Про Федота-стрельца

Ну так до июля и отложим :)

Как отправить при помощи "ServerSocket" Переменную типа массив? Найти похожие ветки