--- oup/current/Tools/MetaEditor.dfm 2007/07/14 16:50:55 238 +++ oup/current/Tools/MetaEditor.dfm 2007/07/17 22:27:16 241 @@ -39,6 +39,10 @@ inherited Form_Meta: TForm_Meta Header.Font.Name = 'Tahoma' Header.Font.Style = [] Header.Options = [hoColumnResize, hoDrag, hoVisible] + HintAnimation = hatNone + HintMode = hmHint + ParentShowHint = False + ShowHint = True TabOrder = 0 TreeOptions.AutoOptions = [toAutoDropExpand, toAutoScrollOnExpand, toAutoDeleteMovedNodes] TreeOptions.MiscOptions = [toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning] @@ -46,26 +50,24 @@ inherited Form_Meta: TForm_Meta OnFocusChanging = VSTFocusChanging OnGetText = VSTGetText OnPaintText = VSTPaintText + OnGetHint = VSTGetHint OnGetPopupMenu = VSTGetPopupMenu OnInitChildren = VSTInitChildren Columns = < item Position = 0 Width = 250 - WideText = 'FName' + WideText = 'Name' end item Position = 1 - WideText = 'FType' + Width = 100 + WideText = 'Type' end item Position = 2 - WideText = 'FID' - end - item - Position = 3 Width = 150 - WideText = 'Data' + WideText = 'Value' end> end object rightPages: TPageControl @@ -73,7 +75,7 @@ inherited Form_Meta: TForm_Meta Top = 0 Width = 400 Height = 424 - ActivePage = tab_hex + ActivePage = tab_meta Align = alRight TabOrder = 1 object tab_meta: TTabSheet @@ -315,6 +317,7 @@ inherited Form_Meta: TForm_Meta 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'