Скачать: CL | DM;

Есть ли возможность снизить мерцание компонента?   Найти похожие ветки 

← →
Flex   (2003-05-25 13:13) [0]

Есть ли возможность снизить мерцание компонента TLabel при перересовке.

Владельцем TLabel на форме является компонент TPanel;

procedure TfmAboutBox.FormCreate(Sender: TObject);
begin
lbTask.ControlStyle:=lbTask.ControlStyle+[csOpaque];
Timer1.Enabled:=not Timer1.Enabled;
end;

procedure TfmAboutBox.Timer1Timer(Sender: TObject);
begin
lbTask.Top:=lbTask.Top-2; // перемещение TLabel
if lbTask.Top<-250 then lbTask.Top:=175;
end;

Заранее благодарен.

---

← →
Intell ©   (2003-05-25 13:53) [1]

Видел на форуме, мне помогло:

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


Благодари не меня.

---

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

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.089 c