Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

передача файлов по сети

Тимофей Юрьевич © (2006-06-13 10:36:00)
привет всем,такой вопрос данным кодом отправляю файл по сети
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 11:06:00) [1]
TClientSocket, TTCPClient, TIdTCPClient

Тимофей Юрьевич (2006-06-13 11:04:00) [2]
окей,можете посоветовать какие то аналогичные?

Сергей М. (2006-06-13 11:02:00) [3]
Луше вообще не использовать NM-компоненты.

Тимофей Юрьевич (2006-06-13 11:00:00) [4]
все равно лезет ошибка,не уж то никак не присечь ее?

Сергей М. (2006-06-13 10:40:00) [5]
try
NMStrm1.PostIt(MyStream);
except
end;

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »