Developing.ru

Как сделать свое приложение в дельфи поверх всех остальных окон?

есть такое свойство как FormStyle, измени его на fsStayOnTop

Еще есть вариант через WinApi
Для этого в событие OnActivate добавь следующий код:

with form1 do
SetWindowPos(Handle, HWND_TOPMOST, Left, Top, Width, Height, SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE);
end;

Или вопрос заключается в том, чтобы не постоянно находиться "выше всех", а в некоторые момент работы "выбросить себя" поверх всех?

BBB писал(а):Или вопрос заключается в том, чтобы не постоянно находиться "выше всех", а в некоторые момент работы "выбросить себя" поверх всех?

Да. вопрос был в этом но он уже решен.
спасибо.

C_O_D_E,
SetForegroundWindow на самого себя?

Там еще тонкость в том, что в этом случае приложение начнет лишь "подмигивать" на панели задач. А чтобы было переключение, нужно установить SPI_SETFOREGROUNDLOCKTIMEOUT в вызове SystemParametersInfo. Я, во всяком случае, так делал.

Можно и так..
но на панели задач мое приложение не отображается!!

И я не через WinAPI, через событие onpaint. ;-)

BSP писал(а):есть такое свойство как FormStyle, измени его на fsStayOnTop

Это свойство работает только в том случае, если эта форма является основной!

C_O_D_E писал(а):И я не через WinAPI, через событие onpaint. ;-)

Это как? Не очень понял идею.
Кстати, пока окно скрыто другими окнгами, вроде OnPаint для него не вызывается. Нет?

Пожалуйста помогите очень нужно!!!!!!!!!Написать программу на Paskal, которая вычисляет среднюю длину слов в файле, который содержит текст.В данном случае будет считатьтся любая строка символов, которая начинается и заканчивается одним с следующих елеметов: пробел, запятая, точка, начало строки и конец строки.В программе должна быть обозначена функция, которая получает в качестве аргумента поток ввода с файла.

а ещё есть вариант окна создавать модальными