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;
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