Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Получение протокола звонков по Lan [D5, Win95/98]


Nikola62 ©   (2005-01-18 11:54:00) 

Извините за ламерский вопрос. Подскажите чем можно получать данные с АТС по локальной сети через порт 5103. АТС имеет свой IP адрес.


Eraser   (2005-01-18 16:47:00) [1]

Nikola62
Indy 10 рулит.


kaZaNoVa   (2005-01-18 13:39:00) [2]

Апи сокеты рулят))

пример из моего <censored>

Var  S:TSocket;
.......

S := socket(AF_INET,SOCK_STREAM,IPPROTO_IP);
if s= INVALID_SOCKET then Halt(1);
FillChar(vSockAddr,SizeOf(TSockAddr),0);
vSockAddr.sin_family :=AF_INET;

vSockAddr.sin_port:=htons(StrToInt(port));
vSockAddr.sin_addr.S_addr:=inet_addr(Pchar(ip));

if not connect(S,vSockAddr,SizeOf(TSockAddr)) = 0 {SOCKET_ERROR} then
begin
closesocket(s);
continue;
end;
....


Digitman   (2005-01-18 12:30:00) [3]

если используется TCP-протокол, то, например, компонентом TClientSocket


Наверх

Титульная страница Поиск, карта сайта Написать письмо