delphi - TMainMenu の OnNewItem イベント

Question

フォームに があり、が に追加されたTMainMenuときにイベントを追加したいと考えています。TMenuItemTmainMenu

TMainMenu.OnChange(Sender: TObject; Source: TMenuItem; Rebuild: Boolean)アイテムを追加または削除または更新するときに params 値に違いがないため、機能していないようです。そして、新しいアイテムにのみ反応する必要があります。

何か案は？