Как в MDI спрятать панельку, отображающаяся при сворачивании child-окна?

[fedorov2012]

Скажите, пожалуйста, как в MDI приложении спрятать панельку, отображающаяся при сворачивании child-окна (см. вложение)?
Дело в том, что при сворачивания дочернего окна вместо стандартной панельки у меня будут формироваться вкладки на отдельной панели типа как в Windows'e.

[Человек_Борща]

и какой вам тогда смысл в MDI?
Куда вы эти окна денете потом? И откуда будите доставать...

[fedorov2012]

Сообщение от Человек_Борща

и какой вам тогда смысл в MDI?

Самый прямой - работа с дочерними окнами

Сообщение от Человек_Борща

Куда вы эти окна денете потом? И откуда будите доставать...

Очень просто - у меня есть мой специальный класс-список TWindowList для хранения + некоторые полезные методы для этих окон.

[Человек_Борща]

Попробуйте ShowWindow функцию...

[fedorov2012]

Сообщение от Человек_Борща

Попробуйте ShowWindow функцию...

Вообщем посмотрел и провел эксперименты. Работает криво.
Для скрытия дочернего окна MDI-приложения, при этом чтобы не создавалась панелька (см. первоначальный вопрос этого топика) использую такой код:

procedure TMDIChildForm.WMSysCommand(var Msg: TWMSysCommand);
begin
  if (Msg.CmdType = SC_MINIMIZE) then
    ShowWindow(Self.Handle, SW_HIDE)
  else
    inherited;
end

или такой (разницы нет):

procedure TMDIChildForm.WMSize(var Msg: TWMSIZE);
begin
  if (Msg.SizeType = SIZE_MINIMIZED) then
  begin
    ShowWindow(Handle, SW_HIDE);
    Msg.Result := 0; { не понятно зачем нужно обнулять результат, ну да ладно }
  end
  else
    inherited;
end;

Кривизна проявляется в следующем: если открыть два дочерних окна (окно 1 и окно 2), затем окно 1 максимизировать (разворачивается на всю MDIForm), и после чего его свернуть, в результате
это окно 1 спрячется с экрана, и при этом активизируется окно 2, которое было до этого не активно - все вроде бы хорошо, НО если попытаться свернуть окно 2, то вместо скрытие оно разворачивается на всю MDI-форму (максимизируется), если после этого окно 2 вновь попытаться свернуть, то оно свернется но почему-то вдруг появляется окно 1. Какой-то бред вообщем наступает. Почему так получается?

[Аватар]

Потому что Borland так реалализовал MDI-технологию в своё время. Ничего путного у вас не получится

[fedorov2012]

Сообщение от Аватар

Потому что Borland так реалализовал MDI-технологию в своё время

С трудом вериться

[fedorov2012]

Выявлена ещё одна проблема - ShowWindow(Self.Hande, SW_HIDE) скрывает только если Self.Active = True, в случае Self.Active = False оно не работает. Как выяснил:
Открывает в MDI-приложении окно1 максимизируем его, затем открываем окно 2 (оно автоматически максимизируется), затем сворачиваем окно2, а затем окно1, затем максимизируем окно 1 (через ShowWindow(Self.Hande, SW_SHOWMAXIMIZED), а теперь самое интересно когда мы начнем максимизировать окно2 (также через ShowWindow), то окно1 минимизируется почему-то (видать так работает MDI) и вот когда в WMSize этого окна приходит сообщение SW_MINIMIZED Self.Active=False и ShowWindow(Self.Hande, SW_HIDE) просто тупо не прячет окно и у нас в результате возникнет панельки (та что приведена в рисунке в начале топика).
Как заставить ShowWindow(Self.Hande, SW_HIDE) работать при Self.Active = False?

[spamer]

Вы хотите сделать однооконный интерфейс что ли? Тогда вовсе не в ту сторону смотрите...Взгляните лучше, что из себя представляют фреймы...

[fedorov2012]

Сообщение от spamer

Вы хотите сделать однооконный интерфейс что ли? Тогда вовсе не в ту сторону смотрите...Взгляните лучше, что из себя представляют фреймы...

НЕТ, Хочу MDI-приложение с вкладками для окон