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

Вниз

почему не обновляется окно?   Найти похожие ветки 

 
Альберт ©   (2007-03-05 20:58) [0]

здравствуйте) вопрос - сабж

var  pt1, pt2:TPoint;
    sz:TSize;
    bf:TBlendFunction;
begin
   pt1 := Point(form1.Left , form1.Top  );
   pt2 := Point(0,0);
   sz.cx := dst.Width;
   sz.cy := dst.Height;

   with bf do begin
     BlendOp := AC_SRC_OVER;
     BlendFlags := 0;
     SourceConstantAlpha :=255;
     AlphaFormat := AC_SRC_ALPHA;
   end;

   BitBlt(getdc(Form1.Handle), 0, 0, Form1.Width, Form1.Height, getdc($0), Form1.Left, Form1.Top, SRCCOPY );

   UpdateLayeredWindow(Form1.Handle, getdc(0), @pt1, @sz, dst.Canvas.Handle, @pt2,0, @bf,ULW_ALPHA);

end;


 
Eraser ©   (2007-03-05 22:16) [1]

> [0] Альберт ©   (05.03.07 20:58)

попробуйте InvalidateRect.

PS
не стОит прорисовывать окно в "левом" методе. Для прорисовки есть OnPaint.


 
Альберт ©   (2007-03-07 01:16) [2]

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



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

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

Наверх




Память: 0.47 MB
Время: 0.026 c
2-1186122337
Eugenepm
2007-08-03 10:25
2007.08.26
Обработка сообщений


15-1185284193
tesseract
2007-07-24 17:36
2007.08.26
Я таки вернулся


2-1186090859
Rumin
2007-08-03 01:40
2007.08.26
как записать clienttoscreen как api функцию


2-1184414949
MRAk
2007-07-14 16:09
2007.08.26
Ужасно ли использование таймера


15-1185369608
С. Егор
2007-07-25 17:20
2007.08.26
AppServ и SSi