Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 03.10.2010, 21:49   #1
Fok
Пользователь
 
Регистрация: 15.05.2010
Сообщений: 43
По умолчанию Minimize

Вопрос наверное простой ,но неполучается

Никак немогу найти событие на эту кнопочку Minimize
Нужно свернуть форму в трей , при помощи CoolTrayIcon у меня получается , а вот при нажатии на форме Minimize , форма сворачивается но вкладка на панели задач остаётся как поправить ?
Fok вне форума Ответить с цитированием
Старый 03.10.2010, 22:05   #2
VladimirVB
Форумчанин
 
Аватар для VladimirVB
 
Регистрация: 12.10.2008
Сообщений: 131
По умолчанию

Размести на форме объект TApplicationEvents с закладки Additional. В этом объекте есть событие OnMinimize. На форме также расположи TTrayIcon. И в событии OnMinimize можешь написать такой код
Код:
Form1.TrayIcon1.Visible := True;  // создали иконку
Form1.Hide;  // скрыли окно
А вообще на эту тему почитай книгу Юрия Ревича "Нестандартные приемы программирования на Delphi"
VladimirVB вне форума Ответить с цитированием
Старый 03.10.2010, 22:08   #3
Fok
Пользователь
 
Регистрация: 15.05.2010
Сообщений: 43
По умолчанию

ето всё понятно но нето
пробую так но всё попрежнему

Код:
procedure TForm1.CoolTrayIcon1MinimizeToTray(Sender: TObject);
begin
  ShowWindow(Handle, SW_HIDE);
  ShowWindow(Application.Handle, SW_HIDE);
end;

Последний раз редактировалось Fok; 03.10.2010 в 22:20.
Fok вне форума Ответить с цитированием
Старый 03.10.2010, 22:49   #4
Fok
Пользователь
 
Регистрация: 15.05.2010
Сообщений: 43
По умолчанию

Ну вот как и говорил всё оказалось проще чем я думал
Код:
procedure TForm1.ApplicationEvents1Minimize(Sender: TObject);
begin
  CoolTrayIcon1.HideMainForm;
end;
Fok вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Windows 7 / Icons - Close, Minimize, Maximize BOBAH13 Свободное общение 9 23.09.2010 23:47
Minimize(Alt Tab) Kostia Win Api 1 21.04.2008 13:05
Как убрать (спрятать) кнопку Maximize на форме чтобы остались только Minimize и Close athlant64 Общие вопросы Delphi 15 11.11.2007 17:08