пятница, 2 октября 2015 г.

Клиент-серверное приложение с API-функциями в Delphi

И еще одна задача с применением API-функций в Delphi. В ней используется клиент-серверное приложение, управляющее компьютером в локальной сети. Листинги для клиентской и серверной части программы вы сможете скачать в конце статьи.

Задача


Написать клиент–серверную программу, реализующую удаленное управление компьютером с помощью сокетов.

Принцип работы программы


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

С другого компьютера загружаем программу клиент. После загрузки мы видим такое окно:

Клиент-серверное приложение с API-функциями в Delphi

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

Клиент-серверное приложение с API-функциями в Delphi

После этого мы подключаемся к серверу и можем делать с ним такие вещи:
  1. Перезагрузить компьютер.
  2. Выключить компьютер.
  3. Сворачиваем все открытые окна.
  4. Открываем окно «Блокнота».
  5. Ограничить передвижение мыши.
  6. Оставить мышь в покое.
  7. Отключить кнопку «Пуск».
  8. Включить кнопку «Пуск».
  9. Отключить сервер.
Клиент-серверное приложение с API-функциями в Delphi

Скачать исходники клиентской и серверной части этой простенькой программы вы можете здесь:

.

Также вы можете изучить программы для получения информации об объеме дисков с помощью API-функций и управления CD-ромом.

Комментариев нет:

Отправить комментарий