Форум программистов, компьютерный форум, киберфорум
Delphi: Графика, звук, видео
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.92/25: Рейтинг темы: голосов - 25, средняя оценка - 4.92
1 / 1 / 0
Регистрация: 02.10.2014
Сообщений: 53

Как в загруженной картинке в TImage найти по цвету и заменить на другой цвет определенные пиксели?

04.07.2015, 16:39. Показов 5121. Ответов 8
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Суть в следующем: пишу программу, которая, подобно функции "Поиск/замена" в Блокноте, будет искать цвета по HEX или RGB значению и менять их на другие. По сути, мне нужно реализовать что-то вроде собственной палитры, для того чтобы корректно открыть 4-8 битное изображение, содержащее непонятную палитру.

Как я это представляю:
  1. Загружаем картинку в TImage. В этой картинке есть пиксели, цвета которых нам точно известны.
  2. Программа ищет пиксели с указанным цветом по TImage.
  3. Если находит - заменяет все пиксели на другой указанный цвет.
  4. Сохраняем содержимое TImage в BMP и редактируем любым удобным редактором.
  5. Снова измененное изображение загружаем в программу.
  6. Нажимаем кнопку, которая меняет цвета в обратном порядке.
  7. Снова сохраняем.

Конкретно вопрос состоит, как сделать поиск указанных цветов по TImage и замену на указанные?
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
04.07.2015, 16:39
Ответы с готовыми решениями:

Удалить пиксели в Timage
хочу вместо кнопки использовать Timage. Но проблема в том, что по краям картинки идет белое поле (дополняет до квадрата). Вопрос как её...

Найти цвет на картинке
есть файл *.png или *.jpg нужно определить есть ли на этой картинке другой цвет кроме чёрного и белого

Как найти в столбце определенные ячейки, содержащие текст и вставить их в другой столбец
Доброе время суток! Подскажите, пожалуйста, как решить данную задачу: имеется 1 столбец с данными, которые в итоге нужно разделить на 3...

8
Программист
 Аватар для Arigato
307 / 182 / 176
Регистрация: 05.12.2013
Сообщений: 685
Записей в блоге: 5
06.07.2015, 19:48
Так и не понял, что вы хотите получить в итоге и для чего?
1
Эксперт Pascal/Delphi
2388 / 1300 / 1492
Регистрация: 29.08.2014
Сообщений: 4,665
20.07.2015, 09:00
так например в картинке белый цвет на зеленый меняет по нажатию на кнопку
Delphi
1
2
3
4
5
6
7
8
procedure TForm1.Button1Click(Sender: TObject);
var
  x,y:integer;
begin
  for x:=1 to Image1.ClientWidth do
    for y:=1 to Image1.ClientHeight do
      if Image1.Canvas.Pixels[x,y]=clwhite then Image1.Canvas.Pixels[x,y]:=clgreen;
end;
Добавлено через 1 минуту
PS: наверное уже не актуально...
1
 Аватар для Qwetyui
30 / 31 / 20
Регистрация: 30.12.2015
Сообщений: 340
24.11.2016, 19:43
Joy, актуально. То, что вы написали, не актуально для крупных картинок (например, когда 100 000 картинок по fullHd, тогда работать неделю будет), как ускорить этот процесс... в 100 раз? в 1000? scanline не подходит т. к.
во-первых, он тоже не очень быстрый
во-вторых, замена происходит усе рвано через canvas.pixels[x, y].
Может есть какая-нибудь либа?

Добавлено через 27 секунд
Должна делать тоже самое, что вы написали, но в десятки раз быстрее
0
Программист
 Аватар для Arigato
307 / 182 / 176
Регистрация: 05.12.2013
Сообщений: 685
Записей в блоге: 5
01.12.2016, 09:11
Так scanline и будет быстрее. Можно вообще отойти от графических функций и работать с данными из файла как с массивом.
0
Заблокирован
01.12.2016, 13:33
Arigato
Можно, но сложно. Сначала нужно знать что за картинка вообще. Если это джипег и прочее то всё равно нужно получать битмап. Вот его то надо загнать в поток и уже с в этом потоке работать. А напрямую в файле если он бмп или тга нужно ещё знать сколько цветовых полоскостей. то есть сколько брать байт. 3 или 4. А может это вообще одна плоскость с палитрой. Вся трудность именно в предварительной работе. Хотя со сканлайн они те же.

Добавлено через 7 минут
Qwetyui
Вообще для этого дела, чтобы сканлайн работал быстро, нужно во-первых, вести обработку картинок в отдельном процессе. А процессу задать исключительный приоритет, чтобы процессор ничего лишнего не отвлекало. По возможности закрыть все лишние приложения и остановить ненужные фоновые процессы. Так именно и поступают в играх. Альтернатива сканлайн только директ икс или опен гл. А 100 000 картинок да ещё большого размера, конечно повесят комп если не принять специальных мер. Например рарезать картинку на части. И памяти должно быть много вообще-то. Вся скоростная обработка жрёт память. И вопрос ещё в том зачем это нужно? Только знаю конечную цель можно давать какие-то советы.
0
Программист
 Аватар для Arigato
307 / 182 / 176
Регистрация: 05.12.2013
Сообщений: 685
Записей в блоге: 5
01.12.2016, 15:05
А напрямую в файле если он бмп или тга нужно ещё знать сколько цветовых полоскостей. то есть сколько брать байт. 3 или 4. А может это вообще одна плоскость с палитрой.
Не такая уж и большая трудность. Один раз написать функцию, которая все это учитывает, либо вообще найти готовую.
0
Заблокирован
01.12.2016, 16:08
Arigato Конечно это просто, но не для человека который задал вопрос.
0
 Аватар для Qwetyui
30 / 31 / 20
Регистрация: 30.12.2015
Сообщений: 340
03.12.2016, 09:43
Нашел то, что искал. TQuickPixels, uses: UQPixels. Либа которая просто быстрее обчной, работает напрямую с памятью, перед юзанием qp.attach(bmp). Все просто
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
03.12.2016, 09:43
Помогаю со студенческими работами здесь

Подсвечивать определенные пиксели
Прошу помощи. Есть схема (прикрепил скрин) + listBox. Необходимо при выборе элемента в listBox подсвечивать определенные элементы на...

Как заставить макрос передавать текущий цвет УФ - реальному цвету ячейки
Здравствуйте. Помогите решить техническую задачу. На листе находится диапазон с условным форматированием (столбцы E-K). При...

Изменить определенные пиксели в изображении
Всем доброго времени суток! Возникла проблема при решении задачи по матлабу. Краткое описание задачи: У меня имеется изображение...

Как сменить цвет текста на картинке
Как в Фотошопе можно поменять цвет текста на картинке, и возможно это?

Как сменить цвет на сложной картинке?
Дана текстура. Все черное надо заменить на белое, а серое и белое на золотое.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
9
Ответ Создать тему
Новые блоги и статьи
PhpStorm 2025.3: WSL Terminal всегда стартует в ~
and_y87 14.12.2025
PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .
Access
VikBal 11.12.2025
Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов
Argus19 22.11.2025
Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .
Сколько Государство потратило денег на меня, обеспечивая инсулином.
Programma_Boinc 20.11.2025
Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .
Ломающие изменения в C#.NStar Alpha
Etyuhibosecyu 20.11.2025
Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .
Мысли в слух
kumehtar 18.11.2025
Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .
Создание Single Page Application на фреймах
krapotkin 16.11.2025
Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru