--- oup/current/Tools/MetaEditor.dfm 2007/06/12 16:42:53 212 +++ oup/current/Tools/MetaEditor.dfm 2007/06/15 15:12:11 217 @@ -1,92 +1,87 @@ -object Form_Meta: TForm_Meta - Left = 0 - Top = 0 +inherited Form_Meta: TForm_Meta Caption = 'Form_Meta' - ClientHeight = 365 - ClientWidth = 446 - Color = clBtnFace - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -11 - Font.Name = 'Tahoma' - Font.Style = [] - FormStyle = fsMDIChild - OldCreateOrder = False - Visible = True - WindowState = wsMaximized - OnClose = FormClose OnCreate = FormCreate - DesignSize = ( - 446 - 365) PixelsPerInch = 96 TextHeight = 13 - object Label3: TLabel - Left = 3 - Top = 6 - Width = 61 - Height = 13 - Caption = 'Connection: ' + inherited panel_connection: TPanel + ExplicitWidth = 598 + inherited combo_connection: TComboBox + ExplicitWidth = 532 + end end - object VST: TVirtualStringTree - Left = 4 - Top = 44 - Width = 409 - Height = 321 - Anchors = [akLeft, akTop, akRight, akBottom] - AnimationDuration = 0 - Header.AutoSizeIndex = 0 - Header.Font.Charset = DEFAULT_CHARSET - Header.Font.Color = clWindowText - Header.Font.Height = -11 - Header.Font.Name = 'Tahoma' - Header.Font.Style = [] - Header.Options = [hoColumnResize, hoDrag, hoVisible] - TabOrder = 0 - TreeOptions.AutoOptions = [toAutoDropExpand, toAutoScrollOnExpand, toAutoDeleteMovedNodes] - TreeOptions.MiscOptions = [toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning] - OnGetText = VSTGetText - OnPaintText = VSTPaintText - OnInitChildren = VSTInitChildren - Columns = < - item - Position = 0 - Width = 150 - WideText = 'FName' - end - item - Position = 1 - WideText = 'FType' - end - item - Position = 2 - WideText = 'FID' - end - item - Position = 3 - WideText = 'Data' - end> - end - object Button1: TButton - Left = 204 - Top = 1 - Width = 75 - Height = 25 - Anchors = [akTop, akRight] - Caption = 'Load' - Default = True - TabOrder = 1 - OnClick = Button1Click - end - object combo_connection: TComboBox - Left = 64 - Top = 3 - Width = 134 - Height = 21 - Style = csDropDownList - Anchors = [akLeft, akTop, akRight] - DropDownCount = 12 - ItemHeight = 13 - TabOrder = 2 + inherited panel_basecontent: TPanel + ExplicitLeft = 0 + ExplicitTop = 25 + ExplicitWidth = 598 + ExplicitHeight = 532 + object splitter: TSplitter + Left = 502 + Top = 0 + Width = 8 + Height = 532 + Align = alRight + AutoSnap = False + Beveled = True + MinSize = 200 + ExplicitLeft = 353 + end + object VST: TVirtualStringTree + Left = 0 + Top = 0 + Width = 502 + Height = 532 + Align = alClient + AnimationDuration = 0 + Header.AutoSizeIndex = 0 + Header.Font.Charset = DEFAULT_CHARSET + Header.Font.Color = clWindowText + Header.Font.Height = -11 + Header.Font.Name = 'Tahoma' + Header.Font.Style = [] + Header.Options = [hoColumnResize, hoDrag, hoVisible] + TabOrder = 0 + TreeOptions.AutoOptions = [toAutoDropExpand, toAutoScrollOnExpand, toAutoDeleteMovedNodes] + TreeOptions.MiscOptions = [toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning] + OnFocusChanged = VSTFocusChanged + OnFocusChanging = VSTFocusChanging + OnGetText = VSTGetText + OnPaintText = VSTPaintText + OnInitChildren = VSTInitChildren + ExplicitLeft = 8 + ExplicitTop = 60 + ExplicitWidth = 353 + ExplicitHeight = 325 + Columns = < + item + Position = 0 + Width = 250 + WideText = 'FName' + end + item + Position = 1 + WideText = 'FType' + end + item + Position = 2 + WideText = 'FID' + end + item + Position = 3 + WideText = 'Data' + end> + end + object Panel2: TPanel + Left = 510 + Top = 0 + Width = 88 + Height = 532 + Align = alRight + BevelOuter = bvNone + Caption = 'Panel2' + TabOrder = 1 + ExplicitLeft = 376 + ExplicitTop = 92 + ExplicitHeight = 285 + end end end