Ich kann leider auf keinem Weg, den ich mir vorstellen kann, fertigbringen, was ich erreichen will. Hier sind nun mehr Details zu meinem "Problem".
Ich erstelle eingene TMenuItem, die dann in ein PopupMenu übertragen werden. Zu diesen TMenuItem gehören Bitmaps.
Delphi-Quellcode:
var MI: Array of TMenuItem
MI[x].Bitmap := IconToBitmap(...);
PopupMenu1.Items.Add(MI[x]);
Die MenuItems funktionieren, nur die Bitmaps haben, egal, wie ich die Prozedur IconToBitmap verändere, keinen Alpha, nur einen schwarzen Hintergrund, der aber nicht komplett clBlack ist - wahrscheinlich wegen der Verkleinerung...