Передача переменной по сети

← →
Ezhik (2004-09-26 15:50) [0]

Здравствуйте. Дело такое: на удалённой машине поизводится поиск файлов и папок и результатом является переменная типа TSearchRec. Мне надо "без потерь" отправить эту переменную на сервак. Как это сделать, ибо как текст ее отправить нельзя. Чувствую тут пахнет потоками... Дайте примерчик плиз, или совет...

← →
Rouse_ © (2004-09-27 09:49) [1]

var SR: TSearchRec; Buffer: array of Byte; begin ... SetLength(Buffer, SizeOf(TSearchRec)); Move(SR, Buffer[0], SizeOf(TSearchRec));
тут отправляй буфер...

на приемке делай так:

Move(Buffer[0], SR, SizeOf(TSearchRec));

← →
Digitman © (2004-09-27 10:29) [2]

> Rouse_

и зачем это ? в смысле промежуточный буфер ?
"загвоздка" у него, у автора, в другом - в структуре TSearchRec есть ссылки на дин.данные (string)

> [2] Digitman © (27.09.04 10:29)
Ну это чтоб было понятно что вообще нужно отправлять :)

А TFileName = type string; это я действительно недосмотрел.

Строка там в единственном месте идет а остальной размер статический...
Соответственно общая длинна минус статический размер = размер строки :)

Передача переменной по сети Найти похожие ветки