Скачать: CL | DM;

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

← →
delpher_gray ©   (2002-10-23 16:51) [0]

Господа Делферы !
Подскажите можно ли так передать файл через Socket"ы.
Передача:
file: TMemoryStream
Например размер файла: 16000
Сначала послать: "b"+file.size+1000 символов
Затем посылать "f"+следующие 1000 символов до тех пор, пока не передадутся все 16000 символов.

Приём:
Если Socket.ReceiveText[1] = "b", то записать в переменную Size размер файла, затем записать в Steam первые 1000 символов
Если Socket.ReceiveText[1] = "f", то дозаписать в Stream принятые 1000 символов.
Теперь если Stream.Size = Size то просто сохранить файл.

Подскажите можно ли это осуществить ?
Если да, то напишите пример кода.

---

← →
Opuhshii ©   (2002-10-24 10:09) [1]

в Demos от борланда есть

---

← →
Polevi ©   (2002-10-24 10:12) [2]

есть чудо ф-ия TransmitFile, но к сожалению отсутствует аналог ее для принимающей стороны, придется как нибудь самому %-)

---

← →
[fs]_Fobos   (2002-11-02 20:37) [3]

Посмотри: http://delphi.mastak.ru/cgi-bin/forum.pl?look=1&id=1035359119&n=4

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c