VMSM620MF.dfm 18 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648
  1. object VMSM620M: TVMSM620M
  2. Left = 0
  3. Top = 0
  4. HorzScrollBar.Visible = False
  5. VertScrollBar.Visible = False
  6. BorderIcons = [biSystemMenu, biMinimize]
  7. Caption = 'VMS '#46041#50689#49345' '#54268' '#46041#50689#49345' '#49444#51221
  8. ClientHeight = 851
  9. ClientWidth = 899
  10. Color = clBtnFace
  11. Font.Charset = DEFAULT_CHARSET
  12. Font.Color = clWindowText
  13. Font.Height = -13
  14. Font.Name = #47569#51008' '#44256#46357
  15. Font.Style = []
  16. KeyPreview = True
  17. OldCreateOrder = False
  18. Position = poOwnerFormCenter
  19. ShowHint = True
  20. OnClose = FormClose
  21. OnCreate = FormCreate
  22. OnShow = FormShow
  23. DesignSize = (
  24. 899
  25. 851)
  26. PixelsPerInch = 96
  27. TextHeight = 17
  28. object ShpTitle: TShape
  29. Left = 4
  30. Top = 4
  31. Width = 891
  32. Height = 40
  33. Anchors = [akLeft, akTop, akRight]
  34. Brush.Color = 14671839
  35. Pen.Color = 10849679
  36. Pen.Width = 2
  37. Visible = False
  38. ExplicitWidth = 1269
  39. end
  40. object LblCaption: TLabel
  41. Left = 16
  42. Top = 10
  43. Width = 267
  44. Height = 23
  45. Caption = #53440#51060#53952' '
  46. Font.Charset = DEFAULT_CHARSET
  47. Font.Color = 4740964
  48. Font.Height = -17
  49. Font.Name = #47569#51008' '#44256#46357
  50. Font.Style = [fsBold]
  51. ParentFont = False
  52. ParentShowHint = False
  53. ShowHint = True
  54. Visible = False
  55. end
  56. object ShpList: TShape
  57. Left = 4
  58. Top = 4
  59. Width = 891
  60. Height = 841
  61. Anchors = [akLeft, akTop, akRight, akBottom]
  62. Pen.Color = 10849679
  63. Pen.Width = 2
  64. ExplicitWidth = 966
  65. ExplicitHeight = 741
  66. end
  67. object EdFocus: TEdit
  68. Left = -10
  69. Top = -10
  70. Width = 2
  71. Height = 25
  72. ImeName = 'Microsoft Office IME 2007'
  73. TabOrder = 0
  74. Text = 'EdFocus'
  75. end
  76. object PanelBack: TPanel
  77. Left = 12
  78. Top = 10
  79. Width = 873
  80. Height = 830
  81. Anchors = [akLeft, akTop, akRight, akBottom]
  82. BevelOuter = bvNone
  83. ParentBackground = False
  84. ParentColor = True
  85. TabOrder = 1
  86. object PnlMenu: TPanel
  87. Left = 0
  88. Top = 792
  89. Width = 873
  90. Height = 38
  91. Align = alBottom
  92. BevelOuter = bvNone
  93. TabOrder = 0
  94. DesignSize = (
  95. 873
  96. 38)
  97. object BtnEdit: TcxButton
  98. Tag = 2
  99. Left = 8
  100. Top = 10
  101. Width = 80
  102. Height = 25
  103. Cursor = crHandPoint
  104. Hint = #45936#51060#53552' '#54200#51665
  105. Anchors = [akLeft, akBottom]
  106. Caption = #54200#51665
  107. Colors.Default = 10737865
  108. Enabled = False
  109. TabOrder = 0
  110. Visible = False
  111. Font.Charset = DEFAULT_CHARSET
  112. Font.Color = clBlack
  113. Font.Height = -13
  114. Font.Name = #47569#51008' '#44256#46357
  115. Font.Style = [fsBold]
  116. ParentFont = False
  117. end
  118. object BtnInsert: TcxButton
  119. Tag = 2
  120. Left = 89
  121. Top = 10
  122. Width = 80
  123. Height = 25
  124. Cursor = crHandPoint
  125. Hint = #45936#51060#53552' '#52628#44032
  126. Anchors = [akLeft, akBottom]
  127. Caption = #52628#44032
  128. Colors.Default = 10737865
  129. TabOrder = 1
  130. Visible = False
  131. Font.Charset = DEFAULT_CHARSET
  132. Font.Color = clBlack
  133. Font.Height = -13
  134. Font.Name = #47569#51008' '#44256#46357
  135. Font.Style = [fsBold]
  136. ParentFont = False
  137. end
  138. object BtnDelete: TcxButton
  139. Tag = 4
  140. Left = 171
  141. Top = 10
  142. Width = 80
  143. Height = 25
  144. Cursor = crHandPoint
  145. Hint = #45936#51060#53552' '#49325#51228
  146. Anchors = [akLeft, akBottom]
  147. Caption = #49325#51228
  148. Colors.Default = 10737865
  149. Enabled = False
  150. TabOrder = 2
  151. Visible = False
  152. Font.Charset = DEFAULT_CHARSET
  153. Font.Color = clBlack
  154. Font.Height = -13
  155. Font.Name = #47569#51008' '#44256#46357
  156. Font.Style = [fsBold]
  157. ParentFont = False
  158. end
  159. object BtnSavex: TcxButton
  160. Tag = 5
  161. Left = 252
  162. Top = 10
  163. Width = 80
  164. Height = 25
  165. Cursor = crHandPoint
  166. Hint = #54200#51665#51089#50629' '#51200#51109
  167. Anchors = [akLeft, akBottom]
  168. Caption = #51200#51109
  169. Colors.Default = 10737865
  170. Enabled = False
  171. TabOrder = 3
  172. Visible = False
  173. Font.Charset = DEFAULT_CHARSET
  174. Font.Color = clBlack
  175. Font.Height = -13
  176. Font.Name = #47569#51008' '#44256#46357
  177. Font.Style = [fsBold]
  178. ParentFont = False
  179. end
  180. object BtnClose: TcxButton
  181. Left = 662
  182. Top = 7
  183. Width = 100
  184. Height = 25
  185. Cursor = crHandPoint
  186. Hint = #52712#49548
  187. Anchors = [akRight, akBottom]
  188. Caption = #52712#49548
  189. Colors.Default = 10737865
  190. TabOrder = 4
  191. Font.Charset = DEFAULT_CHARSET
  192. Font.Color = clBlack
  193. Font.Height = -13
  194. Font.Name = #47569#51008' '#44256#46357
  195. Font.Style = [fsBold]
  196. ParentFont = False
  197. OnClick = BtnClosexClick
  198. end
  199. object BtnSave: TcxButton
  200. Tag = 4
  201. Left = 769
  202. Top = 7
  203. Width = 100
  204. Height = 25
  205. Cursor = crHandPoint
  206. Hint = #54364#52636#44396#44036#51012' '#49444#51221' '#54633#45768#45796'.'
  207. Anchors = [akRight, akBottom]
  208. Caption = #54869#51064
  209. Colors.Default = 10737865
  210. TabOrder = 5
  211. Font.Charset = DEFAULT_CHARSET
  212. Font.Color = clBlack
  213. Font.Height = -13
  214. Font.Name = #47569#51008' '#44256#46357
  215. Font.Style = [fsBold]
  216. ParentFont = False
  217. OnClick = BtnSaveClick
  218. end
  219. end
  220. object cxGroupBox1: TcxGroupBox
  221. Left = 0
  222. Top = 0
  223. Align = alTop
  224. Caption = #9654' '#46041#50689#49345' '#54268
  225. Style.BorderColor = clCaptionText
  226. Style.Shadow = False
  227. Style.TextColor = clWindowText
  228. Style.TextStyle = [fsBold]
  229. TabOrder = 1
  230. Height = 373
  231. Width = 873
  232. object PnlCmd: TPanel
  233. Left = 3
  234. Top = 19
  235. Width = 867
  236. Height = 344
  237. Align = alClient
  238. BevelOuter = bvNone
  239. Enabled = False
  240. TabOrder = 0
  241. object Panel2: TPanel
  242. Left = 0
  243. Top = 0
  244. Width = 867
  245. Height = 344
  246. Align = alClient
  247. BevelOuter = bvNone
  248. Color = clMenuHighlight
  249. Enabled = False
  250. ParentBackground = False
  251. TabOrder = 0
  252. object ImgForm: TImage
  253. Left = 536
  254. Top = 194
  255. Width = 80
  256. Height = 57
  257. Visible = False
  258. end
  259. object ImgDesc20: TImage
  260. Left = 601
  261. Top = 19
  262. Width = 9
  263. Height = 9
  264. Transparent = True
  265. end
  266. object Label10: TLabel
  267. Left = 619
  268. Top = 15
  269. Width = 65
  270. Height = 17
  271. Caption = #46041#50689#49345#48264#54840
  272. Transparent = True
  273. end
  274. object ImgDesc21: TImage
  275. Left = 601
  276. Top = 73
  277. Width = 9
  278. Height = 9
  279. Transparent = True
  280. end
  281. object Label13: TLabel
  282. Left = 619
  283. Top = 69
  284. Width = 39
  285. Height = 17
  286. Caption = #54028#51068#47749
  287. Color = clWindowText
  288. ParentColor = False
  289. Transparent = True
  290. end
  291. object PnlEdtBack: TPanel
  292. Left = 3
  293. Top = 2
  294. Width = 578
  295. Height = 324
  296. BevelInner = bvLowered
  297. Color = clSilver
  298. ParentBackground = False
  299. TabOrder = 0
  300. object PnlEditForm: TPanel
  301. Left = 2
  302. Top = 2
  303. Width = 574
  304. Height = 320
  305. Align = alClient
  306. BevelOuter = bvNone
  307. Color = clBlack
  308. ParentBackground = False
  309. TabOrder = 0
  310. end
  311. end
  312. object EdSymbLibNmbr: TcxTextEdit
  313. Left = 601
  314. Top = 38
  315. Properties.Alignment.Horz = taCenter
  316. Properties.Alignment.Vert = taVCenter
  317. Properties.MaxLength = 0
  318. Properties.ReadOnly = True
  319. Style.LookAndFeel.Kind = lfUltraFlat
  320. Style.LookAndFeel.NativeStyle = False
  321. Style.Shadow = False
  322. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  323. StyleDisabled.LookAndFeel.NativeStyle = False
  324. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  325. StyleFocused.LookAndFeel.NativeStyle = False
  326. StyleFocused.TextStyle = [fsBold]
  327. StyleHot.LookAndFeel.Kind = lfUltraFlat
  328. StyleHot.LookAndFeel.NativeStyle = False
  329. TabOrder = 1
  330. Width = 136
  331. end
  332. object EdStreamAddr: TcxTextEdit
  333. Left = 601
  334. Top = 92
  335. Properties.Alignment.Vert = taVCenter
  336. Properties.MaxLength = 0
  337. Properties.ReadOnly = True
  338. Style.LookAndFeel.Kind = lfUltraFlat
  339. Style.LookAndFeel.NativeStyle = False
  340. Style.Shadow = False
  341. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  342. StyleDisabled.LookAndFeel.NativeStyle = False
  343. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  344. StyleFocused.LookAndFeel.NativeStyle = False
  345. StyleFocused.TextStyle = [fsBold]
  346. StyleHot.LookAndFeel.Kind = lfUltraFlat
  347. StyleHot.LookAndFeel.NativeStyle = False
  348. TabOrder = 2
  349. Width = 251
  350. end
  351. end
  352. end
  353. end
  354. object GrpObj: TcxGroupBox
  355. Left = 0
  356. Top = 373
  357. Align = alClient
  358. Caption = #9654' '#46041#50689#49345' '#49444#51221
  359. Style.TextStyle = [fsBold]
  360. TabOrder = 2
  361. Height = 419
  362. Width = 873
  363. object Panel1: TPanel
  364. Left = 3
  365. Top = 356
  366. Width = 867
  367. Height = 53
  368. Align = alBottom
  369. TabOrder = 0
  370. object lblCurrentPTS1: TLabel
  371. Left = 492
  372. Top = 15
  373. Width = 55
  374. Height = 17
  375. Alignment = taCenter
  376. Caption = '00:00:000'
  377. end
  378. object lblDuration1: TLabel
  379. Left = 423
  380. Top = 15
  381. Width = 55
  382. Height = 17
  383. Alignment = taCenter
  384. Caption = '00:00:000'
  385. end
  386. object TrackBar1: TTrackBar
  387. Left = -1
  388. Top = 11
  389. Width = 418
  390. Height = 37
  391. TabOrder = 0
  392. OnChange = TrackBar1Change
  393. end
  394. object BtnPlay: TcxButton
  395. Left = 583
  396. Top = 12
  397. Width = 88
  398. Height = 25
  399. Cursor = crHandPoint
  400. Hint = #51116#49373
  401. Caption = #51116#49373
  402. Colors.Default = 10737865
  403. TabOrder = 1
  404. Font.Charset = DEFAULT_CHARSET
  405. Font.Color = clBlack
  406. Font.Height = -13
  407. Font.Name = #47569#51008' '#44256#46357
  408. Font.Style = [fsBold]
  409. ParentFont = False
  410. OnClick = BtnPlayClick
  411. end
  412. object BtnStop: TcxButton
  413. Left = 674
  414. Top = 12
  415. Width = 88
  416. Height = 25
  417. Cursor = crHandPoint
  418. Hint = #51221#51648
  419. Caption = #51221#51648
  420. Colors.Default = 10737865
  421. Enabled = False
  422. TabOrder = 2
  423. Font.Charset = DEFAULT_CHARSET
  424. Font.Color = clBlack
  425. Font.Height = -13
  426. Font.Name = #47569#51008' '#44256#46357
  427. Font.Style = [fsBold]
  428. ParentFont = False
  429. OnClick = BtnStopClick
  430. end
  431. object BtnPause: TcxButton
  432. Left = 766
  433. Top = 12
  434. Width = 88
  435. Height = 25
  436. Cursor = crHandPoint
  437. Hint = #47688#52644'/'#51116#49373
  438. Caption = #47688#52644'/'#51116#49373
  439. Colors.Default = 10737865
  440. Enabled = False
  441. TabOrder = 3
  442. Font.Charset = DEFAULT_CHARSET
  443. Font.Color = clBlack
  444. Font.Height = -13
  445. Font.Name = #47569#51008' '#44256#46357
  446. Font.Style = [fsBold]
  447. ParentFont = False
  448. OnClick = BtnPauseClick
  449. end
  450. object ChkFullScreen: TcxCheckBox
  451. Left = 388
  452. Top = 29
  453. Cursor = crHandPoint
  454. Caption = #54868#47732' '#47582#52644
  455. State = cbsChecked
  456. TabOrder = 4
  457. Transparent = True
  458. Visible = False
  459. Width = 105
  460. end
  461. end
  462. object CxList: TcxGrid
  463. Left = 3
  464. Top = 19
  465. Width = 867
  466. Height = 337
  467. Align = alClient
  468. TabOrder = 1
  469. object TvList: TcxGridTableView
  470. OnFocusedRecordChanged = TvListFocusedRecordChanged
  471. DataController.Summary.DefaultGroupSummaryItems = <>
  472. DataController.Summary.FooterSummaryItems = <>
  473. DataController.Summary.SummaryGroups = <>
  474. OptionsCustomize.ColumnFiltering = False
  475. OptionsCustomize.ColumnMoving = False
  476. OptionsCustomize.DataRowSizing = True
  477. OptionsSelection.HideFocusRectOnExit = False
  478. OptionsSelection.HideSelection = True
  479. OptionsView.ColumnAutoWidth = True
  480. OptionsView.GroupByBox = False
  481. object Col00: TcxGridColumn
  482. Caption = #48264#54840
  483. PropertiesClassName = 'TcxLabelProperties'
  484. Properties.Alignment.Horz = taCenter
  485. Properties.Alignment.Vert = taVCenter
  486. GroupSummaryAlignment = taCenter
  487. HeaderAlignmentHorz = taCenter
  488. HeaderAlignmentVert = vaCenter
  489. HeaderGlyphAlignmentHorz = taCenter
  490. MinWidth = 62
  491. Options.Editing = False
  492. Options.HorzSizing = False
  493. Width = 62
  494. end
  495. object Col01: TcxGridColumn
  496. Caption = #49444#47749
  497. PropertiesClassName = 'TcxLabelProperties'
  498. Properties.Alignment.Horz = taLeftJustify
  499. Properties.Alignment.Vert = taVCenter
  500. GroupSummaryAlignment = taCenter
  501. HeaderAlignmentHorz = taCenter
  502. HeaderAlignmentVert = vaCenter
  503. HeaderGlyphAlignmentHorz = taCenter
  504. MinWidth = 0
  505. Options.Editing = False
  506. Width = 223
  507. end
  508. object Col02: TcxGridColumn
  509. Caption = #54028#51068#47749
  510. PropertiesClassName = 'TcxLabelProperties'
  511. Properties.Alignment.Horz = taCenter
  512. Properties.Alignment.Vert = taVCenter
  513. GroupSummaryAlignment = taCenter
  514. HeaderAlignmentHorz = taCenter
  515. HeaderAlignmentVert = vaCenter
  516. HeaderGlyphAlignmentHorz = taCenter
  517. Options.Editing = False
  518. Width = 180
  519. end
  520. object Col03: TcxGridColumn
  521. Caption = #50689#49345
  522. DataBinding.ValueType = 'Variant'
  523. PropertiesClassName = 'TcxImageProperties'
  524. GroupSummaryAlignment = taCenter
  525. HeaderAlignmentHorz = taCenter
  526. HeaderAlignmentVert = vaCenter
  527. HeaderGlyphAlignmentHorz = taCenter
  528. MinWidth = 400
  529. Options.Editing = False
  530. Options.HorzSizing = False
  531. Width = 400
  532. end
  533. object Col04: TcxGridColumn
  534. PropertiesClassName = 'TcxLabelProperties'
  535. Visible = False
  536. GroupSummaryAlignment = taCenter
  537. HeaderAlignmentHorz = taCenter
  538. HeaderAlignmentVert = vaCenter
  539. HeaderGlyphAlignmentHorz = taCenter
  540. VisibleForCustomization = False
  541. end
  542. end
  543. object GlList: TcxGridLevel
  544. GridView = TvList
  545. end
  546. end
  547. end
  548. end
  549. object BtnSearch: TcxButton
  550. Left = 717
  551. Top = 11
  552. Width = 80
  553. Height = 25
  554. Cursor = crHandPoint
  555. Hint = #51312#54924
  556. Anchors = [akTop, akRight]
  557. Caption = #51312#54924
  558. Colors.Default = 10737865
  559. LookAndFeel.NativeStyle = False
  560. TabOrder = 2
  561. Visible = False
  562. Font.Charset = DEFAULT_CHARSET
  563. Font.Color = clBlack
  564. Font.Height = -13
  565. Font.Name = #47569#51008' '#44256#46357
  566. Font.Style = [fsBold]
  567. ParentFont = False
  568. OnClick = BtnSearchClick
  569. end
  570. object EdObjId: TcxMaskEdit
  571. Left = 186
  572. Top = 8
  573. Properties.Alignment.Horz = taCenter
  574. Properties.Alignment.Vert = taVCenter
  575. Properties.MaskKind = emkRegExpr
  576. Properties.MaxLength = 0
  577. Style.LookAndFeel.NativeStyle = False
  578. StyleDisabled.LookAndFeel.NativeStyle = False
  579. StyleFocused.LookAndFeel.NativeStyle = False
  580. StyleHot.LookAndFeel.NativeStyle = False
  581. TabOrder = 3
  582. Text = '0'
  583. Visible = False
  584. Width = 56
  585. end
  586. object EdFormId: TcxTextEdit
  587. Left = 289
  588. Top = 8
  589. ImeMode = imSAlpha
  590. Properties.Alignment.Horz = taCenter
  591. Properties.Alignment.Vert = taVCenter
  592. Properties.ImeMode = imSAlpha
  593. Properties.MaxLength = 0
  594. Properties.ReadOnly = True
  595. Style.LookAndFeel.Kind = lfUltraFlat
  596. Style.LookAndFeel.NativeStyle = False
  597. Style.Shadow = False
  598. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  599. StyleDisabled.LookAndFeel.NativeStyle = False
  600. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  601. StyleFocused.LookAndFeel.NativeStyle = False
  602. StyleHot.LookAndFeel.Kind = lfUltraFlat
  603. StyleHot.LookAndFeel.NativeStyle = False
  604. TabOrder = 4
  605. Text = '10000'
  606. Visible = False
  607. Width = 83
  608. end
  609. object BtnClosex: TcxButton
  610. Left = 805
  611. Top = 11
  612. Width = 80
  613. Height = 25
  614. Cursor = crHandPoint
  615. Hint = #45803#44592
  616. Anchors = [akTop, akRight]
  617. Caption = #45803#44592
  618. Colors.Default = 10737865
  619. TabOrder = 5
  620. Visible = False
  621. Font.Charset = DEFAULT_CHARSET
  622. Font.Color = clBlack
  623. Font.Height = -13
  624. Font.Name = #47569#51008' '#44256#46357
  625. Font.Style = [fsBold]
  626. ParentFont = False
  627. OnClick = BtnClosexClick
  628. end
  629. object TmrShow: TTimer
  630. Enabled = False
  631. Interval = 300
  632. OnTimer = TmrShowTimer
  633. Left = 660
  634. Top = 328
  635. end
  636. object FFPlayer1: TFFPlayer
  637. OnFileOpen = FFPlayer1FileOpen
  638. OnOpenFailed = FFPlayer1OpenFailed
  639. OnPosition = FFPlayer1Position
  640. OnState = FFPlayer1State
  641. Left = 776
  642. Top = 320
  643. end
  644. object VmsDesigner1: VmsDesigner
  645. Left = 864
  646. Top = 328
  647. end
  648. end