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

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

Вернуться   Форум программистов > Delphi программирование > Мультимедиа в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

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

Ответ
 
Опции темы Поиск в этой теме
Старый 25.01.2012, 14:28   #1
ZekaUa
Пользователь
 
Регистрация: 26.02.2011
Сообщений: 11
Смущение как в bitmap оставить один цвет

Есть bitmap. Нужно оставить в нем пиксели только одного цвета, а остальные закрасить, например, в черный цвет. Как это реализовать? Заранее спасибо!
ZekaUa вне форума Ответить с цитированием
Старый 04.02.2012, 15:00   #2
Yungo161
Пользователь
 
Регистрация: 20.06.2011
Сообщений: 61
По умолчанию

как вариант, зарисовать битмэп в тимадж проанализировать на пиксели и если пиксель не равен нужному цвету то ему присвоевается 0 0 0 то биш черный цвет, ну или в какой вы хотите, а потом просто сохранить как новый битмэп

но это очень черновой и довольно долгий вариант. через for i to weitgh do for i to heitgh do


первое что в голову пришло
Yungo161 вне форума Ответить с цитированием
Старый 10.02.2012, 11:43   #3
Rin
Негодник
Форумчанин
 
Аватар для Rin
 
Регистрация: 10.11.2009
Сообщений: 880
По умолчанию

Yango161 прав. Просто проверка на условие:
Код:
for i := 0 to bitmap.height do
for j := 0 to bitmap.width do
if bitmap.Canvas.Pixels[i,j]<>$ffffff then bitmap.Canvas.Pixels[i,j]:=clBlack;
Если помог, проси поставить минус. Будь оригинален!
Rin вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
как не оставить нежелательных следов? bellachao Свободное общение 10 13.01.2012 16:54
оставить только один эл-т из цепочки подряд идущих в списке Dmitry73 Помощь студентам 0 07.04.2011 21:45
из-за чего появляется полоса (на скрине) при вставке BitMap в TImage? - Проблема с Bitmap Grey@2009 Мультимедиа в Delphi 2 02.01.2010 20:23
Как с помощью JavaScript изменить цвет фона ячеек в таблице,так что бы можно было выбрать цвет из списка Gotessa JavaScript, Ajax 1 09.05.2009 16:05
Как округлять числа до целых и как оставить два знака после запятой. bles Помощь студентам 9 19.02.2008 21:53