Показать сообщение отдельно
  #5  
Старый 08.09.2015, 06:34
ArhRomm ArhRomm вне форума
Прохожий
 
Регистрация: 05.09.2015
Сообщения: 7
Версия Delphi: Delphi 10
Репутация: 10
По умолчанию

прошу тапками не кидать, знаю, что это говнокод
лучше расскажите, что почитать (темы в книгах), что бы сделать код меньше

клиенты
Код:
ClientSocket1.Socket.SendText('1');
и так по каждой кнопке

сервер
Код:
begin
   s := Socket.ReceiveText;
//1--------------------
    if s = '10' then
      image10.Visible :=true;
      if s = '11' then
      image11.Visible :=true;
      if s = '12' then
      image12.Visible :=true;
      if s = '13' then
      image13.Visible :=true;
знаю, что это костыли, как реализовать по другому, не понимаю
ребят, не прошу готовый код
только темы в книгах, который читать
в идеале ссылки на форумы