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

Вниз

Не могу главное окно убрать из TaskBar a при запуске!   Найти похожие ветки 

 
Aleksandr.   (2004-07-19 21:02) [0]

Программа сохраняет состояние главного окна (свернутое, нормальное), при сворачивании она исчезает "в 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, иконка появляется, а само окно программы остается на экране, и на все попытки минимизировать нажатием на иконку минимизации не реагирует, пока не развернешь еще раз (уже развернутое). Что тут не так, не пойму?


 
grom   (2004-07-19 22:23) [1]

ниче не понял но ссылку дам может поможет
http://www.zdima-iv.nm.ru/delphi.html  
icon


 
Aleksandr.   (2004-07-19 23:08) [2]

Мда... увидел полезную строчку: Application.ShowMainForm:=false, и все прошло как по маслу.



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

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

Наверх




Память: 0.47 MB
Время: 0.028 c
8-1084715645
LtSolo
2004-05-16 17:54
2004.08.01
Редактирование картинок и звуков


14-1089396760
Mell
2004-07-09 22:12
2004.08.01
Кто нить знает хоть один адрес типа рамблер.ру русскими буквам


14-1089619301
Alone
2004-07-12 12:01
2004.08.01
Красота по Американски


1-1089896858
faost
2004-07-15 17:07
2004.08.01
StringGrid+ComboBox?


4-1087805509
besen-ok
2004-06-21 12:11
2004.08.01
Можно ли на терминальном сервере в определенной сесиси запустить