Прозрачный компонент (наследник TWinControl)

← →
Vladix © (2006-11-15 16:03) [0]

День добрый!
Вопрос практически весь в теме. Нужно сделать компонент (наследник TWinControl - это обязательное условие!) прозрачным. Что для этого нужно перекрыть в TWinControl"е, чтобы он не трогал фон родительского окна?

← →
thevalery © (2006-11-15 16:18) [1]

Можно перебить обычную отрисовку и стирание фона (WM_ERASEBKGND), но это чревато мусором, т.к. винда считает что на этом месте что-то по-любому должно отрисоваться и в целях оптимизации не дает родителю рисовать в "заявленной" компонентом области. Единственное что приходит на ум - воспользоваться механизмом "фигурных" форм (с помощью маски прозрачности), но применимо ли это здесь - не в курсе. Может проще постановку задачи подправить? ;-)

← →
Vladix © (2006-11-15 16:37) [2]

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

← →
Наиль © (2006-11-15 16:39) [3]

Поставь кнопку на Image с рисунком.
Испытай такой код:
procedure TForm2.Button1Click(Sender: TObject); Var Region:HRGN; begin Region:=CreateEllipticRgnIndirect(Button1.ClientRect); SetWindowRgn(Button1.Handle,Region,True); DeleteObject(Region); end;
Такой способ подходит для компонент, которые редко меняют размер. Например, для кнопок.

Спасибо, при регионы-то я пока даже и не думал в этом контексте. Обязательно попробую

> т.к. винда считает что на этом месте что-то по-любому должно
> отрисоваться и в целях оптимизации не дает родителю рисовать
> в "заявленной" компонентом области.

Неправда. Это зависит от стилей родительского и дочернего окон.
WS_CLIPSIBLINGS и WS_CLIPCHILDREN

Прозрачный компонент (наследник TWinControl) Найти похожие ветки