Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.21;
Скачать: [xml.tar.bz2];




Вниз

Передача файла по сокет-каналу. 


evgen_2001   (2002-03-05 16:53) [0]

Привет мастера!
Не могли бы привести примерчик для передачи файла по сокету?
Заранее благодарен.



Digitman   (2002-03-05 16:59) [1]


var
fs: TMemoryStream;
...
fs.LoadFromFile("filename.ext");
Socket.SendBuf(fs.Memory^, fs.Size);



Kettle of delphi   (2002-03-05 17:34) [2]

2 Digitman ©:
А ваш пример будет корректно работать с файлами произвольного размера? Например, с файлом, > 2.5 Гб?



Digitman   (2002-03-05 17:42) [3]

>Kettle of delphi
Об этом, заметь, речь в вопросе не шла. Будет конкретный вопрос - будут и конкретные комментарии/уточнения.

Резюме : каков вопрос - таков и ответ.



Kettle of delphi   (2002-03-05 18:19) [4]

2 Digitman ©:
Конкретно спрашиваю:
Есть ли способ передать файл произвольного размера с помощью небольшого окличества директив языка?
Мне мыслится, можно читать файл по блокам и передавать каждый из них, например, через буфер. Такой подход хорош и тем, что при сбое, всегда можно восстановить прием/передачу с последнего принятого/переданного блока. Минус - нужно писать много кода. Здесь суть вопроса: нет ли таких директив, которые все описанное делают автоматически?




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.21;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.024 c
1-66859           21333                 2002-03-04 21:19  2002.03.21  
StringGrid


3-66799           perov                 2002-02-20 10:33  2002.03.21  
связывание таблиц


3-66804           AAAPLE                2002-02-22 14:17  2002.03.21  
Записи в BD


1-66895           der                   2002-03-06 08:23  2002.03.21  
круговерть с DLL


4-67060           michael_B             2002-01-11 18:31  2002.03.21  
как проиграть *.wav без использования компонентов(MediaPlayer).