Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.04.03;
Скачать: CL | DM;

Вниз

CMYK В RGB   Найти похожие ветки 

 
Юрий   (2002-12-26 17:55) [0]

Есть CMYK(CYAN=n Yellow=n ...) как получить RGB?.
Такая функция есть в Фотошопе и Кореле .
Какой алгоритм преобразования?


 
AlexT1000   (2002-12-26 18:33) [1]

C = 1 - R
M = 1 - G
Y = 1 - B

K = min(C,M,Y);
и еще разок
C = C - K
M = M - K
Y = Y - K


 
MBo   (2002-12-26 18:34) [2]

Точного соответствия нет
Ориентировочно
R=1-C
G=1-M
B=1-Y



 
Jeer   (2002-12-26 19:44) [3]

// Based on C Code in "Computer Graphics -- Principles and Practice,"
// Foley et al, 1996, p. 589


function cmyktorgbtriple (const c,m,y,k: integer): trgbtriple;
begin
with result do
begin
rgbtred := 255 - (c + k);
rgbtgreen := 255 - (m + k);
rgbtblue := 255 - (y + k)
end
end;


 
Fenik   (2002-12-29 00:01) [4]

{ **** UBPFD *********** by delphibase.endimus.com ****
>> Перевод CMYK цвета в RGB

Зависимости: System
Автор: Ajax, ajax@mail.kz
Copyright: Ajax
Дата: 27 апреля 2002 г.
***************************************************** }

procedure CMYK2RGB(C,M,Y,K,R,G,B : byte);
begin
if (Integer(C) + Integer(K)) < 255 then
R := 255 - (C + K) else
R := 0;
if (Integer(M) + Integer(K)) < 255 then
G := 255 - (M + K) else
G := 0;
if (Integer(Y) + Integer(K)) < 255 then
B := 255 - (Y + K) else
B := 0;
end;



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

Текущий архив: 2003.04.03;
Скачать: CL | DM;

Наверх




Память: 0.44 MB
Время: 0.009 c
1-6479
Alex Shulg
2003-03-24 14:21
2003.04.03
OnActivate ?


4-6849
ik
2003-02-05 17:25
2003.04.03
BackGround на форме ???


3-6338
sniknik
2003-03-11 11:48
2003.04.03
RDS нужен пример, на Delphi


4-6855
stainer
2003-02-03 13:22
2003.04.03
ishellbrowser


1-6609
Beastie
2003-03-14 11:44
2003.04.03
Как вывести на печать содержимое TStringGrid





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