Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.12.23;
Скачать: [xml.tar.bz2];

Вниз

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

 
WFS   (2007-12-01 14:51) [0]

Я посчитал яркость пикселя:
    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;

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


 
WFS   (2007-12-01 15:01) [1]

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


 
Kolan ©   (2007-12-01 15:11) [2]

Прочти про Scanline


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

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

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

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


 
Anatoly Podgoretsky ©   (2007-12-01 16:43) [4]

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

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


 
DVM ©   (2007-12-01 20:56) [5]


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

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


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


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

Да неужели?


 
DVM ©   (2007-12-01 22:18) [7]


> Да неужели?

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


 
@!!ex ©   (2007-12-01 22:36) [8]

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


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


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

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


 
antonn ©   (2007-12-01 23:07) [10]

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


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


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

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

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


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

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


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


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

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


 
KilkennyCat ©   (2007-12-02 01:59) [14]

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


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


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

А об той, которая в http://delphimaster.net/view/4-1196408923/,
что ты думаешь?


 
KilkennyCat ©   (2007-12-02 02:08) [16]

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


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

Хм.



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.12.23;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.5 MB
Время: 0.065 c
2-1196165148
ImA
2007-11-27 15:05
2007.12.23
Paradox в меня не понимать =)


2-1196255549
_Guest_
2007-11-28 16:12
2007.12.23
ValueListEditor добавление строк в String


15-1195587731
Черный Шаман
2007-11-20 22:42
2007.12.23
Ах вон он каков русский компьютер...


15-1193445356
Живописец
2007-10-27 04:35
2007.12.23
У кого нибудь есть пример реализации рисования кистью на битмэпе?


2-1196148033
IntruderLab
2007-11-27 10:20
2007.12.23
TMemo перейти к последней записи





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский