Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Мерцание при прорисовке Image [D6]


O?O ©   (2004-10-30 07:13:00) 

По таймеру делаю движение фигуры, к примеру квадрата слева направо до правого края Image потом справа налево до левого края и так далее. Делаю в цикле

 Сначала стираем предыдущее положение

 Im.Canvas.Pen.Width := 1;
 Im.Canvas.Brush.Color := clBtnFace;
 Im.Canvas.Pen.Color := clBtnFace;
 Im.Canvas.Rectangle(0,0,Im.Width,Im.Height);

 Затем рисуем новое

 Im.Canvas.Pen.Width := 1;
 Im.Canvas.Brush.Color := clBtnFace;
 Im.Canvas.Pen.Color := clBtnFace;
 Im.Canvas.Rectangle(X,Y,X+100,Y+100);

X и Y меняем с какимнибудь шагом.

Всё бы хорошо, только прорисовка неплавная а иногда проскальзывают мерцания, типа квадрат до конца не прорисовался сразу, глазу очень заметно. Помню когда-то еще в Турбо паскале чтоб небыло мерцаний как-то там синхронизировали прорисовку с обратным ходом луча, может и в дельфях надо что-то такое делать?


O?O   (2004-10-30 07:53:00) [1]

Бальшой спасиб :)
Очень выручили


AZ   (2004-10-30 07:25:00) [2]

Попробуй
DoubleBuffered:=True


Наверх

Титульная страница Поиск, карта сайта Написать письмо