Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.04.02;
Скачать: CL | DM;

Вниз

Программа поверх окон   Найти похожие ветки 

 
Dec ©   (2006-03-14 17:26) [0]

Я написал программу, которая сворачивается в SysTray. По таймеру должно развернуться главное окно программы поверх всех других окон и сделаться активным.
Вот код:
 frmMain.Show;
 Application.Restore;
 Application.BringToFront;
 Shell_NotifyIcon(NIM_DELETE, @NIC);//Удалить иконку из SysTray"я
 Application.ProcessMessages;

Проблема в том, что программа не ведет себя, как задумывалось. Если ничего не делать, то всё нормально. Но если сделать актвиной какую-нибудь другую программу, моя прога хотя и появится поверх других, но не будет активной. А если все программы свернуть, то моё приложение по срабатыванию таймера будет только мигать на панеле задач.
Я попробовал функции BringWindowToTop, SetForegroundWindow, ShowWindow - ничего не помогает.
Подскажите, пожалуйста, как сделать так, чтобы моё приложение при любых условиях выводилось поверх окон и делалось активным.


 
ASoft   (2006-03-15 07:37) [1]


> frmMain.Show;
>  Application.Restore;
>  Application.BringToFront;
>  Shell_NotifyIcon(NIM_DELETE, @NIC);//Удалить иконку из
> SysTray"я
>  Application.ProcessMessages;


Поменяйте очередность событий. frmMain.Show - не нужно, если это не та форма, которую нужно показывать при Application.Restore



Страницы: 1 вся ветка

Текущий архив: 2006.04.02;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.06 c
2-1142896896
jenya_rus
2006-03-21 02:21
2006.04.02
Экспорт имен и расширений файлов в listview.???


15-1141820647
постигаю
2006-03-08 15:24
2006.04.02
нужно сохранить


4-1137428016
sicilla
2006-01-16 19:13
2006.04.02
Доступ к com1


6-1134836998
ReFresh
2005-12-17 19:29
2006.04.02
Отключить "подключение по локальной сети"


2-1142509639
Gentos
2006-03-16 14:47
2006.04.02
Delphi&Html