Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > Компоненты Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Здесь нужно купить рекламу за 25 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

Ответ
 
Опции темы
Старый 28.07.2019, 21:32   #1
AlexDX4
Новичок
Джуниор
 
Регистрация: 28.07.2019
Сообщений: 1
По умолчанию TCategoryPanelGroup: Саморазворачивание панели CategoryPanel при разворачивании окна формы во весь экран

Столкнулся с такой проблемой (Delphi XE4).
На форме размещена группа свёрнутых панелей TCategoryPanel.
При разворачивании окна формы во весь экран (двойным кликом по заголовку формы) раскрывается одна из панелей.
Заголовок этой панели после разворачивания окна располагается точно на месте заголовка окна до разворачивания.
Получается, окно развернулось (заголовок прижался кверху, группа панелей сместилась вверх) и после этого TCategoryPanelGroup обрабатывает двойной клик по устаревшим координатам.
При разворачивании окна по системной кнопке проблемы нет.

Пытался отловить двойной клик по заголовку окна, деактивировать группу и активировать позже при onPaint формы - не помогло.

Код:
private
procedure WMNCLBUTTONDBLCLK(var Msg: TMessage); message WM_NCLBUTTONDBLCLK;
...
procedure TForm.WMNCLBUTTONDBLCLK(var Msg: TMessage);
begin
  if Msg.wParam = HTCAPTION then
    if Self.WindowState = wsNormal then    
      CategoryPanelGroup.Enabled:= false;
  inherited;
end;

procedure TForm.FormPaint(Sender: TObject);
begin
      CategoryPanelGroup.Enabled:= true;
end;
AlexDX4 вне форума   Ответить с цитированием
Ответ

Опции темы

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

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Формы в режиме Конструктор на весь экран tumanovalex Microsoft Office Access 0 04.12.2016 13:00
Открытие формы автоматически на весь экран ttsergeitt Microsoft Office Access 0 25.03.2015 08:40
WPF окна. Стиль None. Растянуть на весь экран. Проблемы с этим. Casper-SC WPF, UWP, WinRT, XAML 3 22.08.2010 12:27
как запретить раскрытия формы на весь экран? designer999 Общие вопросы Delphi 10 18.02.2010 17:07
Во весь экран!!! Orodret Общие вопросы C/C++ 2 01.05.2009 17:58


06:15.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.