掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
カラーのBMPファイルを、モノクロBMPに変換するには？ (ID：1017)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
まずは、ソースを見て想像してみてください。 EffectGrayScaleColor関数に、ビットマップのハンドルを与えると、新たに作成されたビットマップのハンドルが返されるようです。 もしかしたら、Delphi2では少し工夫が必要かもしれません。 やっていることは、１点ずつ、色を変換しているみたいです。 ↓この部分 //NTSC系加重平均法を用いてグレースケール化 RGBColor:=Set255( Round(SrcRow[Col].rgbtRed *0.289+ SrcRow[Col].rgbtGreen *0.586+ SrcRow[Col].rgbtBlue *0.114 ))); //単純グレースケール化 //RGBColor:=Set255( // (SrcRow[Col].rgbtRed + // SrcRow[Col].rgbtGreen + // SrcRow[Col].rgbtBlue ) div 3); DestRow[Col].rgbtBlue :=RGBColor; DestRow[Col].rgbtGreen:=RGBColor; DestRow[Col].rgbtRed :=RGBColor;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.