Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 11.01.2011, 03:42   #1
Alt
Лжец и смутьян
Форумчанин
 
Аватар для Alt
 
Регистрация: 03.04.2009
Сообщений: 194
По умолчанию Работа с TBitMap

Есть BitMap размером 1024х768, нужно его тонировать (изменить цвет в сторону нужного). При попиксельной обработке система сильно нагружается, и мне хотелось бы узнать о других методах работы с BitMap. Просьба дать ссылку на соответствующую литературу или объяснить другие методы в этой теме.
Заранее спасибо.
Помогли тебе - помоги другому.
Alt вне форума Ответить с цитированием
Старый 11.01.2011, 05:42   #2
Alt
Лжец и смутьян
Форумчанин
 
Аватар для Alt
 
Регистрация: 03.04.2009
Сообщений: 194
По умолчанию

http://delphiworld.narod.ru/base/bmp_chg_gamma.html
Вот, результат дает тот, что надо. Но совсем не понимаю как работает.
Помогли тебе - помоги другому.
Alt вне форума Ответить с цитированием
Старый 11.01.2011, 07:13   #3
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
Но совсем не понимаю как работает.
Dest := Bitmap.ScanLine[y]; быстро считывает тебе список пикселей в строке у. Он представляет из себя массив, на начало которого в начале цикла указывает указатель Dest. Ты в
Цитата:
with Dest^ do
begin
R := GT[R];
G := GT[G];
B := GT[B];
end;
Работаешь с его очередным элементом, после чего передвигаешь указатель на следующий элемент (считается что предидущий обработанный уже не понадобится)
Код:
Inc(Dest);
Причем это передвижение само знает на сколько передвинуть указатель, а точнее инструкция Inc определит размер типа Dest, и прибавит к указателю именно это число, чтоб проскочить нужное кол-во байт до следующего элемента.
Этот метод действительно побыстрее работает.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 11.01.2011, 15:43   #4
Alt
Лжец и смутьян
Форумчанин
 
Аватар для Alt
 
Регистрация: 03.04.2009
Сообщений: 194
По умолчанию

GT - это палитра новых цветов, да?
Если так, то да, я понял.
Помогли тебе - помоги другому.
Alt вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
работа с Tbitmap fen1ksss Мультимедиа в Delphi 6 12.10.2010 11:33
Проблема с TBitmap ImmortalAlexSan Общие вопросы Delphi 2 29.08.2010 10:52
Работа с TBitMap. Herly Помощь студентам 31 07.01.2010 16:07
Проблема с TBitmap QunneD Общие вопросы Delphi 2 21.11.2009 18:32
TBitmap odi_noki Мультимедиа в Delphi 17 25.10.2008 09:53