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

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

BitBlt из десктопа в мое окно...


Labert ©   (2004-03-11 20:45:00) 

Задача: нужно на рабочем столе нарисовать картинку (битмап), а еще лучше анимацию(гиф), а еще лучше с полупрозрачностью. VirtualGirl видели? Вот примерно то же самое.

Попробовал так:

Создаю обычное диалоговое окошко, а для прозрачности делаю так:
беру контекст окна десктопа (окно класса SysListView32), и копирую из
него кусок на свое окошко (контекст своего окна беру с помощью GetWindowDC),
потом на контексте своего окна рисую все, что нужно (битмап).

То есть на поверхности моего окна нарисован кусок рабочего стола,
закрываемый моим окном. Таким образом создается иллюзия прозрачности.

Я это делаю при поступлении в мою прогу сообщения WM_PAINT.

Почему-то этот прием работает неправильно. То есть в первый момент все нормально,
но при перемещении моего окна на нем остается изображение, скопированное на него
из десктопа при создании.

Пробовал обрабатывать сообщение WM_MOVE - написал Invalidate(); UpdateWindow();
- не помогает.

Может кто знает, в чем дело?
Подскажите!

Заранее спасибо.


BaDeVlad   (2004-03-11 21:37:00) [1]

Мало того, попробуй включить Active Desctop - еще не то увидишь :)


Наверх

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