И какой смысл маятся с As Top-Level формами, когда все-равно работаешь как с основным экраном VFP? Ну да ладно, это дело вкуса.

Если я правильно понимаю, то порядок активизации форм определяется порядком следования форм в коллекции _SCREEN.Forms. Т.е. активна всегда форма с индексом 1. По ее закрытии будет активизирована форма с индексом 2 и т.п.

Естесственно, следует учитывать, что при удалении формы индексы будут сдвинуты.

Изменить порядок следования форм в коллекции можно через метод ZOrder() и Show().

Ну а отображение (не путать с активизацией) формы поверх других форм можно регулировать свойством AlwaysOnTop=.T.

Я так понимаю, это после опыта работы на Delphi :)

Подавить системное меню в главном окне можно командой SET SYSMENU OFF, но вообще-то запуск своего меню замещает системное (зависит от настроек). Т.е. создаешь свое меню в дезайнере, затем DO MyMenu.mpr и в основном окне FoxPro вместо системного будет твое собственное меню.

А "иногда" - это копай свой код. Я привел ситуации когда это может произойти. Поскольку речь идет о As Top-Level формах, то вероятно возможны еще какие-нибудь заскоки.

В общем случае, программирование на основе As Top-Level форм более трудоемкое занятие, по сравнению с программированием в основном окне FoxPro.

Вообще-то, идеология программирования FoxPro и Delphi сильно отличается.

Если в качестве управляющего используется основное окно FoxPro, то управление осуществляется как правило, через собственно меню или ToolBar накладываемое на это основное окно. Поэтому речь никак не идет о том, что подавить системное меню или скрыть заголовок окна.

Если интересно, то управление основным окном FoxPro осуществляется через специальный объект с именем "_SCREEN". Например:

_SCREEN.Caption="Новый заголовок главного окна"

Объект _SCREEN очень похож на объект-форму, хотя есть и отличия. В хелпе подробно описаны все его свойства и методы.

Ряд настроек основного окна можно сделать еще ДО открытия FoxPro в файле конфигурации Config.FPW (это обычный текстовый файл). Например, тот же заголовок можно задать в нем так:

TITLE=Новый заголовок главного окна

*******************

Если дать команду:

_SCREEN.Forms(2).ZOrder(0)

то в случае если форма с индексом 2 в коллекции Forms НЕ модальная, то она выйдет на передний план и ее индекс в коллекции Forms станет равным 1. Для модальных форм я не проверял - не знаю к чему это приведет.

Аналогично ведет себя метод SHOW().

Поскольку у тебя речь идет о цепочке модальных форм, то индекс родительской формы в коллекции Forms ВСЕГДА будет на 1 больше дочерней.

Активная в данный момент форма ВСЕГДА имеет индекс 1 в коллекции Forms

Еще посмотри такие функции WOUTPUT(), WONTOP()

Можно "напомнить" форме, чтобы она оказалась сверху такой командой:

ThisForm.AlwaysOnTop=.T.
ThisForm.AlwaysOnTop=.F.