Форум: "Основная";
Текущий архив: 2003.06.05;
Скачать: [xml.tar.bz2];

Вниз

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

← →
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 вся ветка

Форум: "Основная";
Текущий архив: 2003.06.05;
Скачать: [xml.tar.bz2];

Наверх

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