invalid used windows api to make MainMenu’s Item right-aligned

[frankwu-delphi]

Hello,
in my project, I used windows api to make MainMenu’s Item right-aligned. However, after enabling Vcl style Utils, the right-alignment is invalid.
procedure TForm1.FormCreate(Sender: TObject); begin ModifyMenu(MainMenu1.Handle, 1, MF_BYPOSITION or MF_HELP, mnuRight.Handle, PChar(mnuRight.Caption)); end;

The attachment is a test example.

Vcl Style Test.zip