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

передача файлов по сети   Найти похожие ветки 

 
Тимофей Юрьевич ©   (2006-06-13 10:36) [0]

привет всем,такой вопрос данным кодом отправляю файл по сети
var
 MyStream: TMemoryStream;
 i:integer;
begin
MyStream := TMemoryStream.Create;
NMStrm1.Port := 6711;
NMStrm1.TimeOut := 3000;
try
for i:=0 to listbox1.Items.Count-1 do
begin
NMStrm1.Host :=Listbox1.Items.Strings[i];
nmstrm1.FromName:="User";
MyStream.LoadFromFile(edit1.Text);
NMStrm1.PostIt(MyStream);
MyStream.Free;
end;
finally
end;

ipшники находятся в листбокс,все рапотает норм,но если на удаленном компе не включен клиент,то прога выдает ошибку,помогите как правильно сделать исключения на ошибки


 
Сергей М. ©   (2006-06-13 10:40) [1]

try
 NMStrm1.PostIt(MyStream);
except
end;


 
Тимофей Юрьевич ©   (2006-06-13 11:00) [2]

все равно лезет ошибка,не уж то никак не присечь ее?


 
Сергей М. ©   (2006-06-13 11:02) [3]

Луше вообще не использовать NM-компоненты.


 
Тимофей Юрьевич ©   (2006-06-13 11:04) [4]

окей,можете посоветовать какие то аналогичные?


 
Сергей М. ©   (2006-06-13 11:06) [5]

TClientSocket, TTCPClient, TIdTCPClient



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

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



Память: 0.45 MB
Время: 0.029 c
2-1150115472
Gemorroi
2006-06-12 16:31
2006.07.02
Хлопцы, помогите пожалуста в Delphi сделать.


6-1140518682
Officeman
2006-02-21 13:44
2006.07.02
Передача данных


15-1149515866
Andy BitOff
2006-06-05 17:57
2006.07.02
Идея "интернет-правительства" 8/


15-1148544478
Agent13
2006-05-25 12:07
2006.07.02
2007 Microsoft Office System Beta 2


15-1149709555
Prohodil Mimo
2006-06-07 23:45
2006.07.02
Вот как у нас город украсили :о)




   Наверх