| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Помогите с оптимизацией кода [D6, WinXP]
novai © (2009-04-01 06:40:00)есть код:
bgcolor:=Collections[n].bgcolor;
for yy:=0 to Collections[n].ImageDraw.Height-1 do
for xx:=0 to Collections[n].ImageDraw.Width-1 do
if Collections[n].ImageDraw.Canvas.Pixels[xx,yy]<>bgcolor then
Сanvas.Pixels[Collections[n].left+xx,Collections[n].top+yy]:=Collections[n].ImageDraw.Canvas.Pixels[xx,yy];
Collections[n] - TBitmap с небольшими дополнениями (bgcolor)
Сanvas - канва формы
Идея такая: в Collections[n].ImageDraw лежит текущая картинка анимации (спрайта), каждые 10мс идет перерисовка всей сцены, рисуется фон а потом вот этим кодом спрайты, в коде, если пиксел "прозрачный", то не рисуем, а если нет, то рисуем на канвасе формы, но этот вариант медленный, чем заменить? как я понимаю scanline не подойдет? Подскажите.
FireMan_Alexey (2009-04-06 09:15:00) [1]Попробуй OPENGL! Тебе понравиться :)
Winamp с OPENGL-ом работает
icWasya (2009-04-01 14:38:00) [2]А если хочешь работать попиксельно - изучай TBitmap.ScanLines
Б (2009-04-01 06:58:00) [3]Ж)
- Canvas.Draw(X, Y, BMP).
- Прозрачный цвет надо устанавливать растрам или где там.
- Рисовать надо на PaintBox.
- Scanline оставь на эффекты.
novai (2009-04-01 06:55:00) [4]пока переделал
Collections[n].ImageDraw.Transparent:=true;
canvas.Draw(Collections[n].X,Collections[n].Y, Collections[n].ImageDraw);
Collections[n].ImageDraw.Transparent:=false;
но думаю что можно еще быстрее?
| |
