![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
|
|
#1
|
||||
|
||||
|
Значит зделал я штоб форма сворачивалась в трей. Но теперь когда я её вытаскиваю из трея она ззаде всех остальных програм. (Напремер фирефох итд..)
Незнаю как зделать штоб она была поверх всего... Код:
procedure TMainForm.TrayLButtonDblClick(Sender: TObject); begin //We need to show form when we click on tray icon. Visible := True; //Тут нада впесать штото штоб она была поверх всех после того как разворачивается. end; procedure TMainForm.TrayMinimizeApp(Sender: TObject); begin //We need to hide program in tray when we minimize. Visible := False; end; |
|
#2
|
|||
|
|||
|
а может надо использовать Minimize и Restore, соответственно при сворачивании и восстановлении... каким компонентом пользуешься для трея?
|
|
#3
|
||||
|
||||
|
Raize Components Pack
![]() ShowWindow(MainForm.Handle, SW_RESTORE); - Непомогает. Последний раз редактировалось Intelext, 29.09.2008 в 11:35. |
|
#4
|
|||
|
|||
|
Установи свойство формы FormStyle в положение fsStayOnTop
|
|
#5
|
||||
|
||||
|
Цитата:
|
|
#6
|
|||
|
|||
|
Используй RX-вые компоненты у меня с ними нет проблем.
|
|
#7
|
||||
|
||||
|
Цитата:
Попробуй компоненту CoolTrayIcon - лучшая в своем роде и ооочень проста в использовании. Могу выслать. Пиши info@kotoff.info |
|
#8
|
||||
|
||||
|
Цитата:
|