CYMK to RGB(50分)

我有一个问题：就是将CYMK转化成RGB，运用delphi的CMYK（c,m,y,k）的效果不行。这个过程将C分量
没要，有效果好的给高分(另外加分)。

这位朋友是否要用来对图象进行四色分色啊？^_^

// R, G, B, C, M, Y each IN [0.0 .. 1.0]
PROCEDURE CMYtoRGB(CONST C,M,Y: TReal; VAR R,G,B: TReal);
BEGIN
R := 1.0 - C;
G := 1.0 - M;
B := 1.0 - Y
END {CMYtoRGB};

// R, G, B, C, M, Y each IN [0.0 .. 1.0]
PROCEDURE RGBtoCMY(CONST R,G,B: TReal; VAR C,M,Y: TReal);
BEGIN
C := 1.0 - R;
M := 1.0 - G;
Y := 1.0 - B
END {RGBtoCMY};

// == CMYK / RGB ======================================================
// R, G, B, C, M, Y, K each IN [0.0 .. 1.0]
PROCEDURE CMYKtoRGB(CONST C,M,Y,K: TReal; VAR R,G,B: TReal);
BEGIN
R := 1.0 - (C + K);
G := 1.0 - (M + K);
B := 1.0 - (Y + K)
END {CMYtoRGB};

// R, G, B, C, M, Y each IN [0.0 .. 1.0]
PROCEDURE RGBToCMYK(CONST R,G,B: TReal; VAR C,M,Y,K: TReal);
BEGIN
RGBtoCMY(R,G,B, C,M,Y);
K := MinValue([C, M, Y]);
C := C - K;
M := M - K;
Y := Y - K
END {RGBtoCMYK};

to 卷起千堆雪tyn
我们是老朋友，以前你就答过我的问题。不过这次你说的这种的方法不是很好，我也试过。
这还不如用CMYK（）这个过程的效果。这是一个打印程序上的，打印文件是CMYK的四个分量都有
现在要生成一个图片（即所见即所得功能）

你的意思就是说分成四色片，然后叠加，这与印刷完全是一个道理；
应该都是按照我那种思路做的；
或者我再找找看又没有更好的解决方法。

颜色有点差，老板说行，OK，给你加分