VBレスキュー(花ちゃん) の Visual Basic 2010 用掲示板(VB.NET 掲示板)

タイトル： SetDIBColorTableについて

投稿日： 2009/07/06(Mon) 19:15

投稿者： shu

はじめまして。

●環境
・VB2005
・WindowsXP

モノクロの画像を高速で表示したいのですが
うまく表示できません。
どなたか教えて頂けないでしょうか？

カラーテーブルの値を変更する…。までは調べたのですが
SetDIBColorTable関数の戻り値が"0"となります。

＊コード＊

        Dim bmpInfo As BITMAPINFOHEADER
        Dim bmiColors(255) As RGBQUAD         ' DIBカラー設定格納

        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

　　　　↓戻り値が"0"となります。
　　　　SetDIBColorTable(hdc, 0, 255, bmiColors(0))

知識不足ですみません。
よろしくお願いします。

タイトル	： SetDIBColorTableについて
投稿日	： 2009/07/06(Mon) 19:15
投稿者	： shu

古いスレッドにレスはつけられません。