Почему не видна форма???

← →
zam2000 (2002-09-24 21:16) [0]

Программа имеет 2 режима работы:
1. Интерактивный(пользователь нажимает на кнопки- происходят некоторые действия)
2. Режим командной строки(пользователь задает определенный набор операций и программа их выполняет)
Я в обработчик OnShow проверяю, задана ли командная строка, если да то идет обработка заданных инструкций.
Во время обработки все время вызываю Application.ProcessMessages.
Но основная форма все равно не видна.
Никакие Visible, SetWindowPos не помогают.
В общем вопрос в том, как сделать форму видимой не выходя из обработчика OnShow.

← →
хех... (2002-09-24 21:55) [1]

inherited?

← →
zam2000 (2002-09-24 22:10) [2]

Пробовал, не помогает.
В TForm1.FormShow пишу:
inherited;
form1.Show;
for i:= 0 to 1000 do begin Application.ProcessMessages;
sleep(5);end;
application.MessageBox("123","",0);

пока не появится MessageBox, форма не видна.

← →
Юрий Зотов © (2002-09-24 22:43) [3]

> В TForm1.FormShow пишу:
inherited; // Зачем? От чего наследуется форма?
form1.Show; // И возникает рекурсия? Класс Form1 - это TForm1?

Уберите весь мусор и должно заработать. Если обработка операций затрудняет общение юзера с формой, вынесите ее в отдельный поток.

← →
zam2000 (2002-09-25 10:13) [4]

На самом деле как ни странно, рекурсия не получается.
Но не в том дело.
Даже если я пишу просто
for i:= 0 to 1000 do begin Application.ProcessMessages; sleep(5);end; application.MessageBox("123","",0);
в ОnShow, ниче не изменяется, основная форма не видна до появления messagebox.
А отдельный поток здесь не нужен, он усложнит реализацию и в общем решит только эту задачу.
Собственно вопрос сводится к тому, что такое делается после вызова Onshow, после чего становится видна форма и что нельзя сделать вручную.

← →
qube © (2002-09-25 10:20) [5]

Никаких циклов и ProcessMessages в OnShow!

← →
zam2000 (2002-09-25 10:27) [6]

а где командную строку обрабатывать?

Я делаю тупо.
onShow - PostMessage(...,WM_USER,..)

onWM_User
ReFresh и далее по тексту

а где командную строку обрабатывать?
где-угодно, хоть в DPR, хоть в отдельном потоке.

Почему не видна форма??? Найти похожие ветки