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

Пинг   Найти похожие ветки 

← →
DeeNamid ©   (2008-08-01 11:21) [0]

Вопрос такой: делаю пинг на удаленные машины, необходимо чтобы пинговалось непрерывно, но так-же нужно переключаться на другие машины, но невозможно остановить процесс пинга. Делаю примерно так:

for i:=0 to 10 do
begin
 result:=ping_func("172.21.161.33");
 if result>0 then res_str:="Время до хоста: "+inttostr(result)+"ms" else res_str:="Превышен интервал ожидания";
end;

И пока цикл не закончен (вообще надо сделать бесконечный) нажать какую-либо кнопку невозможно. Что делать?


← →
Medbe}I{onok XML ©   (2008-08-01 11:27) [1]

нажать какую-либо кнопку невозможно

пружина тугая становится?


← →
Medbe}I{onok XML ©   (2008-08-01 11:29) [2]

File->New->Other->Thread Object


← →
DeeNamid ©   (2008-08-01 11:29) [3]

Ха смешно )) В смысле нажать кнопку на форме, даже закрыть программу нельзя


← →
DeeNamid ©   (2008-08-01 11:30) [4]

Ну а дальше?


← →
Medbe}I{onok XML ©   (2008-08-01 11:32) [5]

а дальше перености свой цикл в тело execute


← →
DeeNamid ©   (2008-08-01 11:48) [6]

Понял надо почитать про потоки


← →
Сергей М. ©   (2008-08-01 12:21) [7]


> надо почитать про потоки


> Ха смешно


Смешней другое - то вопрос твой размещен в "Сети", хотя на месте ping_func с тем же "успехом" может оказаться любая другая функция, не имеющая никакого отношения к сетям.


← →
DeeNamid ©   (2008-08-01 13:20) [8]

Знаю, просто дальше я наверняка буду задавать вопросы по сетям.


← →
Сергей М. ©   (2008-08-01 13:22) [9]


> дальше я наверняка буду задавать вопросы по сетям.


А не рановато ли, если с азами проблемы ?)


← →
Anatoly Podgoretsky ©   (2008-08-01 16:38) [10]

В командной строке ping host -t  и прерывание или Ctrl+C или крестик если в окне.



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

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



Память: 0.47 MB
Время: 0.015 c
3-1205489996
Павел Калугин
2008-03-14 13:19
2008.09.14
Грабли с MySql


11-1193407250
Jon
2007-10-26 18:00
2008.09.14
DirChange filenames


8-1185571678
megajober3d
2007-07-28 01:27
2008.09.14
Как в Delphi получить из BMP файл GIF но "прозрачный"...


15-1216971984
Lamerenok
2008-07-25 11:46
2008.09.14
Как установить Fastnet пакет ?


11-1193050704
DevilDevil
2007-10-22 14:58
2008.09.14
механизм MCK. как реализовать?




   Наверх