[elektro-etc] VB6 256 color palette

[Famulus Számítástechnika]

> Ezeket úgy érzem értem. Amikor a táblázatot emlegettem, akkor én a windows 
> long értéket
> emlegettem, ami ugye tartalmazza az ARGB értékeket. Nekem a 256 elemü 
> paletta
> index -> R,G,B  táblázatra van szükségem vagy függvényre, API-ra, amit 
> meghivok
> a 8 bites color kóddal és visszaad egy long-ot ami tartalmazza ugye 
> 8R,8G,8B, értékeket,
> Az RGB értékekkel rajzolok a képernyöre, az ennek megfelellö 8 bites 
> értéket tárolom
> majd az ICO file-ba. Sajnos azt még nem sikerült megtalálnom, hogy az ICO 
> formátum
> tartalmazza e paletta táblázatot. A header,dir részben nincs utalás hogy a 
> bitmap tartalmaz e
> ilyen táblát, vagy a bitmap-ben mindig van color palette ?
>
> Köszi
>
> Üdv.  Zoli

A kulcsszo: GetDIBColorTable

Irtam mar ilyesmit..., hogy
egy HANDLE-t kell szerzned a
DC-hez ami tartalmazza konkret bitmapinfo-t

GetDIBColorTable" (ByVal hDC As Long, ByVal un1 As Long, ByVal un2 As Long, 
pRGBQuad As RGBQUAD) As Long

Public Declare Function GetDIBits Lib "gdi32" Alias "GetDIBits" (ByVal aHDC 
As Long, ByVal hBitmap As Long, ByVal nStartScan As Long, ByVal nNumScans As 
Long, lpBits As Any, lpBI As BITMAPINFO, ByVal wUsage As Long) As Long

Public Type RGBQUAD
        rgbBlue As Byte
        rgbGreen As Byte
        rgbRed As Byte
        rgbReserved As Byte
End Type

http://www.vbaccelerator.com/codelib/gfx/dibs256.htm
http://www.vbaccelerator.com/codelib/gfx/dibsect.htm

Irodalom

Bitmap reference
http://msdn2.microsoft.com/en-us/library/ms532360(VS.85).aspx

GetDIBColorTable
http://msdn2.microsoft.com/en-us/library/ms532285(VS.85).aspx

Az irodalomban hivatkozott fuggvenyek es strukturak VB formatumban
az API Text Viewer-el kereshetok meg (resze a VB6 telepitesnek)