Помогите плиззз!

← →
oklam (2002-03-07 17:09) [0]

В форуме этот вопрос задовался но, ни один присер не работал!!!
Как через Serversocket послать файл на ClientSocket и сохранить его там под тем же именем что и посылалось???

← →
digitman (2002-03-07 17:10) [1]

какой-же, позволь полюбопытствовать, пример у тебя не работал ? Конкретно)

← →
oklam (2002-03-07 17:25) [2]

Прошу прощения! Я видел только как посылать рисунки, но про файло я ничего толкового не нашёл так, что если сожно в примере?

← →
oklam (2002-03-07 17:31) [3]

Ах да есчё один вопросик, на счёт передачи звука в реальном времени по сетке. Я скачал плагин от Тони но, там какойто формат файла неизвестный, вместо "dpk", "dcr"! Как установить этот компонент?

← →
digitman (2002-03-07 17:38) [4]

а чем передача рисунка от передачи файла отличается ? да ничем ! и в том и другом случае передается содержимое БУФЕРА памяти, куда считана очер.порция данных (неважно каких)

← →
oklam (2002-03-07 17:54) [5]

Я пишу на Дельфях от силы 2 месяца!!! При изменении кода передачи рисунков у меня ваще ни чё не работает!!! Код пожайлусто скажите!
Плиз!

← →
digitman (2002-03-07 18:09) [6]

примерно так

const
DefltBufSize = 8192;
var
fs: TFileStream;
buf: Pointer;
bufsize: Integer;
...

fs:= TFileStream("myfile.ext", fmOpenRead);
GetMem(buf, DefltBufSize);
...
try
bufsize:= fs.Read(buf^, bufsize);
while bufsize > 0 do begin
ClientSocket.Socket.SendBuf(buf, bufsize);
bufsize:= fs.Read(buf^, bufsize);
end;
finally
FreeMem(buf);
end;

← →
oklam (2002-03-07 18:41) [7]

Извини что ламерю, но нельзя ли поподробней разьеснить этот код, что где писать и т.д. Извини что перегружаю, но ты единственный человек который согласился мне помочь.

Помогите плиззз! Найти похожие ветки