Передача файлов по сокетам

[xoodoo]

чтобы его принять нужно знать его размер.
а размер ты не передаешь.
так что переделывай отправку с учетом необходимости передачи префикса размера стрима

[Slym]

Сообщение от xoodoo

чтобы его принять нужно знать его размер.
а размер ты не передаешь.
так что переделывай отправку с учетом необходимости передачи префикса размера стрима

Т.е. додумывай протокол

[саша40]

Размер патока вычисляется так:

T:=Stream.Size; //узнаем размер

[xoodoo]

Молодец.
Теперь передай этот размер.

[саша40]

Можно вопрос: какой функцией можно приобразовать int64 и string?(к теме)

[Stilet]

IntToStr() должна сработать.

int64

Это ты типа такого размера пакет передавать собрался?

[Slym]

Сообщение от Stilet

IntToStr() должна сработать.

Это ты типа такого размера пакет передавать собрался?

перед передачей размера, надо будет передавать размер размера

[Аватар]

Умники Просто Stream.Size тип такой имеет, вот и возник вопрос у ТС.

[Slym]

Сообщение от Аватар

Умники Просто Stream.Size тип такой имеет, вот и возник вопрос у ТС.

и как после таких вопросов файл передавать?
если чел не знает IntToStr то в сокеты еще рано

[саша40]

Вот:

if OpenDialog1.Execute=true then
begin
Stream.Clear; //очищаем паток
Stream.LoadFromFile(OpenDialog1.FileName);  //загружаем паток
SizeOn:=floattostr(Stream.Size); //узнаем размер патока
Client3.Socket.SendText('Fil');//отправляем сообщение
Client3.Socket.SendText(SizeOn);  //посылаем размер
Client2.Socket.SendStream(stream); //отправляем паток
TrayIcon.ShowBalloonHint('ForterGo','Передан файл: ' + OpenDialog1.FileName,bitInfo,10);
end;

int64 близок к типу real