![]() |
Модераторы: Snowy, Poseidon, MetalFan |
![]() ![]() ![]() |
|
MozgZombi |
|
||||
Шустрый ![]() Профиль Группа: Участник Сообщений: 58 Регистрация: 9.1.2011 Где: Екатеринбург Репутация: нет Всего: нет |
Пытаюсь написать два простых приложения сервер\клиент с помощью юнита sockets на free pascal. При запуске сервера, он ждёт подключения, когда я запускаю клиент, который должен посылать сообщение "test", оба окна закрываются. Перед завершением программы пробовал писать readln();, чтобы проверить, что выводят программы перед выходом, оказалось, что ничего не выводят.
Вот код сервера:
Вот клиент:
Разобраться самому было очень трудно, так как опирался только на документацию, в которой лишь был пример приёма сервром сообщения. |
||||
|
|||||
![]() ![]() ![]() |
Правила форума "Delphi: Сети" | |
|
Запрещено: 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делится вскрытыми компонентами
Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Snowy, Poseidon, MetalFan. |
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | Delphi: Сети | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |