Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Изменение размеров рабочего стола [D5, Win95/98]


Porton ©   (2002-04-01 16:17:00) 

Уважаемые Мастера!
Я написал так называемое TrayIcon Application, т.е. кнопку на панели задач заменяет значок в SystemTray. Главное окно сделано в виде панели, которая "прилипает" к верней части десктопа. В момент открытия окна я изменяю размеры десктопа:

SystemParametersInfo(SPI_GETWORKAREA, 0, @WorkArea, 0);
WorkArea.Top := WorkArea.Top + Height;
SystemParametersInfo(SPI_SETWORKAREA, 0, @WorkArea, SPIF_SENDCHANGE);

Десктоп перерисовывается (иконки спускаются вниз на высоту моего окна), и все другие окна, которые после этого максимизируются, "понимают" новую верхнюю границу.
Однако. Те окна, которые уже были открытына этот момент, продолжают свято верить в то, что десктоп не изменился (пока их не максимизируешь).
Как им объяснить, т.е. как заставить все окна перерисоваться?
Заранее благодарен. С уважением, Porton.


Dimaond Cat   (2002-04-01 23:02:00) [1]

Если не будет конкретного ответа то:
Для начала попробуй с помощью тогоже winsight32 (стандартная поставка дельфей) посмотреть какой мессаг пробегается по окнам когда ты изменяешь размеры стандартного таскбара, если не поможет то попробуй сделать свое окно и поставив свой обработчик на application.onmessage & wndproc посмотреть какие сообщения получает твое окно и аппликейшион при ,опятьже таки, изменении размеров того же стандартного таскбара, если это все не даст положительных результатов, то попробуй отсылать всем окнам (видимым) сообщение wm_move или WM_WINDOWPOSCHANGING


Наверх

Титульная страница Поиск, карта сайта Написать письмо