|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
16.02.2012, 20:12 | #1 |
Пользователь
Регистрация: 16.07.2011
Сообщений: 21
|
Работа с clientsocket и serversocket
Создаём новый проект и кидаем на форму clientsocket с вкладки internet, 2 edit- в них будем писать ип к которому будем коннектиться и текст мессаги, 8 button- которые будут посылать серверу команды "так же memo там будет лог".
создаем клиент! OnCreate пишем: Код:
var s:string; begin cs.Active:=true; //Коннектимся if cs.Socket.Connected=true then begin //Если подключились то memo1.lines.add('Соединение установленно...'); //пишим в memo end else //в противном случае пишим это memo1.lines.add('Соединение неустановленно...'); //<--вот это теперь у кнопки "Дисконнект" Код:
cs.Socket.SendText('CDOPEN');//посылаем серверу комманду CDOPEN теперь у кнопки "Закрыть сидюк" Код:
Код:
Код:
Код:
а теперь СЕРВЕР На форму кидаем serversocket с вкладки internet У формы в событии OnCreate пишем Код:
Код:
|
20.02.2012, 21:05 | #2 |
Регистрация: 08.09.2011
Сообщений: 5
|
хотя бы ошибку написали что ли...
|
21.02.2012, 10:51 | #3 | |
Форумчанин
Регистрация: 16.12.2009
Сообщений: 902
|
Цитата:
Примерно так: Код:
Последний раз редактировалось Aliens_wolfs; 21.02.2012 в 10:57. |
|
08.07.2012, 20:25 | #4 |
Новичок
Джуниор
Регистрация: 08.07.2012
Сообщений: 1
|
"
Код:
ЦИТИРУЯ ЧУЖОЙ КОД, ХОТЯ БЫ ИСПРАВЛЯЙТЕ ЯВНЫЕ ОПЕЧАТКИ АВТОРОВ. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Работа ServerSocket ClientSocket с внешним ip | Anton911 | Работа с сетью в Delphi | 21 | 28.08.2011 12:06 |
Работа с ServerSocket и ClientSocket | ***СкаЙ*** | Работа с сетью в Delphi | 3 | 22.05.2010 14:09 |
Работа с ClientSocket и ServerSocket из консоли | D_E_N | Работа с сетью в Delphi | 6 | 28.07.2009 00:27 |
Работа с ServerSocket и ClientSocket | AlDelta | Работа с сетью в Delphi | 12 | 28.09.2008 11:18 |
Работа с Clientsocket и Serversocket | prizrak1390 | Работа с сетью в Delphi | 3 | 26.04.2008 22:59 |