Одновременная работа с несколькими портами через ServerSocket

[Sane2k]

Здраствуйте форумчане. Я столкнулся с небольшой проблемой. Я хочу чтобы программа-сервер слушала одновременно несколько портов(в программе я использую ServerSocket), но к сожелению незнаю как это сделать. Подскажите пожалуйста как это реализовать.

[AngelOfDeath]

Я думаю такое невозможно
Каждый сокет должен иметь свой порт
Только если создать несколько компонентов
Но тогда вопрос сам по себе отпадает
PS. Возможно я не прав

[KORN]

создавай динамично, т.е. в ран тайм сервера и задавай им порты

[Sane2k]

хм... то есть вы предлагаете использовать таймер? Но тогда возникнут проблемы с программой-клиентом, которая по уму должна приконектиться

[KORN]

причем тут таймер... я сказал создавать в реальном времени столько ServerSocket сколько тебе нужно и задавать им порты для ожидания

[Sane2k]

теперь ясно.............

[Sane2k]

извените за вопрос не в тему, а как сделать так, чтобы программа следила за 2-мя процессами и в случае, если один из процессов завершен, то снова запускала программу.

P.S. подскажите учебник для изучения WinAPI для новичка

[KORN]

1) проверяешь хэнл окна и если его нету то запускаешь прогу...
2) на форуме есть тема где выкладываются книги так что в поиск, или есть гугль в котором тоже все это есть... когда уже сами научимся делать что то сами7

[Terran]

а как сделать так, чтобы программа следила за 2-мя процессами и в случае, если один из процессов завершен, то снова запускала программу.

Можете сделать так:

Uses
   ShellApi;
Procedure TForm1.Timer1Timer(Sender: TObject);
Var
H: HWND;
Begin
H:=FindWindow(Nil, 'Заголовок окна');
If H<>0 Then
Exit;
ShellExecute(Application.Handle, 'Open','C:\1.exe' ,Nil, Nil, SW_SHOWDEFAULT);
End;

За процессами не выгодно следить, проще по заголовку окна.

[Sane2k]

конечно с заголовками проще...но вся проблема в том, что следить надо именно за процессами