Добрый день.

Компилирую программу на Delphi XE8.

Программа совершенно простейшая, никаких ухищрений. Три формы Form1, Form2, Form3. При запуске программы открывается Form1, по нажатию Button на Form1 через ShowModal открывается Form2, при нажатии Button на Form2 открывается Form3. Таким образом, открыты три формы, активна Form3, Form1 и Form2 неактивны, так как при открытии было использовано ShowModal. Это всё нормально.

Далее нажимаем кнопку "Свернуть" (_) в заголовке Form3, сворачиваются все три формы. При клике на панели задач разворачиваются все три формы. Всё в порядке. Но так происходит только если запускать программу двойным кликом в Проводнике, либо запускать с помощью F9 из среды Delphi.

Если же запустить программу с помощью ярлыка - формы точно также открываются модально как полагается - но при нажатии "Свернуть" (_) в заголовке Form3 сворачивается только она одна, Form1 и Form2 продолжают висеть на экране. Таким образом, кнопка "Свернуть" полностью теряет свой смысл, так как Form1 и Form2 продолжают висеть на экране неактивные (мешая пользоваться другими приложениями), сворачивается только Form3.

Что я делаю не так? Чем отличается запуск программы с помощью ярлыка и запуск двойным кликом из Проводника? Или это глюк Delphi XE8?

Впрочем, нет. Даже при запуске из Проводника такое же неправильно поведение. Сворачивается только Form3 - просто Form1 и Form2 были спрятаны за окном Проводника и это я не заметил - но если закрыть окно Проводника, откуда запуск и перейти на рабочий стол, формы также висят. Суть проблемы в картинка (первое окно - открыты последовательно три формы), второе - нажал "Свернуть" в Form3, только она и свернулась (а надо чтобы сворачивались все как в нормальной программе - смысла сворачивать одну никакого нет).

Увы, но нет. Что только не пробовал и ваши статьи читал про окна. Всё равно - при нажатии кнопки "Свернуть" в модальном окне сворачивается только оно, остальные окна остаются неизменными и не сворачиваются (странно, зачем они нужны - и почему не сворачиваются - всё равно с ними пользователь ничего не может сделать).

Опцию Application.MainFormOnTaskbar := True; тоже пробовал - не помогает - что при включении что при отключении такое же поведение.

Неужели в довольно-таки современной среде Delphi XE8 такие простые вещи не работают из коробки как нужно? И придется городить огороды (для каждой формы) вроде того, что ниже? С Delphi 7 уходил в том числе ради того, чтобы избежать велосипедов и огородов ...

Да, сворачиваться. По-моему, это наиболее логичное поведение. Зачем сворачивать форму, чтобы посмотреть предыдущую, если её можно просто отодвинуть? К тому же всё равно не будет возможности посмотреть таким образом пред-предыдущую форму, тк кнопка "Свернуть" в предыдущей форме неактивна. Кроме того, при нажатии "Свернуть" - пользователь в большинстве случаев ожидает, что именно всё приложение свернётся - он нажимает "Свернуть" - чтобы иметь возможность, например, перейти на рабочий стол или работать с другим приложением. По крайней мере, пользователь должен - имя в заголовке формы -возможность свернуть всё приложение, а не только одну форму.

ОК, почитаю

Да я собственно нашёл уже способ - как минимизировать все формы при нажатии "Свернуть" (пример выше). Просто я думал - неужели такое поведение, как по умолчанию в Delphi XE8 (когда сворачивается только одна форма, а остальные недоступны, тк форма открыта модально) - нормально. И надо ли городить подобные костыли, когда всё может (как я думал) решаться стандартными средствами (велосипеды я городить умею - просто решил уточнить - действительно ли такие велосипеды необходимы). Всё грешил на Delphi 7 - что окна косячно работают начиная с Windows Vista/7 - а оказывается, на XE8 такая же ерунда ...

уходить надо было не с делфи 7, а с винды. на такую операционку, в которой поведение окон такое как хочется. ну и да. конечно же совсем не обязательно 'городить огороды' для каждой формы. существует, я думаю, как минимум 3-4 способа сделать огород один раз и юзать везде, где нужно. начиная с простейшего наследования.

Нет, вопрос ухода с винды не стоит. Приложение 400 тысяч строк кода под Винду. Да и у самого у меня опыт в Винде более 20 лет, в другом (типа линукс или мак) шарю на уровне чайника, а не программиста.

уходить надо было не с делфи 7, а с винды. на такую операционку, в которой поведение окон такое как хочется. ну и да. конечно же совсем не обязательно 'городить огороды' для каждой формы. существует, я думаю, как минимум 3-4 способа сделать огород один раз и юзать везде, где нужно. начиная с простейшего наследования.

Насколько я понимаю, с Delphi 7 в любом случае надо уходить в 2021 году. Так как велосипедов приходится изобретать всё больше, чтобы приложение более-менее нормально работало на последних версиях Windows.

Я всё прогуглил несколько раз прежде, чем писать. Как я понял - такое поведение Delphi нормальное. Придется таки писать костыли как и в Delphi 7.

makhaon,

Ну если такое поведение Delphi нормальное и чтобы решить задачу, которую я сформулировал, надо писать костыли, нет проблем, буду писать костыли. Благо с наследованием классов за 15 лет работы в Delphi 7 знаком, код который нужен известен и подключить его ко всем формам нет проблем. Просто я думал - может, это как-то решается стандартными средствами, а я как всегда изобретатель велосипедов ...