Как выровнять TPopupMenu с правой стороны формы? Проблема в том, что, похоже, нет способа получить ширину всплывающего меню перед вызовомPopup(X, Y: Integer).

Я пытаюсь получить поведение, аналогичное поведению системного меню в Chrome.