Color blindness simulation

[WojTec]

Color blindness - inability or decreased ability to see color or perceive color differences. So, this is nothing to be envied if someone hase it, but this is nice problem to implement in Delphi.

Unfortunately I not found information how to simulate it. Maybe you have some tips for me? Maybe some codes already exists?

Code:

http://en.wikipedia.org/wiki/Color_blindness