Пишем Чат Для Локальной Сети С Помощью C++ Builder. Клиентская Часть

Добрый день.

Это продолжение статьи , в котором я расскажу о создании клиента для своего чата.

На клиентской стороне серверной части я потратил гораздо больше времени, так как там есть вторая важная составляющая — графическая часть.

Дизайн клиента очень простой, даже примитивный.

Я не видел смысла создавать строку меню в приложении.

На форме 2 панели, одна из них меняет цвет, если клиент подключен к серверу - зеленая, иначе - красная.

Следующая панель содержит TabControl. Я попробовал 5 или 6 вариантов оформления приложения и нашел наиболее удобным использовать компонент TabControl. Его вкладки содержат имена пользователей, находящихся в сети; при выборе соответствующей вкладки начинается переписка с этим пользователем (также отображается история сообщений).

Сообщения отображаются в компоненте «Заметка», сообщения необходимо писать в компоненте «Редактировать» и отправлять нажатием соответствующей кнопки или клавиши Enter. У клиента также есть возможность свернуть окно в область уведомлений.

   

 void __fastcall TFormMain::DrawItem(TMessage& Msg)
 {
      IconDrawItem((LPDRAWITEMSTRUCT)Msg.LParam);
      TForm::Dispatch(&Msg);
 }
 //---------------------------------------------------------------------------
 void __fastcall TFormMain::MyNotify(TMessage& Msg)
 {
     POINT MousePos;
 
     switch(Msg.LParam)
     {
         case WM_RBUTTONUP:
             if (GetCursorPos(&MousePos))
             {
                 PopupMenu1->PopupComponent = FormMain;
                 SetForegroundWindow(Handle);
                 PopupMenu1->Popup(MousePos.x, MousePos.y);
             }
             else
                 Show();
             break;
         case WM_LBUTTONDBLCLK:
         Show();
 
         break;
         default:
             break;
     }
     TForm::Dispatch(&Msg);
 }
 //---------------------------------------------------------------------------
 
 //---------------------------------------------------------------------------
 bool __fastcall TFormMain::TrayMessage(DWORD dwMessage)
 {
    NOTIFYICONDATA tnd;
    PSTR pszTip;
 
    pszTip = TipText();
 
    tnd.cbSize          = sizeof(NOTIFYICONDATA);
    tnd.hWnd            = Handle;
    tnd.uID             = IDC_MYICON;
    tnd.uFlags          = NIF_MESSAGE | NIF_ICON | NIF_TIP;
    tnd.uCallbackMessage

   

• Бюретки

  19 Oct, 24

• Фототехника На Яндекс.картах

  19 Oct, 24

• Электрический Генератор Внутри Обуви

  19 Oct, 24

• Usb-Зарядка На Велосипеде

  19 Oct, 24

• Как 30 Строк Кода Уничтожили 27-Тонный Генератор

  19 Oct, 24

• Постквантовая Криптография И Упадок Rsa – Реальная Угроза Или Воображаемое Будущее?

  19 Oct, 24

• Метаповерхность Для Аналоговых Математических Расчетов

  19 Oct, 24

• Обнаружение Утечки Воды. Еще Одна Интеграция Zabbix И Bolid

  19 Oct, 24

• Большой Ком Грязи, Часть 2.

  19 Oct, 24

• Проект «Правильный Водитель». Вопрос Ответ. Часть 2

  19 Oct, 24