Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 06.11.2011, 11:31
vanya3345 vanya3345 вне форума
Прохожий
 
Регистрация: 23.10.2011
Сообщения: 10
Репутация: 10
По умолчанию Как передать какое-либо действие по Интернету при помощи сокетов?

Здравствуйте! Вот я умею при помощи сокетов отправлять текст. Даже свой чат для нескольких человек недавно создал. Но вот только у меня вопрос. А как при помощи сокетов передавать различные действия? Вот, например. Я являюсь сервером. При нажатии на кнопку Button1, у клиента кнопка Button2 становится неактивной. А если я нажму на кнопку Button2, то у клиента откроется вторая форма. Как это сделать??? Заранее спасибо!
Ответить с цитированием
  #2  
Старый 06.11.2011, 13:13
Аватар для PhoeniX
PhoeniX PhoeniX вне форума
Always hardcore!
 
Регистрация: 04.03.2009
Адрес: СПб
Сообщения: 3,239
Версия Delphi: GCC/FPC/FASM
Репутация: 62149
По умолчанию

Так же, как текст. И обрабатывать у пользователя входящие сообщения специальным образом.
__________________
Оставайтесь хорошими людьми...
VK id2634397, ds [at] phoenix [dot] dj
Ответить с цитированием
  #3  
Старый 06.11.2011, 13:22
vanya3345 vanya3345 вне форума
Прохожий
 
Регистрация: 23.10.2011
Сообщения: 10
Репутация: 10
По умолчанию

Цитата:
Сообщение от DJ PhoeniX
Так же, как текст. И обрабатывать у пользователя входящие сообщения специальным образом.
А какой код писать-то надо? Например?
Ответить с цитированием
  #4  
Старый 06.11.2011, 13:48
Аватар для PhoeniX
PhoeniX PhoeniX вне форума
Always hardcore!
 
Регистрация: 04.03.2009
Адрес: СПб
Сообщения: 3,239
Версия Delphi: GCC/FPC/FASM
Репутация: 62149
По умолчанию

В сервере, Button1.onClick:
Код:
var
  s: string; // Наша строка для отправки
begin
  s := 'Сделать кнопку 2 неактивной!';
  ... // Отправляем строку, как в чате.
end;
В клиенте, событие "нового сообщения":
Код:
var
  s: string;
begin
  ... // Получаем в s наше сообщение
  if s = 'Сделать кнопку 2 неактивной!' then Button2.Enabled := false;
  ...
end;
Текст сообщения, который и служит сигналом к выполнению, можно сокращать, изменять и тд, но он должен быть одинаковым в обеих программах.
__________________
Оставайтесь хорошими людьми...
VK id2634397, ds [at] phoenix [dot] dj
Ответить с цитированием
  #5  
Старый 06.11.2011, 14:12
Аватар для M.A.D.M.A.N.
M.A.D.M.A.N. M.A.D.M.A.N. вне форума
Sir Richard Abramson
 
Регистрация: 05.04.2008
Сообщения: 5,505
Версия Delphi: XE10
Репутация: выкл
По умолчанию

Феникс, зачОт))

ТС, поищи в инете сорцы NetBus, там как раз на должном уровне все реализовано.
__________________
— Как тебя понимать?
— Понимать меня не обязательно. Обязательно меня любить и кормить вовремя.


На Delphi, увы, больше не программирую.
Рекомендуемая литература по программированию
Ответить с цитированием
  #6  
Старый 06.11.2011, 15:03
Аватар для PhoeniX
PhoeniX PhoeniX вне форума
Always hardcore!
 
Регистрация: 04.03.2009
Адрес: СПб
Сообщения: 3,239
Версия Delphi: GCC/FPC/FASM
Репутация: 62149
По умолчанию

Мэд, по-моему, 356648723643445330534474355344763775332F3679447849 4F2F6C384F4C75342B346737764C6935664C674C434471344F 6F673865546C362B44792F43447937697767392F4C75495038 67376544763650486736794469376944693875377737757767 4C513D3D NetBus ему рановато ковырять...
__________________
Оставайтесь хорошими людьми...
VK id2634397, ds [at] phoenix [dot] dj
Ответить с цитированием
  #7  
Старый 06.11.2011, 16:58
vanya3345 vanya3345 вне форума
Прохожий
 
Регистрация: 23.10.2011
Сообщения: 10
Репутация: 10
По умолчанию

Цитата:
Сообщение от DJ PhoeniX
В сервере, Button1.onClick:
Код:
var
  s: string; // Наша строка для отправки
begin
  s := 'Сделать кнопку 2 неактивной!';
  ... // Отправляем строку, как в чате.
end;
В клиенте, событие "нового сообщения":
Код:
var
  s: string;
begin
  ... // Получаем в s наше сообщение
  if s = 'Сделать кнопку 2 неактивной!' then Button2.Enabled := false;
  ...
end;
Текст сообщения, который и служит сигналом к выполнению, можно сокращать, изменять и тд, но он должен быть одинаковым в обеих программах.
Спасибо хоть за это))
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 04:14.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025