Как обеспечить чтобы окно было повнрх всех!

← →
Jiurasrasr (2004-08-22 13:54) [0]

Доброе время суток!
Я запускаю из своейпрограммы другое приложение (Microsoft Excel) - как сделать так, чтобы после запуска другого приложеня окно из моей программы находилось сверху него. Т.е. чтобы я мог работать в другом приложении а маленькое окошко висит сверху

← →
ssk © (2004-08-22 14:18) [1]

попробуй так:

SetWindowPos( MainForm.Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE);

← →
Юрий Зотов © (2004-08-22 15:22) [2]

> ssk © (22.08.04 14:18) [1]
Это сработает на один раз. А далее?

> Jiurasrasr (22.08.04 13:54)
Разве FormStyle=fsStayOnTop уже отменили?

← →
ssk © (2004-08-22 15:45) [3]

>Юрий Зотов © (22.08.04 15:22) [2]
> ssk © (22.08.04 14:18) [1]
Это сработает на один раз. А далее?

А что значит один раз? Если не сложно, объясните пожалуйста.
Вот только что проверил: поместил этот код [1] в OnCreate формы, а в обработчик кнопки поместил ShellExecute() с запуском блокнота. Запускаю блокнот по нажатию кнопки, а закрываю как обычно. Форма постоянно находится поверх всех остальных окон.

← →
DVM © (2004-08-22 18:54) [4]

> Запускаю блокнот по нажатию кнопки, а закрываю как обычно.
> Форма постоянно находится поверх всех остальных окон.

До тех пор, пока не найдется другое такое же "умное окно". Или хотя бы вторая копия той же программы. Чтобы удерживать окно наверху (более или менее) надо еще fsStayOnTop или самому написать соотв обработчик WM_WINDOWPOSCHANGING

← →
TUser © (2004-08-22 19:05) [5]

SetForegroundWindow(Handle) после CreateProcess/ShellExecute

> ssk © (22.08.04 14:18) [1]

Вы правы. Почему-то я думал, что SetWindowPos - это одноразовая акция, а далее надо обрабатывать WM_WINDOWPOSCHANGING и ставить SWP_NOZORDER. Спасибо. Век живи - век учись... :о)

Посмотрел в исходники VCL - такой же вызов SetWindowPos стоит в TCustomForm.CreateWnd при fsStayOnTop. Значит, проще выставить это свойство в Object Inspector.

> [2] Юрий Зотов © (22.08.04 15:22)
> > ssk © (22.08.04 14:18) [1]
> Это сработает на один раз. А далее?
>
> > Jiurasrasr (22.08.04 13:54)
> Разве FormStyle=fsStayOnTop уже отменили?

Только при изменении FormStyle в процессе работы программы иногда возникают неприятные глюки, связанные с неправильным отображением окна...

Как обеспечить чтобы окно было повнрх всех! Найти похожие ветки