как сделать чтобы при входящем звонке запускалась какая либо процедура?

Надо отследить этот самый входящий звонок.
Есть два пути по которым ты можешь это сделать:
1. использовать TAPI (самому вызывать функции или компоненты Turbo APRO)
2. работать с портом напрямую.
Недостаток 1-го пункта в том, что TAPI подходит далеко не для каждого модема. Я с этим столкнулся. Зато если поддерживает, то работает на ура. Например, Acorp на Rockwell работать через TAPI не захотел, а вот Acorp на Conexant - никаких проблем.
Недостаток 2-го пункта: надо знать протокол обмена модема с компьютером (разные модемы - разные протоколы, особенно если это касается голосовых функций) + сложность реализации обработки звуковых потоков.

Если тебе не нужно работать с голосом, то я бы посоветовал 2-й вариант. Примеров работы с портом много. При входящем звонке модем выдает в порт строку RING (на каждый сигнал). Делай прослушку порта (WaitCommEvent по RX_CHAR) и отслеживай их, а дальше - вызывай свою процедуру.

PS Можно сделать еще интереснее. Модем умеет переводить (мой, после небольшой настройки) посланный абонентом тоновый сигнал в символ соответствующий нажатой кнопке - полет фантазии практически не ограничен.

нашел в API, WaitCommEvent, впринципе как решение подходит если опрашивать порт через определенное время

что значит опрашивать через определенное время? Открываешь порт к которому подключен модем и по WaitCommEvent ждешь пока какой-нибудь символ придет в приемный буфер. А раз символ пришел - значит можно читать с порта (там что-то есть). Так почти все проги построены. Можно, конечно, в TCOMMTIMEOUTS сделать ReadIntervalTimeout:=MAXDWORD. тогда функция ReadFile будет возвращать значение сразу же, не завсисмо от того есть в буфере что-то или нет (кстати, альтернатива для тех кто не хочет заморачиваться с асинхронным вызовом). Т.е. открыл порт и на таймер повесил ReadFile. На этом, если память не изменяет, построен компонент TCommPort32.

Если делать WaitCommEvent, это заблокирует модем для всех приложений. Это не всегда бывает полезно.
Поэтому лучше через определённые интервалы времени открывать COM-порт, проверять состояние RING и закрывать порт...
(или может можно открыть порт как-то, чтобы другие могли его юзать ?)

А если делать WaitCommEvent, то зачем смотреть символы ?
Ждать EV_RING чем хуже ?
(я этим не занимался, просто спрашиваю ради интереса)

Цитата(p0s0l @ 17.12.2004, 22:56)

Если делать WaitCommEvent, это заблокирует модем для всех приложений. Это не всегда бывает полезно.

Да согласен, конечно. Только придется синхронизировать работу этих самых приложений. Если идти этим путем, то я бы, наверное, в одной проге создавал дочерние процессы (вплоть до реализации плагинов). Т.е. все-таки, занимал бы порт одним процессом, а дальше - рулил по ситуации. Что будет, например, если обоим прогам нужен этот самый RING и обоим надо снять трубку?

Цитата(p0s0l @ 17.12.2004, 22:56)

А если делать WaitCommEvent, то зачем смотреть символы ? Ждать EV_RING чем хуже ?

Конечно, и здесь все верно. И в данном случае, наверное, лучший вариант. Просто событие EV_RXCHAR мне кажется более универсальным.

А ведь порт можно открывать только для чтения

Уточняющий вопрос:
Входящий звонок - это установка TCP соединения? Или достаточно самого факта звонка, а соединение устанавливать не нужно?
Если соединение не нужно, то просто садимся на порт, говорим модему, что ждем звонка и сидим, ждем. Как прошел коннект, выполняем и отрубаем.
Если соединение нужно... Когда-то... Был у меня диалап сервер. И в инете валялся классный RAS Server. Вел он и статистику, и айпишники раздавал грамотно, и лимиты вел. Кроме всего запускал он у меня при прозвоне программку, которая нужную мне инфу писала. Но как его найти, даже не подскажу. Помню, что RAS Server, работает сервисом. По-моему другого названия у него и нет...