Форум: "Сети";
Текущий архив: 2002.04.22;
Скачать: [xml.tar.bz2];
Внизtraceroute Найти похожие ветки
← →
PL (2002-02-01 20:51) [0]Доброго времени суток. Может кто-нибудь использовал компонент IdIcmpClient в составе Indy. У меня стоит Delphi5 с установленным не ём Indy v.8.0. Пишу небольшую программу для трейсировки.
procedure TForm1.Button1Click(Sender: TObject);
var
i: integer;
begin
for i := 1 to 6 do begin
IdIcmpClient1.Host:="217.73.192.109";
IdIcmpClient1.TTL:=i;
IdIcmpClient1.Ping;
end;
end;
procedure TForm1.IdIcmpClient1Reply(ASender: TComponent;
const AReplyStatus: TReplyStatus);
begin
ListBox1.Items.Add(IdIcmpClient1.ReplyStatus.FromIpAddress);
end;
В итоге первая строчка остаётся пустой (на событие OnReply получаю нулевой ответ). Что это, глюк Инди или мой собственный ?
Кстати не выходит и следующее :
procedure TForm1.IdIcmpClient1Reply(ASender: TComponent;
const AReplyStatus: TReplyStatus);
begin
ListBox1.Items.Add(IdIcmpClient1.ReplyStatus.FromIpAddress);
IdIcmpClient1.TTL:=IdIcmpClient1.TTL+1;
IdIcmpClient1.Ping;
end;
← →
PL (2002-02-05 02:49) [1]Неужели у меня одного такие проблемы ?
← →
copyr25 (2002-02-09 02:19) [2]Нет. Просто Инди... Как-то не хочется связываться с ими:)))
Вот, если бы trace, да без привязанных компонентов?
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2002.04.22;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.006 c