Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом
Логин:
Пароль:
Регистрация | Забыли пароль?

Delphi.int.ru Expert

Другие разделы портала

Переход к вопросу:

#   

Статистика за сегодня:  


Лучшие эксперты

Подробнее »

Вопрос # 722

Раздел: Delphi » Прочее
/ вопрос решён /

Здравствуйте, уважаемые эксперты! Как сделать так, чтобы при сворачивании, приложение сворачивалось в трей?

alone Вопрос решён, но можно продолжить его обсуждение в мини-форуме

Вопрос задал: alone (статус: Посетитель)
Вопрос отправлен: 10 июля 2007, 13:06
Состояние вопроса: решён, ответов: 2.

Ответ #1. Отвечает эксперт: Виталий Лещенко

Здравствуйте, Гадлевский Олег Вячеславович!

В приложении пример использования компонента TTrayIcon.
Он появился вроде как в Delphi 2005... или 2006.
В 2007 есть точно.

Аналогичный компонент есть в библиотеке Jedi.

Приложение:
  1. procedure TForm1.ApplicationMinimize(Sender: TObject);
  2. begin
  3. Hide();
  4. end;
  5.  
  6. procedure TForm1.FormCreate(Sender: TObject);
  7. begin
  8. Application.OnMinimize := ApplicationMinimize;
  9. end;
  10.  
  11. procedure TForm1.TrayIcon1Click(Sender: TObject);
  12. begin
  13. if Visible then
  14. Application.Minimize()
  15. else
  16. begin
  17. Show();
  18. Application.Restore();
  19. Application.BringToFront();
  20. end;
  21. end;
  22.  


Ответ отправил: Виталий Лещенко (статус: 4-ый класс)
Время отправки: 10 июля 2007, 13:32
Оценка за ответ: 5

Комментарий к оценке: Спасибо за пример ))

Ответ #2. Отвечает эксперт: Dron

Здравствуйте, Гадлевский Олег Вячеславович!
Скачайте и установите CoolTrayIcon (скачать можно здесь: https://www.delphi-int.ru/download/file/20/). По-моему, лучший компонент всех времён и народов :-) У TCoolTrayIcon достаточно установить свойство MinimizeToTray в True и всё будет делаться автоматически - даже никакого кода писать не нужно. Удачи!

Ответ отправил: Dron (статус: Студент)
Время отправки: 10 июля 2007, 14:45
Оценка за ответ: 5

Комментарий к оценке: Это хорошо, что так удобно, только вот сейчас его нужно как то подключать и где потом искать этот компонент?

Мини-форум вопроса

Всего сообщений: 14; последнее сообщение — 10 июля 2007, 22:07; участников в обсуждении: 3.
alone

alone (статус: Посетитель), 10 июля 2007, 14:04 [#1]:

А на какой палитре инструментов находится компонент TTrayIcon? чет не могу найти...
Виталий Лещенко

Виталий Лещенко (статус: 4-ый класс), 10 июля 2007, 14:10 [#2]:

Additional
alone

alone (статус: Посетитель), 10 июля 2007, 14:18 [#3]:

А в Delphi 7 он есть?
alone

alone (статус: Посетитель), 10 июля 2007, 14:35 [#4]:

Компонент в смысле
Dron

Dron (статус: Студент), 10 июля 2007, 14:43 [#5]:

В Delphi 7 этого компонента нет. В D2006 уже есть, специально проверил. Есть ли в D2005 - не знаю, не пользовался.
С уважением.
alone

alone (статус: Посетитель), 10 июля 2007, 15:00 [#6]:

Понятно...А я искал :) У меня только Delphi 7... Я скачал архив с CoolTrayIcon, и что теперь? Как подключить компнент?
Dron

Dron (статус: Студент), 10 июля 2007, 15:22 [#7]:

Нужно открыть файл CoolTrayIcon_D6plus.dpk и установить его (нажать Compile в маленьком окне). После этого компоненты появятся на новой вкладке (она называется Tray Icons).
С уважением.
alone

alone (статус: Посетитель), 10 июля 2007, 20:18 [#8]:

У меня не появилось новой вкладки "Tray Icons"... Что то еще нужно сделать? У меня Delphi 7
Dron

Dron (статус: Студент), 10 июля 2007, 20:53 [#9]:

Логика проста. Если вкладка не появилась, значит вы не установили пакет.
С уважением.
alone

alone (статус: Посетитель), 10 июля 2007, 21:20 [#10]:

:) Я запустил файл CoolTrayIcon_D6plus.dpk, после чего выскочила ошибка о том, что не найден файл CoolTrayIcon_D6plus.res, потом я нажал Compile, но вкладки не появилось. Может проконсультируете меня, как правильно устанавливать компоненты?
Dron

Dron (статус: Студент), 10 июля 2007, 21:34 [#11]:

Пакет установился только тогда, когда появилось сообщение, где сказано, что зарегистрированы новые компоненты (например "CoolTrayIcon: TTrayIcon"). А одно нажатие кнопки не даёт вообще ничего. Может у вас там открывается редактор кода с какой-нибудь ошибкой. С каждой библиотеке свой подход (ну не совсем так, конечно, но установка бывает разной).
С уважением.
alone

alone (статус: Посетитель), 10 июля 2007, 21:42 [#12]:

Нужно было нажать Install, сейчас всё работает, спасибо...
Dron

Dron (статус: Студент), 10 июля 2007, 22:05 [#13]:

Да, точно. Что-то меня заклинило на Compile... Скомпилировать и установить - это слегка разные вещи. Прошу прощения.
С уважением.
alone

alone (статус: Посетитель), 10 июля 2007, 22:07 [#14]:

:) Да ладно, главное - работает. Удобно, и правда. Вот еще кнопки скачал, тоже красиво...

31 января 2011, 19:29: Статус вопроса изменён на решённый (изменил модератор Ерёмин А.А.): Автоматическая обработка (2 и более ответов с оценкой 5)

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
Версия движка: 2.6+ (26.01.2011)
© 2005-2025
Текущее время: 22 февраля 2025, 11:29
Выполнено за 0.02 сек.