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

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

Как сделать из цветного черно белое изображение


WFS ©   (2007-12-01 14:51:00) 

Я посчитал яркость пикселя:
    R:=GetRValue(Form1.Image1.Canvas.Pixels[i,j]);
    G:=GetGValue(Form1.Image1.Canvas.Pixels[i,j]);
    B:=GetBValue(Form1.Image1.Canvas.Pixels[i,j]);
   
    Y:=0.299*R+0.587*R+0.114*B;

Как теперь это значение присвоить пикселю?


Германн   (2007-12-02 02:18:00) [1]

Хм.


KilkennyCat   (2007-12-02 02:08:00) [2]

Думаю, что мы думаем одно и тоже. ;)


Германн   (2007-12-02 02:06:00) [3]


> KilkennyCat ©   (02.12.07 01:59) [14]
>
> Я о яичнице не думаю. Я ее ем.
>

А об той, которая в http://delphimaster.ru/cgi-bin/forum.pl?id=1196408923&n=5,
что ты думаешь?


KilkennyCat   (2007-12-02 01:59:00) [4]

Я о яичнице не думаю. Я ее ем.


Германн   (2007-12-02 01:29:00) [5]


> KilkennyCat ©   (02.12.07 01:22) [12]

Кстати.
Мне тоже такой монитор очень нравился, если ты имел в виду "черно-оранжевый"! (Речь идет о СССР-овских временах :).
Ещё раз кстати. Что ты думаешь о яичнице?


KilkennyCat   (2007-12-02 01:22:00) [6]

А у меня монитор когда-то очень давно был черно-желтый.


DrPass   (2007-12-02 00:54:00) [7]


> > DVM, ты придираешься к словам, не понятно зачем.
>
> Да, я не придираюсь

...я буквоедствую

- Ребе, черный - это цвет?
- Да, это цвет.
- А белый - это цвет?
- Да, и это цвет.
- Вот, Абрам, послушай ребе - я ж тебе говорил, что я тебе цветной телевизор продал!


antonn   (2007-12-01 23:07:00) [8]

по правильной терминологии они монохромные - есть цвет и нету цвета, а какой он будет - неважно :)
а "черно-белое" это, имхо, почти "народное" выражение :)


DVM   (2007-12-01 22:43:00) [9]


> DVM, ты придираешься к словам, не понятно зачем.

Да, я не придираюсь :) Правильная терминология это уже часть ответа на вопрос.


@!!ex   (2007-12-01 22:36:00) [10]

DVM, ты придираешься к словам, не понятно зачем.
Черное-белые телевизоры времен моей юности были черно-белыми, но работали с градациями серого.
99% употреблений выражения "черное-белое" подразумевают "градации серого".


DVM   (2007-12-01 22:18:00) [11]


> Да неужели?

Если считать черный и белый цветами то 2. Сколько по-твоему оттенков в черно-белом рисунке?


Johnmen   (2007-12-01 22:13:00) [12]


>  а черно-белое - это 2 цвета.

Да неужели?


DVM   (2007-12-01 20:56:00) [13]


>     Y:=0.299*R+0.587*R+0.114*B;

это не черно-белое, это гадации серого будет, а черно-белое - это 2 цвета.


Anatoly Podgoretsky   (2007-12-01 16:43:00) [14]

> DmT  (01.12.2007 15:39:03)  [3]

Это стандаpт CCIR 601-1


DmT   (2007-12-01 15:39:00) [15]

Лучше сделай чтобы из черно-белого получилось цветное ;D

>  Y:=0.299*R+0.587*R+0.114*B;

Эти цифры откуда?


Kolan   (2007-12-01 15:11:00) [16]

Прочти про Scanline


WFS   (2007-12-01 15:01:00) [17]

Я  понял, нужно
Form1.Image1.Canvas.Pixels[i,j]:=RGB(Y,Y,Y)


Наверх

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