CreateMappedBitmap funzt nicht

[cheatzs]

Hi Leutz :???:

Für die, die schon immer mal ordentliche Pix's in ihren Toolbars haben wollten:

1. Bindet genau wie in Luckie's Tutorial die Bildchen hintereinander gereiht in eine Resource ein.

2. Ladet die Bilder in eine ImageList nach folgendem Schema:

Delphi-Quellcode:

var
  ToolbarImageList : hImageList;

...

ToolbarImageList := ImageList_LoadImage(hInstance,MAKEINTRESOURCE(2),16,7,[b]CLR_DEFAULT[/b],IMAGE_BITMAP,[b]LR_CREATEDIBSECTION[/b]);

Wichtig bei diesem Aufruf ist LR_CREATEDIBSECTION, denn dieser Flag definiert, dass das Bitmap auch in z.B. 24bit geladen werden kann.

Für CLR_DEFAULT könnt ihr auch eure Farbe eingeben, die dann transparent dargestellt wird.

Für nähere Erläuterungen, schaut euch im MSDN um...


3. Fügt die Bilder der Toolbar hinzu

Delphi-Quellcode:

SendMessage(hWndToolbar,TB_SETIMAGELIST,0,ToolbarImageList);

:thumb: Und schon habt ihr super Icons in eurer Toolbar... :wink:

Mann, hab ich lange danach gesucht! :coder: