掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
SetDIBColorTableを使用するには？ (ID:101878)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
VB初心者です。どなたかご教授をお願いします。 VB2005を使用しています。 8Bitのモノクロ画像を高速で表示しようとしています。 しかしうまく表示できません。 カラーテーブルの値を変更する…。までは調べたのですが SetDIBColorTable関数の戻り値が"0"となります。 ＊コード＊ Dim bmpInfo As BITMAPINFOHEADER Dim bmiColors(255) As RGBQUAD bmpInfo.biBitCount = 8 bmpInfo.biClrImportant = 0 bmpInfo.biClrUsed = 0 bmpInfo.biCompression = 0 bmpInfo.biHeight = 480 bmpInfo.biPlanes = 1 bmpInfo.biSize = 40 ' SizeOf(BITMAPINFOHEADER) bmpInfo.biSizeImage = 307200 bmpInfo.biWidth = 640 bmpInfo.biXPelsPerMeter = 0 bmpInfo.biYPelsPerMeter = 0 ’カラーパレットを変更 For i = 0 To 255 bmiColors(i).rgbBlue = i bmiColors(i).rgbGreen = i bmiColors(i).rgbRed = i bmiColors(i).rgbReserved = 0 Next i SetDIBColorTable(hdc, 0, 255, bmiColors(0)) ↑戻り値が0となってしまします。 皆様、よろしくお願いします。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.