--- oup/current/Tools/MetaEditor.dfm 2007/07/14 14:18:23 237 +++ oup/current/Tools/MetaEditor.dfm 2007/07/14 20:22:05 239 @@ -46,6 +46,7 @@ inherited Form_Meta: TForm_Meta OnFocusChanging = VSTFocusChanging OnGetText = VSTGetText OnPaintText = VSTPaintText + OnGetPopupMenu = VSTGetPopupMenu OnInitChildren = VSTInitChildren Columns = < item @@ -78,10 +79,6 @@ inherited Form_Meta: TForm_Meta object tab_meta: TTabSheet Caption = 'Meta Edit' ImageIndex = 1 - ExplicitLeft = 0 - ExplicitTop = 0 - ExplicitWidth = 0 - ExplicitHeight = 0 end object tab_hex: TTabSheet Caption = 'Binary Edit' @@ -312,4 +309,17 @@ inherited Form_Meta: TForm_Meta Left = 292 Top = 340 end + object vst_popup: TPopupMenu + AutoHotkeys = maManual + Left = 80 + Top = 204 + object vst_newRoot: TMenuItem + Caption = 'Set as root element in new window' + OnClick = vst_newRootClick + end + object vst_setRoot: TMenuItem + Caption = 'Set as root element here' + OnClick = vst_setRootClick + end + end end