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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 02.10.2009, 22:22   #1
Dryg2009
Заблокирован
 
Регистрация: 10.04.2009
Сообщений: 33
По умолчанию помогите разобраться cooltray

хочу научиться работать с компонентом cooltray все получается только кроме одного

как сделать чтобы при нажатие minimize она не сворачивалась Taskbar а сразу в трей
Dryg2009 вне форума Ответить с цитированием
Старый 03.10.2009, 11:15   #2
QunneD
C++ & PHP & Asm
Форумчанин
 
Аватар для QunneD
 
Регистрация: 06.12.2008
Сообщений: 300
По умолчанию

Цитата:
как сделать чтобы при нажатие minimize она не сворачивалась Taskbar а сразу в трей
Код:
CoolTrayIcon1.MinimizeToTray := True;
QunneD вне форума Ответить с цитированием
Старый 03.10.2009, 14:06   #3
DeDoK
Форумчанин
 
Аватар для DeDoK
 
Регистрация: 05.11.2007
Сообщений: 392
По умолчанию

А чем не устраивает в свойствах компонента minimizеtotrаy - truе и строчка кода - сооltrауiсоn1.hidеmainform;
DeDoK вне форума Ответить с цитированием
Старый 04.10.2009, 12:26   #4
Dryg2009
Заблокирован
 
Регистрация: 10.04.2009
Сообщений: 33
По умолчанию

CoolTrayIcon1.MinimizeToTray := True; не работает!!


а при TrayIcon1.HideMainForm; выдает ошибку

смотри скрин!!
Изображения
Тип файла: jpg 1.jpg (126.9 Кб, 138 просмотров)
Dryg2009 вне форума Ответить с цитированием
Старый 04.10.2009, 12:29   #5
russian-stalker
Участник клубаДжуниор
 
Аватар для russian-stalker
 
Регистрация: 23.08.2008
Сообщений: 1,616
По умолчанию

//Это сворачивание в трей
procedure TForm1.Button2Click(Sender: TObject);
begin
Application.Minimize; // Will hide dialogs and popup windows as well (this demo has none)
TrayIcon1.HideMainForm;
TrayIcon1.IconVisible := not TrayIcon1.IconVisible;
end;

//это на событие MouseDown у TrayIcon
procedure TForm1.N2Click(Sender: TObject);
begin
TrayIcon1.ShowMainForm;
TrayIcon1.IconVisible := not TrayIcon1.IconVisible;
end;
pushl $0x18E3DF6B
call ICQ
russian-stalker вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите разобраться в С++ saleens7 Общие вопросы C/C++ 5 09.01.2009 17:08
Помогите разобраться raxem Помощь студентам 17 14.09.2008 18:08
Помогите разобраться с С++ igroman Общие вопросы C/C++ 1 03.08.2008 23:15
Помогите разобраться Proof БД в Delphi 13 19.05.2008 10:59