MainMenu wird falsch gezeichnet

[berens]

Hallo!
Ich verwende Windows 10 mit Delphi 2010.

Mein Problem seht ihr im Anhang. Mein Mainmenu wird korrekt mit dem neuen Windows 10 Design gezeichnet wenn ich KEINE ImageList oder SubMenuImages verwende. Sobald ich aber eine ImageList verwende (ich muss leider in einem Untermenü Bitmaps/Icons darstellen) wird dieses Menü komplett anders gezeichnet, so sind z.B. die Markierungsfarbe anders und der senkrechte Trennstrich zwischen eventuellen Icon und Text fehlt.

In anderen Forenbeiträgen wird gemunkelt, dass Delphi -sobald ein Bitmap im Menu dargestellt wird- automatisch auf eine (veraltete) OwnerDraw-Prozedur zurückgreift. Falls dem so ist, erlaube man mit an dieser Stelle ein "WTF?": Bilder in Menüs scheint ja eine brandneue Sache zu sein, die Delphi meint improvisieren zu müssen?

Gibt es eine andere Abhilfe statt das komplette Mainmenu mit "Ownerdraw"-Stil darstellen zu lassen?

[Redeemer]

Ich habe irgendwie das gegenteilige Problem. Wenn bei einem TPopupMenu ein beliebiges TMenuItem Break <> mbNone hat, wird das Menü nur mit Themes gezeichnet, wenn ich dem TPopupMenu eine Bilderliste zugewiesen habe. Mit nur der Bilderliste funktioniert es aber auch, auch bei TMainMenu.

Vielleicht hilft es, ein wenig in der Menus.pas rumzufummeln. Da gibt es einige Zuweisungen mit

Delphi-Quellcode:

Images <> nil

.