Артефакты при двойной буферизации

← →
HF-Trade © (2010-01-26 08:43) [0]

Доброе утро.
Собсно есть форма, на ней компонент TPanel, на панельке TImage.

При создании формы

DoubleBuffer:=true;
Дабы убрать мерцание от TImage

В обработчике панельки OnMouseDown

ReleaseCapture;
Panel1.Perform(WM_SYSCOMMAND, $F012, 0);

При перетаскивании панельки по форме TImage артефачит...

Подскажите плз, как от этого избавиться?

← →
Вася (2010-01-26 09:33) [1]

> Собсно есть форма, на ней компонент TPanel, на панельке
> TImage.

зачем так сложно-то?TImage просто на форму нельзя поставить?)
а попробуйте так:

procedure TForm1.FormCreate(Sender: TObject); begin Form1.DoubleBuffered:=True; Form1.Panel1.DoubleBuffered:=True; end;

← →
Плохиш © (2010-01-26 11:56) [2]

> procedure TForm1.FormCreate(Sender: TObject);
> begin
> Form1.DoubleBuffered:=True;
> Form1.Panel1.DoubleBuffered:=True;
> end;
>

Дерьмокод.

← →
HF-Trade © (2010-01-27 23:18) [3]

Забыл сказать, что на форме есть еще и TPageControl
[1] Не подходит.

> [3] HF-Trade © (27.01.10 23:18)

мало ли чего еще забыл, пробуй так:
Image.Parent.DoubleBuffered:=True;
но и это может не получится из-за забывчивости...

Артефакты при двойной буферизации Найти похожие ветки