компонент Tserversocket возвращает ошибку Опции

[Guest*]

Пишу простейший код на кнопку:

Код

 ServerSocket1.Port := 1122;
 ServerSocket1.Active := true;

сразу ошибок не возникает, а вот если закрыть приложение, то ошибка: "Windows socket error: получен недопустимый аргумент (10022), on API 'closesocket'"
Помню что этих двух строк мало.. кто-нить напомнит, что ещё необходимо прописать для корректного запуска серверного сокета?

[FrykT]

Попробуй всю эту шнягу сунуть в
//try
//
//except end;

и можно еще ApplicationEvents сунуть, чтобы ошибки не вырывались наружу.
там где
onException, пишешь
// if false then