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

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

RLE компрессия в TGA [D7]


Ibrox ©   (2005-04-25 16:03:00) 

Может кто-нибудь знает как загрузить TGA файл с RLE компрессией?


XProger   (2005-04-26 03:53:00) [1]

Ну как обычно читаем заголовок, и если третий байт заголовка > 8 - значит нуна декодировать.

Как всё там пишется в этом случае:
Читаем байт H. Примем K = (header and $7F) + 1;
Если первый бит его не равен 0 читаем пиксел (кол-во байт в зависимости от BPP) из файла и последующие пиксели в картинке в кол-ве K штук будут равны цвету нашего прочитанного пикселя.
Если же первый бит прочитанного байта равен 0 - то читаем из файла последующие K пикселей занося их в изображение...

Вот собсна и всё вкратце :)


Ibrox   (2005-04-25 19:27:00) [2]

а можешь поведать тайну? :)


XProger   (2005-04-25 19:16:00) [3]

Я знаю


Наверх

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