delphi2007 教程

delphi2007 教程

1013 Posts :: 0 Stories :: 28 Comments :: 0 Trackbacks

如果修改调色板，实现单色位图文件反色

如果修改调色板，实现单色位图文件反色 Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiMultimedia/html/delphi_20060925090610294.html
请问如何修改调色板，通过修改调色板把黑色变白色，白色变黑色，那位高人能用DELPHI写一小段示例程序吗？急啊

解析出R，G，B，利用Canvas的Pixels[x][y]，配合GetRValue，GetGValue和GetBValue函数，之后将这个值减去255，即：
Pixels[x][y] = GetRValue(Pixels[x][y]) - 255;
......

把调色板的值反一下

色板中每个色值的RGB分量被255减即可

posted on 2009-03-13 10:29 delphi2007 阅读(240) 评论(0) 编辑收藏引用

只有注册用户登录后才能发表评论。