123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648 |
- object VMSM620M: TVMSM620M
- Left = 0
- Top = 0
- HorzScrollBar.Visible = False
- VertScrollBar.Visible = False
- BorderIcons = [biSystemMenu, biMinimize]
- Caption = 'VMS '#46041#50689#49345' '#54268' '#46041#50689#49345' '#49444#51221
- ClientHeight = 851
- ClientWidth = 899
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = #47569#51008' '#44256#46357
- Font.Style = []
- KeyPreview = True
- OldCreateOrder = False
- Position = poOwnerFormCenter
- ShowHint = True
- OnClose = FormClose
- OnCreate = FormCreate
- OnShow = FormShow
- DesignSize = (
- 899
- 851)
- PixelsPerInch = 96
- TextHeight = 17
- object ShpTitle: TShape
- Left = 4
- Top = 4
- Width = 891
- Height = 40
- Anchors = [akLeft, akTop, akRight]
- Brush.Color = 14671839
- Pen.Color = 10849679
- Pen.Width = 2
- Visible = False
- ExplicitWidth = 1269
- end
- object LblCaption: TLabel
- Left = 16
- Top = 10
- Width = 267
- Height = 23
- Caption = #53440#51060#53952' '
- Font.Charset = DEFAULT_CHARSET
- Font.Color = 4740964
- Font.Height = -17
- Font.Name = #47569#51008' '#44256#46357
- Font.Style = [fsBold]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- Visible = False
- end
- object ShpList: TShape
- Left = 4
- Top = 4
- Width = 891
- Height = 841
- Anchors = [akLeft, akTop, akRight, akBottom]
- Pen.Color = 10849679
- Pen.Width = 2
- ExplicitWidth = 966
- ExplicitHeight = 741
- end
- object EdFocus: TEdit
- Left = -10
- Top = -10
- Width = 2
- Height = 25
- ImeName = 'Microsoft Office IME 2007'
- TabOrder = 0
- Text = 'EdFocus'
- end
- object PanelBack: TPanel
- Left = 12
- Top = 10
- Width = 873
- Height = 830
- Anchors = [akLeft, akTop, akRight, akBottom]
- BevelOuter = bvNone
- ParentBackground = False
- ParentColor = True
- TabOrder = 1
- object PnlMenu: TPanel
- Left = 0
- Top = 792
- Width = 873
- Height = 38
- Align = alBottom
- BevelOuter = bvNone
- TabOrder = 0
- DesignSize = (
- 873
- 38)
- object BtnEdit: TcxButton
- Tag = 2
- Left = 8
- Top = 10
- Width = 80
- Height = 25
- Cursor = crHandPoint
- Hint = #45936#51060#53552' '#54200#51665
- Anchors = [akLeft, akBottom]
- Caption = #54200#51665
- Colors.Default = 10737865
- Enabled = False
- TabOrder = 0
- Visible = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = #47569#51008' '#44256#46357
- Font.Style = [fsBold]
- ParentFont = False
- end
- object BtnInsert: TcxButton
- Tag = 2
- Left = 89
- Top = 10
- Width = 80
- Height = 25
- Cursor = crHandPoint
- Hint = #45936#51060#53552' '#52628#44032
- Anchors = [akLeft, akBottom]
- Caption = #52628#44032
- Colors.Default = 10737865
- TabOrder = 1
- Visible = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = #47569#51008' '#44256#46357
- Font.Style = [fsBold]
- ParentFont = False
- end
- object BtnDelete: TcxButton
- Tag = 4
- Left = 171
- Top = 10
- Width = 80
- Height = 25
- Cursor = crHandPoint
- Hint = #45936#51060#53552' '#49325#51228
- Anchors = [akLeft, akBottom]
- Caption = #49325#51228
- Colors.Default = 10737865
- Enabled = False
- TabOrder = 2
- Visible = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = #47569#51008' '#44256#46357
- Font.Style = [fsBold]
- ParentFont = False
- end
- object BtnSavex: TcxButton
- Tag = 5
- Left = 252
- Top = 10
- Width = 80
- Height = 25
- Cursor = crHandPoint
- Hint = #54200#51665#51089#50629' '#51200#51109
- Anchors = [akLeft, akBottom]
- Caption = #51200#51109
- Colors.Default = 10737865
- Enabled = False
- TabOrder = 3
- Visible = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = #47569#51008' '#44256#46357
- Font.Style = [fsBold]
- ParentFont = False
- end
- object BtnClose: TcxButton
- Left = 662
- Top = 7
- Width = 100
- Height = 25
- Cursor = crHandPoint
- Hint = #52712#49548
- Anchors = [akRight, akBottom]
- Caption = #52712#49548
- Colors.Default = 10737865
- TabOrder = 4
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = #47569#51008' '#44256#46357
- Font.Style = [fsBold]
- ParentFont = False
- OnClick = BtnClosexClick
- end
- object BtnSave: TcxButton
- Tag = 4
- Left = 769
- Top = 7
- Width = 100
- Height = 25
- Cursor = crHandPoint
- Hint = #54364#52636#44396#44036#51012' '#49444#51221' '#54633#45768#45796'.'
- Anchors = [akRight, akBottom]
- Caption = #54869#51064
- Colors.Default = 10737865
- TabOrder = 5
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = #47569#51008' '#44256#46357
- Font.Style = [fsBold]
- ParentFont = False
- OnClick = BtnSaveClick
- end
- end
- object cxGroupBox1: TcxGroupBox
- Left = 0
- Top = 0
- Align = alTop
- Caption = #9654' '#46041#50689#49345' '#54268
- Style.BorderColor = clCaptionText
- Style.Shadow = False
- Style.TextColor = clWindowText
- Style.TextStyle = [fsBold]
- TabOrder = 1
- Height = 373
- Width = 873
- object PnlCmd: TPanel
- Left = 3
- Top = 19
- Width = 867
- Height = 344
- Align = alClient
- BevelOuter = bvNone
- Enabled = False
- TabOrder = 0
- object Panel2: TPanel
- Left = 0
- Top = 0
- Width = 867
- Height = 344
- Align = alClient
- BevelOuter = bvNone
- Color = clMenuHighlight
- Enabled = False
- ParentBackground = False
- TabOrder = 0
- object ImgForm: TImage
- Left = 536
- Top = 194
- Width = 80
- Height = 57
- Visible = False
- end
- object ImgDesc20: TImage
- Left = 601
- Top = 19
- Width = 9
- Height = 9
- Transparent = True
- end
- object Label10: TLabel
- Left = 619
- Top = 15
- Width = 65
- Height = 17
- Caption = #46041#50689#49345#48264#54840
- Transparent = True
- end
- object ImgDesc21: TImage
- Left = 601
- Top = 73
- Width = 9
- Height = 9
- Transparent = True
- end
- object Label13: TLabel
- Left = 619
- Top = 69
- Width = 39
- Height = 17
- Caption = #54028#51068#47749
- Color = clWindowText
- ParentColor = False
- Transparent = True
- end
- object PnlEdtBack: TPanel
- Left = 3
- Top = 2
- Width = 578
- Height = 324
- BevelInner = bvLowered
- Color = clSilver
- ParentBackground = False
- TabOrder = 0
- object PnlEditForm: TPanel
- Left = 2
- Top = 2
- Width = 574
- Height = 320
- Align = alClient
- BevelOuter = bvNone
- Color = clBlack
- ParentBackground = False
- TabOrder = 0
- end
- end
- object EdSymbLibNmbr: TcxTextEdit
- Left = 601
- Top = 38
- Properties.Alignment.Horz = taCenter
- Properties.Alignment.Vert = taVCenter
- Properties.MaxLength = 0
- Properties.ReadOnly = True
- Style.LookAndFeel.Kind = lfUltraFlat
- Style.LookAndFeel.NativeStyle = False
- Style.Shadow = False
- StyleDisabled.LookAndFeel.Kind = lfUltraFlat
- StyleDisabled.LookAndFeel.NativeStyle = False
- StyleFocused.LookAndFeel.Kind = lfUltraFlat
- StyleFocused.LookAndFeel.NativeStyle = False
- StyleFocused.TextStyle = [fsBold]
- StyleHot.LookAndFeel.Kind = lfUltraFlat
- StyleHot.LookAndFeel.NativeStyle = False
- TabOrder = 1
- Width = 136
- end
- object EdStreamAddr: TcxTextEdit
- Left = 601
- Top = 92
- Properties.Alignment.Vert = taVCenter
- Properties.MaxLength = 0
- Properties.ReadOnly = True
- Style.LookAndFeel.Kind = lfUltraFlat
- Style.LookAndFeel.NativeStyle = False
- Style.Shadow = False
- StyleDisabled.LookAndFeel.Kind = lfUltraFlat
- StyleDisabled.LookAndFeel.NativeStyle = False
- StyleFocused.LookAndFeel.Kind = lfUltraFlat
- StyleFocused.LookAndFeel.NativeStyle = False
- StyleFocused.TextStyle = [fsBold]
- StyleHot.LookAndFeel.Kind = lfUltraFlat
- StyleHot.LookAndFeel.NativeStyle = False
- TabOrder = 2
- Width = 251
- end
- end
- end
- end
- object GrpObj: TcxGroupBox
- Left = 0
- Top = 373
- Align = alClient
- Caption = #9654' '#46041#50689#49345' '#49444#51221
- Style.TextStyle = [fsBold]
- TabOrder = 2
- Height = 419
- Width = 873
- object Panel1: TPanel
- Left = 3
- Top = 356
- Width = 867
- Height = 53
- Align = alBottom
- TabOrder = 0
- object lblCurrentPTS1: TLabel
- Left = 492
- Top = 15
- Width = 55
- Height = 17
- Alignment = taCenter
- Caption = '00:00:000'
- end
- object lblDuration1: TLabel
- Left = 423
- Top = 15
- Width = 55
- Height = 17
- Alignment = taCenter
- Caption = '00:00:000'
- end
- object TrackBar1: TTrackBar
- Left = -1
- Top = 11
- Width = 418
- Height = 37
- TabOrder = 0
- OnChange = TrackBar1Change
- end
- object BtnPlay: TcxButton
- Left = 583
- Top = 12
- Width = 88
- Height = 25
- Cursor = crHandPoint
- Hint = #51116#49373
- Caption = #51116#49373
- Colors.Default = 10737865
- TabOrder = 1
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = #47569#51008' '#44256#46357
- Font.Style = [fsBold]
- ParentFont = False
- OnClick = BtnPlayClick
- end
- object BtnStop: TcxButton
- Left = 674
- Top = 12
- Width = 88
- Height = 25
- Cursor = crHandPoint
- Hint = #51221#51648
- Caption = #51221#51648
- Colors.Default = 10737865
- Enabled = False
- TabOrder = 2
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = #47569#51008' '#44256#46357
- Font.Style = [fsBold]
- ParentFont = False
- OnClick = BtnStopClick
- end
- object BtnPause: TcxButton
- Left = 766
- Top = 12
- Width = 88
- Height = 25
- Cursor = crHandPoint
- Hint = #47688#52644'/'#51116#49373
- Caption = #47688#52644'/'#51116#49373
- Colors.Default = 10737865
- Enabled = False
- TabOrder = 3
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = #47569#51008' '#44256#46357
- Font.Style = [fsBold]
- ParentFont = False
- OnClick = BtnPauseClick
- end
- object ChkFullScreen: TcxCheckBox
- Left = 388
- Top = 29
- Cursor = crHandPoint
- Caption = #54868#47732' '#47582#52644
- State = cbsChecked
- TabOrder = 4
- Transparent = True
- Visible = False
- Width = 105
- end
- end
- object CxList: TcxGrid
- Left = 3
- Top = 19
- Width = 867
- Height = 337
- Align = alClient
- TabOrder = 1
- object TvList: TcxGridTableView
- OnFocusedRecordChanged = TvListFocusedRecordChanged
- DataController.Summary.DefaultGroupSummaryItems = <>
- DataController.Summary.FooterSummaryItems = <>
- DataController.Summary.SummaryGroups = <>
- OptionsCustomize.ColumnFiltering = False
- OptionsCustomize.ColumnMoving = False
- OptionsCustomize.DataRowSizing = True
- OptionsSelection.HideFocusRectOnExit = False
- OptionsSelection.HideSelection = True
- OptionsView.ColumnAutoWidth = True
- OptionsView.GroupByBox = False
- object Col00: TcxGridColumn
- Caption = #48264#54840
- PropertiesClassName = 'TcxLabelProperties'
- Properties.Alignment.Horz = taCenter
- Properties.Alignment.Vert = taVCenter
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- MinWidth = 62
- Options.Editing = False
- Options.HorzSizing = False
- Width = 62
- end
- object Col01: TcxGridColumn
- Caption = #49444#47749
- PropertiesClassName = 'TcxLabelProperties'
- Properties.Alignment.Horz = taLeftJustify
- Properties.Alignment.Vert = taVCenter
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- MinWidth = 0
- Options.Editing = False
- Width = 223
- end
- object Col02: TcxGridColumn
- Caption = #54028#51068#47749
- PropertiesClassName = 'TcxLabelProperties'
- Properties.Alignment.Horz = taCenter
- Properties.Alignment.Vert = taVCenter
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- Options.Editing = False
- Width = 180
- end
- object Col03: TcxGridColumn
- Caption = #50689#49345
- DataBinding.ValueType = 'Variant'
- PropertiesClassName = 'TcxImageProperties'
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- MinWidth = 400
- Options.Editing = False
- Options.HorzSizing = False
- Width = 400
- end
- object Col04: TcxGridColumn
- PropertiesClassName = 'TcxLabelProperties'
- Visible = False
- GroupSummaryAlignment = taCenter
- HeaderAlignmentHorz = taCenter
- HeaderAlignmentVert = vaCenter
- HeaderGlyphAlignmentHorz = taCenter
- VisibleForCustomization = False
- end
- end
- object GlList: TcxGridLevel
- GridView = TvList
- end
- end
- end
- end
- object BtnSearch: TcxButton
- Left = 717
- Top = 11
- Width = 80
- Height = 25
- Cursor = crHandPoint
- Hint = #51312#54924
- Anchors = [akTop, akRight]
- Caption = #51312#54924
- Colors.Default = 10737865
- LookAndFeel.NativeStyle = False
- TabOrder = 2
- Visible = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = #47569#51008' '#44256#46357
- Font.Style = [fsBold]
- ParentFont = False
- OnClick = BtnSearchClick
- end
- object EdObjId: TcxMaskEdit
- Left = 186
- Top = 8
- Properties.Alignment.Horz = taCenter
- Properties.Alignment.Vert = taVCenter
- Properties.MaskKind = emkRegExpr
- Properties.MaxLength = 0
- Style.LookAndFeel.NativeStyle = False
- StyleDisabled.LookAndFeel.NativeStyle = False
- StyleFocused.LookAndFeel.NativeStyle = False
- StyleHot.LookAndFeel.NativeStyle = False
- TabOrder = 3
- Text = '0'
- Visible = False
- Width = 56
- end
- object EdFormId: TcxTextEdit
- Left = 289
- Top = 8
- ImeMode = imSAlpha
- Properties.Alignment.Horz = taCenter
- Properties.Alignment.Vert = taVCenter
- Properties.ImeMode = imSAlpha
- Properties.MaxLength = 0
- Properties.ReadOnly = True
- Style.LookAndFeel.Kind = lfUltraFlat
- Style.LookAndFeel.NativeStyle = False
- Style.Shadow = False
- StyleDisabled.LookAndFeel.Kind = lfUltraFlat
- StyleDisabled.LookAndFeel.NativeStyle = False
- StyleFocused.LookAndFeel.Kind = lfUltraFlat
- StyleFocused.LookAndFeel.NativeStyle = False
- StyleHot.LookAndFeel.Kind = lfUltraFlat
- StyleHot.LookAndFeel.NativeStyle = False
- TabOrder = 4
- Text = '10000'
- Visible = False
- Width = 83
- end
- object BtnClosex: TcxButton
- Left = 805
- Top = 11
- Width = 80
- Height = 25
- Cursor = crHandPoint
- Hint = #45803#44592
- Anchors = [akTop, akRight]
- Caption = #45803#44592
- Colors.Default = 10737865
- TabOrder = 5
- Visible = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = #47569#51008' '#44256#46357
- Font.Style = [fsBold]
- ParentFont = False
- OnClick = BtnClosexClick
- end
- object TmrShow: TTimer
- Enabled = False
- Interval = 300
- OnTimer = TmrShowTimer
- Left = 660
- Top = 328
- end
- object FFPlayer1: TFFPlayer
- OnFileOpen = FFPlayer1FileOpen
- OnOpenFailed = FFPlayer1OpenFailed
- OnPosition = FFPlayer1Position
- OnState = FFPlayer1State
- Left = 776
- Top = 320
- end
- object VmsDesigner1: VmsDesigner
- Left = 864
- Top = 328
- end
- end
|