Главная страница
    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.043 c
15-1195157054
palva
2007-11-15 23:04
2007.12.23
Тут недавно спрашивали, как шифроваться в аське


15-1195835332
Piter
2007-11-23 19:28
2007.12.23
Зачем InnoSetup требует права администратора?


15-1195569942
Stanislav_
2007-11-20 17:45
2007.12.23
Админу


15-1195572022
Kerk
2007-11-20 18:20
2007.12.23
Телефон чтоль порекомендуйте


15-1195807851
toto
2007-11-23 11:50
2007.12.23
Письмо деду Морозу





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский