Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2005.11.06;
Скачать: [xml.tar.bz2];

Вниз

Как правельно сделать пинг?   Найти похожие ветки 

 
Sunrice   (2005-10-13 14:07) [0]

В общем задача такая, нужно что бы программа посылала ICMP-пакеты на сервер, если сервер доступен, передавала значение n"ой переменной - 1, если сервер недоступен - 0.
С ShellAPI(или другим компонентом, выполняющим подобные ф-ции) раньше работать не приходилось, понятия не имею как это возможно осуществить. Подскажите пожалуйсто. Спасибо.


 
Digitman ©   (2005-10-13 14:18) [1]

см. ICMPSendEcho()


 
Sunrice   (2005-10-13 14:22) [2]

Какой компонент?


 
Digitman ©   (2005-10-13 14:26) [3]

никакой.
это эксп.ф-ция в составе ICMP.DLL

а если именно компонент интересует, то можно использовать, например, TIdICMPClient (библиотека InDy)


 
Sunrice   (2005-10-13 14:28) [4]

Digitman ©   (13.10.05 14:26) [3]
Просто я незнаю что нужно в uses прописывать.


 
Digitman ©   (2005-10-13 14:30) [5]

если будешь использовать Indy, то ничего не надо.

ты же не удивляешься, что бросив на форму кнопку тебе не приходится при этом ничего в uses прописывать ?


 
Sunrice   (2005-10-13 14:33) [6]

Digitman ©   (13.10.05 14:30) [5]
Эм, забыл добавить, что приложение консолевое %)


 
Fay ©   (2005-10-13 14:45) [7]

2 Sunrice   (13.10.05 14:33) [6]
Создай новое формоваевое приложение и кинь на Form1.
Посмотри на uses.


 
Sunrice   (2005-10-13 15:09) [8]

[Error] Unit1.pas(28): Undeclared identifier: "ICMPSendEcho"
[Error] Unit1.pas(28): Undeclared identifier: "TIdICMPClient"

В любом случаи.


 
Digitman ©   (2005-10-13 15:25) [9]


> В любом случаи.


в каком таком "любом случаи" ?

в случае с ICMPSendEcho() тебе нужно импортировать эту ф-цию из icmp.dll, т.е. прежде чем обращаться к ней ты должен описать ее Паскаль-прототип (см. описание ф-ции в msdn.microsoft.com)

в случае же с TIdICMPClient у тебя в палитре компонентов Делфи должна присутствовать закладка с Инди-компонентами "Indy Clients" .. иначе непонятно, что ты бросал на форму)


> забыл добавить, что приложение консолевое


консолевое оно у тебя будет или неконсолевое - строго по колено)


 
Sunrice   (2005-10-13 15:28) [10]

в случае же с TIdICMPClient у тебя в палитре компонентов Делфи должна присутствовать закладка с Инди-компонентами "Indy Clients" .. иначе непонятно, что ты бросал на форму)

> забыл добавить, что приложение консолевое

консолевое оно у тебя будет или неконсолевое - строго по колено)
Как я это выполню, если консоль? =)


 
Digitman ©   (2005-10-13 16:12) [11]


> Как я это выполню, если консоль? =)


ну а как ты это выполнишь, если, к примеру, "бросить" нужно не какой-то там заумный TIdICMPClient, а обычный "таймер" ? то бишь знакомый до боли TTimer ?

суть-то - одна и та же)


 
Sunrice   (2005-10-13 18:47) [12]

Digitman ©   (13.10.05 16:12) [11]
Незнаю сути. Пояснити.
У меня всё сплошь "Undeclared identifier".


 
Sunrice   (2005-10-13 22:28) [13]

Digitman ©   (13.10.05 16:12) [11] ,2ALL.
Объясните пожалуйсто поэтапно, как пропинговать сервер, до меня никак не доходит =/



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

Форум: "Начинающим";
Текущий архив: 2005.11.06;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.47 MB
Время: 0.066 c
2-1129168891
lmz
2005-10-13 06:01
2005.11.06
Округлени числа бухгалтерским методом


1-1129665369
Volf_555
2005-10-18 23:56
2005.11.06
Как вывести в TMemo содержимое определённой папки


6-1121677512
Drow
2005-07-18 13:05
2005.11.06
отправка писем


14-1129266176
Ega23
2005-10-14 09:02
2005.11.06
С днем рождения! 14 октября


2-1129301519
intel
2005-10-14 18:51
2005.11.06
удаление файла





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский