Прозрачные окна
Aug. 2nd, 2009 10:47 pm![[personal profile]](https://www.dreamwidth.org/img/silk/identity/user.png)
Хе-хе... долго ковырялся, как сделать частично прозрачное окно типа "Ассистента" у Microsoft Word или скругленных уголков у окна WinAmp. Ковыряния увенчались успехом, так что, если кому надо, делюсь фишкой.
0. Создаем окно WS_POPUP (только этот стиль, больше ничего)
1. Создаем пустой HRGN - CreateRectRgn(0, 0, 0, 0)
2. Добавляем туда (через CombineRgn) все области, которые НЕ должны быть прозрачными. В моем случае это все child-окна, но не само parent-окно.
3. Вызываем SetWindowRgn для этого окна и суммарного HRGN (важно: суммарный HRGN после этого не удаляем)
4. Только после этого делаем окно видимым - через ShowWindow(...SW_SHOWNOACTIVATE)
Роботаед *hop* *hop* :)
0. Создаем окно WS_POPUP (только этот стиль, больше ничего)
1. Создаем пустой HRGN - CreateRectRgn(0, 0, 0, 0)
2. Добавляем туда (через CombineRgn) все области, которые НЕ должны быть прозрачными. В моем случае это все child-окна, но не само parent-окно.
3. Вызываем SetWindowRgn для этого окна и суммарного HRGN (важно: суммарный HRGN после этого не удаляем)
4. Только после этого делаем окно видимым - через ShowWindow(...SW_SHOWNOACTIVATE)
Роботаед *hop* *hop* :)
no subject
Date: 2009-08-02 11:08 pm (UTC)а так — точно то. у тебя 0xffffff цветов, йоба — тебе жалко один на прозрачность отдать? заодно и альфу можно указывать, это гломурно. а если окно постоянно меняет форму (Miner Willy марширует, ага), то с регионами задолбаешься.
а пробовать там нечего — там сесть и написать. %-) у меня где-то на Delphi (ненене, без VCL, WinAPI %-) ещё валяются несколько самопальных скринмэйтов с этой фигнёй.
no subject
Date: 2009-08-02 11:19 pm (UTC)а вот неопреденной формы спрайты - да, с теми так проще.
С альфой я в другом месте игралси...