Последние записи
- Как запустить программу указанную в Edit.Text
- Скачать файл с использованием потока
- Поиск слова в Memo
- Распаковщик формата .img из GTA San Andreas
- Подсчет количества повторяющихся букв в файле
- Простейший скрипт загрузки картинки с помощью php
- Рассылка. Выпуск 154
- Получение картинки с веб-камеры
- Скопировать определённый кусок image
- Сделать printscreen экрана и сохранить
4th
Июл
Простой пример работы socket в делфи
Posted by Chas under Пост-обзор
Как можно реализовать чтобы при нажитии на клиенте кнопку на сервере зарабатывала событие или функция например form.color:=clLime;
Leo08:
Вы попробуйте составить так сказать свои команды, которые сервер будет передавать клиенту, и на событие SocketRead у клиента напишите:
If Socket.ReceiveText='Close' then // Если команда закрыть
Self.Close
else
If Socket.ReceiveText='Lime' then // Если команда сменить цвет
Self.Color:=clLime
else // Если оказался обычный текст
Richedit1.Lines.Add(Socket.ReceiveText);И т.д. ну то есть сервер будет передавать команды как текст, а клиент будет их фильтровать…
Ну а с сервера посылайте текст типа Close и Lime