Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.11.11;
Скачать: CL | DM;

Вниз

Полупрозрачность tpngimage на прозрачной форме.   Найти похожие ветки 

 
Дмитрий Белькевич ©   (2007-08-22 19:29) [0]

Дано: форма, на ней лежит png (tpngimage), требуется, что бы его полупрозрачности не мешала форма (сейчас tpngimage полупрозрачен относительно формы, но хотелось бы что бы он был полупрозрачен относительно рабочего стола винды).


 
Lacmus ©   (2007-08-22 20:23) [1]


   procedure WMEraseBkgrnd(var aMessage: TMessage); message WM_ERASEBKGND;
 public
   { Public declarations }
 end;

var
 Form43: TForm43;

implementation

{$R *.dfm}

procedure TForm43.WMEraseBkgrnd(var aMessage: TMessage);
begin
 aMessage.Result := 1
end;



?


 
Дмитрий Белькевич ©   (2007-08-22 20:55) [2]

Работает, но с глюками. При отображении вначале всё ок, но потом места, где альфа-канал прозрачный на png, не прорисовываются. Если каким-то окном потягать над формой, то остаются следы от окна.


 
Lacmus ©   (2007-08-23 17:18) [3]

На Windows XP проблему повторить не удалось, форма с PngImage нормально отображается при операциях с другими окнами, есть проблемы при изменении размеров формы, решается выключением, включением AlphaBlend формы, решение конечно плохое, но другого пока нет.


 
homm ©   (2007-08-23 20:17) [4]

> [0] Дмитрий Белькевич ©   (22.08.07 19:29)

Выслал мылом.


 
Дмитрий Белькевич ©   (2007-08-23 22:29) [5]


> Выслал мылом.


Спасибо, получил. Всё даёт.



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

Текущий архив: 2007.11.11;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.018 c
2-1192699591
DelphiCoder
2007-10-18 13:26
2007.11.11
Перевод Си -> Паскаль...


2-1192777283
Quart
2007-10-19 11:01
2007.11.11
PickList


2-1192517451
Ega23
2007-10-16 10:50
2007.11.11
default-значение пирватного булёвого поля


2-1192877256
P'ero
2007-10-20 14:47
2007.11.11
Как произвести поиск по всему компьютеру (конкретный вайл)?


2-1192367145
Farel
2007-10-14 17:05
2007.11.11
Printing_set