Алексей Макаенко дата публикации 28-10-2004 18:02 Программа для общения по локальной сети"Chat For Local Net 2.0" - это программа для общения по локальной сети.
Общаться можно двумя способами:
- Посылать отдельные сообщения, приходящие к адресату во всплывающем окне. Можно отправить несколько сообщений подряд.
- Беседовать в Чате. В программе "Chat For Local Net 2.0" два вида чата - Общий и Приватный. Беседуя в Общем чате, Вы будете рассылать Ваши сообщения всем пользователям чата одновременно. Приватный чат предоставляет Вам возможность конфиденциально побеседовать с одним человеком.
Так же можно отправлять звуковые сигналы. Отравитель посылает сигнал, получатель слышит его
из сиcтемного динамика (PC speaker) или из звуковых колонок, в зависимости от настроек
"Chat For Local Net 2.0", и от конфигурации компьютера получателя.
Все сообщения могут сопровождаться звуковыми сигналами.
Программа предназначена для использования в локальной сети небольшого предприятия, фирмы или
домашней локальной сети.
Программа тестировалась и используется до сих пор в ОАО "Оренбургский хлебокомбинат".
Посылка сообщений осуществляется с помощью UDP протокола.
После запуска программа каждые 5 сек. отправляет широковещательное сообщение, которое
содержит ip-адрес, название компьютера и имя пользователя. (Это не нанесет значительного
урона Вашему сетевому траффику из-за маленького размера пакетов :))
Программа запущенная на другом компьютере принимает это сообщение и регистрирует нового
пользователя в "Списке пользователей".
Поэтому если Вы запустили программу на своём компьютере, через 5 сек Вы автоматически
регистрируетесь на всех компьютерах, где запущен ChatFLN.
При посылке Вами сообщения, или звукового сигнала, это сообщение рассылается по всей сети, но
принимается полько тем, кому адресовано.
Программа начинает работать сразу после запуска. Специальной настройки не требуется.
(при условии что в операционной системе установлен IP-протокол)
- При написании использовались стандартные компоненты Delphi 7 + компонент TTrayIcon опубликованый на сайте Королевcтво Delphi.
- Программа ипользует компоненты Indy TIdUDPServer и TIdUDPClient, причем нет разделения на клиентскую и серверную часть, она является и клиентом и сервером.
- Программа является полноценным Windows-приложением, т.е. обладает справкой и программами инсталляции, деинсталляции.
- При подготовке дистрибутива используется архиватор WinRAR, точнее Rar.exe
- В программе инсталляции используется библиотека unrar.dll.
- папка ChatFLN - исходники программы
- папка Distribution - дистрибутив (папка подготовки дистрибутива)
- Distribution.bat - командный файл подготовки дистрибутива
- Distribution.lst - список файлов дистрибутива архивируемых Rar.exe
- папка Help - для подготовки файла справки, содержит rtf-файл, который компилируется MS Help Workshop в hlp-файл.
- папка Icons - для подготовки иконок
- папка Install - исходники программы инсталляции
- папка Sounds - звуковые файлы
- папка SYSTRAY - компонент TTrayIcon
- папка Temp - папка для временных файлов
- папка UnInstall - исходники программы деинсталляции
- папка UnRAR.dll - модуль UnRAR.pas и библиотека unrar.dll, используемые в программе инсталляции
Думаю исходники представляют несомненный интерес для начинающих программистов Delphi,
и программистов занимающихся написанием сетевых программ.
Скачать:
[UDP] [Локальная сеть]
Обсуждение материала [ 05-08-2008 22:29 ] 10 сообщений |