Where I do need the imageList for? I just need one image (or plain bitmap) to get different colors and drop that to menuitems (or access them directly...unfortunately not any more)Yes, an ImageList is probably overkill here for just providing a single user-drawn bitmap.
What are bmW and bmH ?
procedure TForm1.Setbitmap(bm: TBitmap; col: Tcolor); begin with bm do Begin Width := bmW + 2; Height := bmH + 2; ... end; end;