Вниз
Скачать: CL | DM;

Файлы идут очень долго.   Найти похожие ветки 

← →
romychk   (2003-09-09 16:04) [0]

Для пересылки файлов использую компоненты: NMStrmServ1, NMStrm1

Вот код.

procedure TForm1.NMStrmServ1MSG(Sender: TComponent; const sFrom: String;
strm: TStream);
var
myFile: TMemoryStream;
begin
MyFile:=TMemoryStream.Create;
MyFile.CopyFrom(strm, strm.size);
MyFile.SaveToFile(imfForReciv);
MyFile.Free;
PryjnatyFail;
end;

NMStrm1.FromName :=imfForSend;
myFile:=TMemoryStream.Create;
myFile.LoadFromFile(imfForSend);
NMStrm1.PostIt(myFile);
myFile.Free;

Файл на 200 кб может идти минут 20, причем сеть хорошая 100мб., если копировать через ВИНД и 20 Мб. не заметишь, может подправить какие то свойства,...?


← →
Digitman ©   (2003-09-09 16:21) [1]


> Для пересылки файлов использую компоненты: NMStrmServ1,
> NMStrm1


чем это обосновано ?
компонеты - без исходных текстов, что там у них внутри происходит - одному богу известно..

чем не устраивают TClientSocket/TServerSocket ?


← →
romychk   (2003-09-09 16:57) [2]

Компоненты из стандартной палитhs компонент Делфи.


← →
Digitman ©   (2003-09-09 17:00) [3]

TClientSocket/TServerSocket - тоже из стандартной, заметь ..


← →
romychk   (2003-09-09 17:23) [4]

Мне кажется что с этими компонентами проще код полчается


← →
Digitman ©   (2003-09-09 17:28) [5]


> romychk


код-то , может, и проще) ... а геморрой - сам видишь какой !


← →
romychk   (2003-09-09 17:37) [6]

Значит, это их стандартное поведение?

Я думаю, нельзя ли увеличить буфер...


← →
Digitman ©   (2003-09-09 17:46) [7]


> romychk


какой ?


← →
romychk   (2003-09-09 18:07) [8]

Наверное, там он должен бить. :)


← →
Digitman ©   (2003-09-10 08:16) [9]


> Digitman


должен) ... но ты не доберешься до хэндла гнезда


← →
AlexDBases ©   (2003-09-10 10:34) [10]

Internet Direct - попробуй...=) коли по проще хочешь


← →
Deff   (2003-09-10 22:48) [11]

Нет, здесь что-то не так, я делал, пользуя те же комноненты, 20-30 Мб файлы слались секунд за 7-10



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

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



Память: 0.47 MB
Время: 0.02 c
4-42245
FIREHACK
2003-09-18 17:04
2003.11.13
Настоящим мастерам _winlogon notifications packages_


14-42076
VEG
2003-10-23 17:30
2003.11.13
HyperTerminal


3-40999
Ord3f8h
2003-10-16 14:39
2003.11.13
Помогите по работе с MySQl


1-41439
Vitalik
2003-10-29 13:06
2003.11.13
перегрузка виртуальных функций


1-41453
volser
2003-10-29 11:02
2003.11.13
Использование SHBrowseForFolder




   Наверх