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

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

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

Восстановить пароль
Повторная активизация e-mail

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

Ответ
 
Опции темы Поиск в этой теме
Старый 16.11.2009, 17:26   #1
Johnson
кривокодер ;)
Форумчанин
 
Аватар для Johnson
 
Регистрация: 20.06.2008
Сообщений: 707
По умолчанию Проблема с заголовком и кнопкой таскбара

Здравствуйте, уважаемые!
Подскажите, как решить следующую проблему:
Есть программа с двумя формами (вторая не дочерняя, используется как трей-оповещение).
Если стиль второй формы установлен в bsNone - при показе второй форму на таскбаре появляется соответствующая кнопка, которую я не могу скрыть ни одним из известных способов.
Если ставить стиль в bsToolWindow (учитывая, что в проекте использую набор AlphaControls) - то при сворачивании основной формы пропадают границы второй формы (как заголовок, так и боковые). Предполагаю, что это происходит из-за того, что СкинМенеджер отключает прорисовку шкурок на то время, пока свернута форма. Но... Есть одно "но": прорисовка кнопок не пропадает (в оригинале использую TsButton из АльфаКонтролс).

Вот сделал упрощенный пример своего проекта, AlphaControls не использую, но на основную форму для проверки кинуть СкинМанагер не проблема, я думаю.

Пример: http://nosleep.clan.su/tmp.rar

Подскажите, как избавиться от кнопки в первом случае, и как запретить отключение прорисовки во втором.

Заранее благодарен!
"А как написать праграму?, "ришыти задачьку очинь нада" ©с форума. Жить становится интереснее, жить становится веселее...
{Быть или не быть} {Неуспешный суицид}

Последний раз редактировалось Johnson; 16.11.2009 в 17:35.
Johnson вне форума Ответить с цитированием
Старый 16.11.2009, 18:49   #2
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

Цитата:
как избавиться от кнопки
Как всегда просто:
Код:
procedure TTrayForm.CreateParams;
begin
 inherited;
 //Params.WndParent:= 0;
end;
mihali4 вне форума Ответить с цитированием
Старый 16.11.2009, 18:53   #3
Johnson
кривокодер ;)
Форумчанин
 
Аватар для Johnson
 
Регистрация: 20.06.2008
Сообщений: 707
По умолчанию

эх... всё бы так просто...
в этом случае вторая форма становится дочерней к первой, и сворачивается вслед за ней...
"А как написать праграму?, "ришыти задачьку очинь нада" ©с форума. Жить становится интереснее, жить становится веселее...
{Быть или не быть} {Неуспешный суицид}
Johnson вне форума Ответить с цитированием
Старый 16.11.2009, 19:01   #4
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

Именно просто...
Сделайте
Params.WndParent:= VKform.Handle;
и вторая форма сворачиваться не будет.
И на панели задач ее не будет.
mihali4 вне форума Ответить с цитированием
Старый 16.11.2009, 19:29   #5
Johnson
кривокодер ;)
Форумчанин
 
Аватар для Johnson
 
Регистрация: 20.06.2008
Сообщений: 707
По умолчанию

ну как это не будет) сворачивается же) пробовал я уже этот вариант, и ещё раз щас попробовал...
"А как написать праграму?, "ришыти задачьку очинь нада" ©с форума. Жить становится интереснее, жить становится веселее...
{Быть или не быть} {Неуспешный суицид}
Johnson вне форума Ответить с цитированием
Старый 16.11.2009, 20:51   #6
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

Чудной вы, ей-богу...
Вот ваш проект с этой минимальной переделкой:
tmp.rar
Запускайте экзешник, открывайте вторую форму, сворачивайте первую...
mihali4 вне форума Ответить с цитированием
Старый 17.11.2009, 15:39   #7
Johnson
кривокодер ;)
Форумчанин
 
Аватар для Johnson
 
Регистрация: 20.06.2008
Сообщений: 707
По умолчанию

блин как так?? оО скомпилил Ваш исходник - стала следом и вторая форма сворачиваться. Ваш исходник не правил. Это как?
"А как написать праграму?, "ришыти задачьку очинь нада" ©с форума. Жить становится интереснее, жить становится веселее...
{Быть или не быть} {Неуспешный суицид}
Johnson вне форума Ответить с цитированием
Старый 17.11.2009, 15:53   #8
raxp
Старожил
 
Регистрация: 29.09.2009
Сообщений: 9,713
По умолчанию

сделайте уже свой Caption со своими кнопками и управлением.
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation
raxp вне форума Ответить с цитированием
Старый 17.11.2009, 16:04   #9
Johnson
кривокодер ;)
Форумчанин
 
Аватар для Johnson
 
Регистрация: 20.06.2008
Сообщений: 707
По умолчанию

эмм... немного не понял смысла фразы...
"А как написать праграму?, "ришыти задачьку очинь нада" ©с форума. Жить становится интереснее, жить становится веселее...
{Быть или не быть} {Неуспешный суицид}
Johnson вне форума Ответить с цитированием
Старый 17.11.2009, 16:08   #10
raxp
Старожил
 
Регистрация: 29.09.2009
Сообщений: 9,713
По умолчанию

прямой смысл... нарисуйте свой, кнопки накидайте если нужны, добавьте свои обработчики, форме bsnone
Разработки и научно-технические публикации :: Видеоблог :: Твиттер
Radar systems engineer & Software developer of industrial automation
raxp вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Показать\Скрыть чужое окно с меняющимся заголовком Vol666 Общие вопросы Delphi 17 23.09.2009 17:08
Копирование кнопкой - ? Evgenii БД в Delphi 12 30.07.2009 21:06
Рисунок под кнопкой. segail Microsoft Office Excel 5 21.07.2009 01:27
Проблема с кнопкой MFC Raz0r Помощь студентам 4 12.04.2009 16:27
Как изменить вид ползунка у компонента таскбара (TTackBar)? SkAndrew Компоненты Delphi 3 15.08.2008 16:36