Вниз
Скачать: CL | DM;

Изменение размеров рабочего стола   Найти похожие ветки 

← →
Porton   (2002-04-01 16:17) [0]

Уважаемые Мастера!
Я написал так называемое 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) [1]

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c
14-7185
igorr
2002-04-25 14:22
2002.06.03
Из серии легких задачек :))


8-7136
UnDISCOvery
2002-01-05 14:02
2002.06.03
Графика и База Данных. Как совместить ?


1-7048
MasterA
2002-05-21 17:27
2002.06.03
Паскаль и файлы.


1-7092
ded_di
2002-05-16 13:34
2002.06.03
Окошко excel в delphi программе


3-6894
Алик
2002-05-08 09:41
2002.06.03
Сеть, lock file is grown too large.




   Наверх