как вариант в OnShow запускать отдельный поток, в котором происходят все чудеса.

Здравствуйте, Northsoft, Вы писали:

N>Создаю форму f_progress:=TF_Progress.Create() и показываю её с помощью ShowModal. В OnShow показываемой формы забита куча кода, которая делает очень много работы, и фактически форма лишь отображает процесс её выполнения. Однако в начале OnShow поставлены Self.Show() и Application.ProcessMessages(), также вызовы Application.ProcessMessages() выставлены везде после перерисовки формы. Но форма всё равно не показывается, пока не отработает весь обработчик OnShow. Что ещё нужно указать в OnShow, чтобы форма корректно отрисовалась и далее корректно отрисовывалась по Application.ProcessMessages() ?