| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Не могу главное окно убрать из TaskBar'a при запуске! [D7, WinXP]
Aleksandr. © (2004-07-19 21:02:00)Программа сохраняет состояние главного окна (свернутое, нормальное), при сворачивании она исчезает "в tray", при щелчке на иконке разворачивается. Добавил на форму ApplicationEvents, на OnRestore сделал:
ShowWindow(Application.Handle, SW_RESTORE);
FWS:=wsNormal; // это свойство для запоминания состояния
TI.Active:=false // скрыть иконку
а на OnMinimize:
.
ShowWindow(Application.Handle, SW_HIDE);
FWS:=wsMinimized;
TI.Active:=true
На FormShow после чтения реестра сделал:
if FWS=wsMinimized then
Application.Minimize
, на клик по иконке:
Application.Restore;
Application.BringToFront
. И программа ведет себя странным образом. Если запускаешь ее в нормальном состоянии, затем минимизируешь/разворачиваешь - все в порядке. А если выполняется условие на OnFormShow - то программа исчезает из TaskBara, иконка появляется, а само окно программы остается на экране, и на все попытки минимизировать нажатием на иконку минимизации не реагирует, пока не развернешь еще раз (уже развернутое). Что тут не так, не пойму?
Aleksandr. (2004-07-19 23:08:00) [1]Мда... увидел полезную строчку: Application.ShowMainForm:=false, и все прошло как по маслу.
grom (2004-07-19 22:23:00) [2]ниче не понял но ссылку дам может поможет
http://www.zdima-iv.nm.ru/delphi.html
icon
| |
