inherited CueForm: TCueForm Caption = 'Cue Points' ClientHeight = 293 ClientWidth = 427 OnClose = FormClose PixelsPerInch = 96 TextHeight = 13 object CueListLabel: TStaticText [0] Left = 8 Top = 5 Width = 47 Height = 17 Caption = '&Cue list:' FocusControl = List TabOrder = 0 end inherited ButtonCancel: TButton [1] Left = 345 Top = 74 Anchors = [akTop, akRight] TabOrder = 6 Visible = False end inherited ButtonOk: TButton [2] Left = 345 Top = 10 Anchors = [akTop, akRight] Cancel = True Caption = 'Close' TabOrder = 5 end inherited ButtonHelp: THelpButton Left = 345 Top = 42 Anchors = [akTop, akRight] TabOrder = 7 HelpKey = 'tool_cuepoints' end object List: TListView Left = 8 Top = 22 Width = 328 Height = 233 Columns = < item Caption = 'No.' Width = 30 end item Caption = 'Position' Width = 100 end item AutoSize = True Caption = 'Name' end> HideSelection = False ReadOnly = True RowSelect = True PopupMenu = ListMenu SortType = stData TabOrder = 1 ViewStyle = vsReport OnColumnClick = ListColumnClick OnCompare = ListCompare OnDblClick = ListDblClick end object NewButton: TButton Left = 8 Top = 262 Width = 75 Height = 25 Action = New Anchors = [akLeft, akBottom] Caption = '&New...' TabOrder = 2 end object EditButton: TButton Left = 92 Top = 262 Width = 75 Height = 25 Action = Edit Anchors = [akLeft, akBottom] Caption = '&Edit...' TabOrder = 3 end object DeleteButton: TButton Left = 177 Top = 262 Width = 75 Height = 25 Action = Delete Anchors = [akLeft, akBottom] Caption = '&Delete' TabOrder = 4 end object SilenceButton: TButton Left = 344 Top = 194 Width = 75 Height = 25 Action = Auto Anchors = [akTop, akRight] TabOrder = 10 end object LoadAll: TBitton Left = 348 Top = 262 Width = 30 Height = 25 Image.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 88888888888888888888000000000008888800333333333088880B0333333333 08880FB03333333330880BFB0333333333080FBFB000000000000BFBFBFBFB08 88880FBFBFBFBF0888880BFB0000000888888000888888880008888888888888 8008888888880888080888888888800088888888888888888888} FocusAllowed = True Action = Import Anchors = [akRight, akBottom] ParentShowHint = False ShowHint = True TabStop = True TabOrder = 11 end object SaveAll: TBitton Left = 386 Top = 262 Width = 30 Height = 25 Image.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888 8888880000000000000880330000008803088033000000880308803300000088 0308803300000000030880333333333333088033000000003308803088888888 0308803088888888030880308888888803088030888888880308803088888888 0008803088888888080880000000000000088888888888888888} FocusAllowed = True Action = Export Anchors = [akRight, akBottom] ParentShowHint = False ShowHint = True TabStop = True TabOrder = 12 end object DeleteAllButton: TButton Left = 261 Top = 262 Width = 75 Height = 25 Action = DeleteAll Anchors = [akLeft, akBottom] TabOrder = 13 end object CopyButton: TButton Left = 344 Top = 130 Width = 75 Height = 25 Action = Copy Anchors = [akTop, akRight] TabOrder = 8 end object SplitButton: TButton Left = 344 Top = 162 Width = 75 Height = 25 Action = Split Anchors = [akTop, akRight] TabOrder = 9 end object ActionList: TActionList Left = 349 Top = 102 object New: TAction Caption = 'New...' OnExecute = NewExecute end object Edit: TAction Caption = 'Edit...' OnExecute = EditExecute OnUpdate = CueSelectedEnable end object DeleteAll: TAction Caption = 'Delete &All' OnExecute = DeleteAllExecute OnUpdate = CueExistsEnable end object Delete: TAction Caption = 'Delete' OnExecute = DeleteExecute OnUpdate = CueSelectedEnable end object Split: TAction Caption = 'Split File...' OnExecute = SplitExecute OnUpdate = CueExistsEnable end object Auto: TAction Caption = 'Auto Cue...' OnExecute = AutoExecute end object SetStart: TAction Caption = 'Set Start Marker' OnExecute = SetStartExecute OnUpdate = CueBeforeFinishEnable end object SetFinish: TAction Caption = 'Set Finish Marker' OnExecute = SetFinishExecute OnUpdate = CueBeforeStartEnable end object MoveToStart: TAction Caption = 'Move To Start Marker' OnExecute = MoveToStartExecute OnUpdate = CueSelectedEnable end object MoveToFinish: TAction Caption = 'Move To Finish Marker' OnExecute = MoveToFinishExecute OnUpdate = CueSelectedEnable end object Copy: TAction Caption = 'Copy All' OnExecute = CopyExecute OnUpdate = CueExistsEnable end object Export: TAction Caption = 'Export' Hint = 'Export to CD cue file' OnExecute = ExportExecute OnUpdate = CueExistsEnable end object Import: TAction Caption = 'Import' Hint = 'Import from CD cue file' OnExecute = ImportExecute end end object ListMenu: TPopupMenu Left = 387 Top = 102 object Delete1: TMenuItem Action = Edit end object Delete2: TMenuItem Action = Delete end object SetFinishMarker1: TMenuItem Action = SetStart end object SetFinishMarker2: TMenuItem Action = SetFinish end object MoveToFinishMarker1: TMenuItem Action = MoveToStart end object MoveToFinishMarker2: TMenuItem Action = MoveToFinish end end object OpenCue: TOpenDialog DefaultExt = 'cue' Filter = 'Cue (*.cue)|*.cue|All (*.*)|*.*' Options = [ofHideReadOnly, ofNoChangeDir, ofPathMustExist, ofFileMustExist, ofEnableSizing] Title = 'Import Cue Points' Left = 202 Top = 2 end object SaveCue: TSaveDialog DefaultExt = 'cue' Filter = 'Cue (*.cue)|*.cue|All (*.*)|*.*' Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist, ofEnableSizing] Title = 'Export Cue Points' Left = 232 Top = 2 end end