CTVM010MF.dfm 19 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573
  1. object CTVM010M: TCTVM010M
  2. Left = 0
  3. Top = 0
  4. HorzScrollBar.Visible = False
  5. VertScrollBar.Visible = False
  6. Caption = 'CCTV '#49345#53468' '#47784#45768#53552#47553
  7. ClientHeight = 677
  8. ClientWidth = 1179
  9. Color = clBtnFace
  10. Font.Charset = DEFAULT_CHARSET
  11. Font.Color = clWindowText
  12. Font.Height = -12
  13. Font.Name = #47569#51008' '#44256#46357
  14. Font.Style = []
  15. OldCreateOrder = False
  16. Position = poOwnerFormCenter
  17. ShowHint = True
  18. OnClose = FormClose
  19. OnCreate = FormCreate
  20. OnShow = FormShow
  21. DesignSize = (
  22. 1179
  23. 677)
  24. PixelsPerInch = 96
  25. TextHeight = 15
  26. object ShpTitle: TShape
  27. Left = 4
  28. Top = 4
  29. Width = 1171
  30. Height = 40
  31. Anchors = [akLeft, akTop, akRight]
  32. Brush.Color = 14671839
  33. Pen.Color = 10849679
  34. Pen.Width = 2
  35. ExplicitWidth = 1269
  36. end
  37. object LblCaption: TLabel
  38. Left = 16
  39. Top = 10
  40. Width = 267
  41. Height = 23
  42. Caption = #53440#51060#53952' '
  43. Font.Charset = DEFAULT_CHARSET
  44. Font.Color = 4740964
  45. Font.Height = -17
  46. Font.Name = #47569#51008' '#44256#46357
  47. Font.Style = [fsBold]
  48. ParentFont = False
  49. ParentShowHint = False
  50. ShowHint = True
  51. end
  52. object ShpList: TShape
  53. Left = 4
  54. Top = 50
  55. Width = 1171
  56. Height = 621
  57. Anchors = [akLeft, akTop, akRight, akBottom]
  58. Pen.Color = 10849679
  59. Pen.Width = 2
  60. ExplicitWidth = 1436
  61. ExplicitHeight = 766
  62. end
  63. object BtnSearch: TcxButton
  64. Left = 1005
  65. Top = 11
  66. Width = 80
  67. Height = 25
  68. Cursor = crHandPoint
  69. Hint = #51312#54924
  70. Anchors = [akTop, akRight]
  71. Caption = #51312#54924
  72. Colors.Default = 10737865
  73. TabOrder = 0
  74. Font.Charset = DEFAULT_CHARSET
  75. Font.Color = clBlack
  76. Font.Height = -13
  77. Font.Name = #47569#51008' '#44256#46357
  78. Font.Style = [fsBold]
  79. ParentFont = False
  80. OnClick = BtnSearchClick
  81. end
  82. object BtnClose: TcxButton
  83. Left = 1090
  84. Top = 11
  85. Width = 75
  86. Height = 25
  87. Cursor = crHandPoint
  88. Hint = #45803#44592
  89. Anchors = [akTop, akRight]
  90. Caption = #45803#44592
  91. Colors.Default = 10737865
  92. TabOrder = 1
  93. Font.Charset = DEFAULT_CHARSET
  94. Font.Color = clBlack
  95. Font.Height = -13
  96. Font.Name = #47569#51008' '#44256#46357
  97. Font.Style = [fsBold]
  98. ParentFont = False
  99. OnClick = BtnCloseClick
  100. end
  101. object PnlBack: TPanel
  102. Left = 12
  103. Top = 56
  104. Width = 1153
  105. Height = 608
  106. Anchors = [akLeft, akTop, akRight, akBottom]
  107. BevelOuter = bvNone
  108. ParentBackground = False
  109. ParentColor = True
  110. TabOrder = 2
  111. object PnlLeft: TPanel
  112. Left = 0
  113. Top = 0
  114. Width = 1153
  115. Height = 608
  116. Align = alClient
  117. BevelOuter = bvNone
  118. TabOrder = 0
  119. object cxGroupBox3: TcxGroupBox
  120. Left = 0
  121. Top = 0
  122. Align = alClient
  123. Caption = #9654' CCTV '#49345#53468' '#51221#48372
  124. ParentFont = False
  125. Style.BorderColor = clCaptionText
  126. Style.Font.Charset = DEFAULT_CHARSET
  127. Style.Font.Color = clWindowText
  128. Style.Font.Height = -13
  129. Style.Font.Name = #47569#51008' '#44256#46357
  130. Style.Font.Style = []
  131. Style.Shadow = False
  132. Style.TextColor = clWindowText
  133. Style.TextStyle = [fsBold]
  134. Style.IsFontAssigned = True
  135. TabOrder = 0
  136. Height = 608
  137. Width = 1153
  138. object CxList: TcxGrid
  139. Left = 3
  140. Top = 19
  141. Width = 1147
  142. Height = 579
  143. Align = alClient
  144. TabOrder = 0
  145. LookAndFeel.NativeStyle = False
  146. object TvList: TcxGridBandedTableView
  147. FilterBox.CustomizeDialog = False
  148. DataController.Summary.DefaultGroupSummaryItems = <>
  149. DataController.Summary.FooterSummaryItems = <
  150. item
  151. Kind = skCount
  152. Column = ColName
  153. end
  154. item
  155. Column = ColCommS
  156. end>
  157. DataController.Summary.SummaryGroups = <>
  158. OptionsBehavior.CellHints = True
  159. OptionsCustomize.ColumnMoving = False
  160. OptionsCustomize.ColumnVertSizing = False
  161. OptionsData.CancelOnExit = False
  162. OptionsData.Deleting = False
  163. OptionsData.DeletingConfirmation = False
  164. OptionsData.Editing = False
  165. OptionsData.Inserting = False
  166. OptionsSelection.CellSelect = False
  167. OptionsView.NoDataToDisplayInfoText = '<'#49345#53468#51221#48372#44032' '#50630#49845#45768#45796'.>'
  168. OptionsView.GroupByBox = False
  169. OptionsView.Indicator = True
  170. Bands = <
  171. item
  172. Caption = 'CCTV '#51221#48372
  173. Width = 474
  174. end
  175. item
  176. Caption = #53685#49888
  177. Width = 315
  178. end
  179. item
  180. Caption = #51228#50612#44592' '#49345#53468
  181. Width = 334
  182. end
  183. item
  184. Caption = #51228#50612#44592' '#49345#53468
  185. Visible = False
  186. VisibleForCustomization = False
  187. Width = 241
  188. end
  189. item
  190. Caption = #54788#51116#44050
  191. Visible = False
  192. VisibleForCustomization = False
  193. end
  194. item
  195. Caption = #54060' '#49444#51221#44050
  196. Visible = False
  197. VisibleForCustomization = False
  198. Width = 143
  199. end
  200. item
  201. Caption = #55176#53552' '#49444#51221#44050
  202. Visible = False
  203. VisibleForCustomization = False
  204. Width = 126
  205. end>
  206. object ColId: TcxGridBandedColumn
  207. Caption = 'CCTV ID'
  208. PropertiesClassName = 'TcxTextEditProperties'
  209. Properties.Alignment.Horz = taCenter
  210. Properties.Alignment.Vert = taVCenter
  211. HeaderAlignmentHorz = taCenter
  212. HeaderAlignmentVert = vaCenter
  213. Options.Editing = False
  214. Width = 89
  215. Position.BandIndex = 0
  216. Position.ColIndex = 1
  217. Position.RowIndex = 0
  218. end
  219. object ColName: TcxGridBandedColumn
  220. Caption = 'CCTV '#47749#52845
  221. PropertiesClassName = 'TcxTextEditProperties'
  222. Properties.Alignment.Horz = taLeftJustify
  223. Properties.Alignment.Vert = taVCenter
  224. HeaderAlignmentHorz = taCenter
  225. HeaderAlignmentVert = vaCenter
  226. Options.Editing = False
  227. Width = 270
  228. Position.BandIndex = 0
  229. Position.ColIndex = 2
  230. Position.RowIndex = 0
  231. end
  232. object ColCommS: TcxGridBandedColumn
  233. Caption = #53685#49888' '#49345#53468
  234. PropertiesClassName = 'TcxTextEditProperties'
  235. Properties.Alignment.Horz = taCenter
  236. Properties.Alignment.Vert = taVCenter
  237. OnCustomDrawCell = ColCommSCustomDrawCell
  238. HeaderAlignmentHorz = taCenter
  239. HeaderAlignmentVert = vaCenter
  240. Options.Editing = False
  241. Width = 223
  242. Position.BandIndex = 1
  243. Position.ColIndex = 1
  244. Position.RowIndex = 0
  245. end
  246. object ColDoorS: TcxGridBandedColumn
  247. Caption = #46020#50612
  248. PropertiesClassName = 'TcxTextEditProperties'
  249. Properties.Alignment.Horz = taCenter
  250. Properties.Alignment.Vert = taVCenter
  251. OnCustomDrawCell = ColCommSCustomDrawCell
  252. HeaderAlignmentHorz = taCenter
  253. HeaderAlignmentVert = vaCenter
  254. Options.Editing = False
  255. Width = 45
  256. Position.BandIndex = 2
  257. Position.ColIndex = 0
  258. Position.RowIndex = 0
  259. end
  260. object ColFanS: TcxGridBandedColumn
  261. Caption = #54060
  262. PropertiesClassName = 'TcxTextEditProperties'
  263. Properties.Alignment.Horz = taCenter
  264. Properties.Alignment.Vert = taVCenter
  265. OnCustomDrawCell = ColCommSCustomDrawCell
  266. HeaderAlignmentHorz = taCenter
  267. HeaderAlignmentVert = vaCenter
  268. Options.Editing = False
  269. Width = 45
  270. Position.BandIndex = 2
  271. Position.ColIndex = 1
  272. Position.RowIndex = 0
  273. end
  274. object ColHeaterS: TcxGridBandedColumn
  275. Caption = #55176#53552
  276. PropertiesClassName = 'TcxTextEditProperties'
  277. Properties.Alignment.Horz = taCenter
  278. Properties.Alignment.Vert = taVCenter
  279. OnCustomDrawCell = ColCommSCustomDrawCell
  280. HeaderAlignmentHorz = taCenter
  281. HeaderAlignmentVert = vaCenter
  282. Options.Editing = False
  283. Width = 45
  284. Position.BandIndex = 2
  285. Position.ColIndex = 2
  286. Position.RowIndex = 0
  287. end
  288. object ColCamS: TcxGridBandedColumn
  289. Caption = #52852#47700#46972
  290. PropertiesClassName = 'TcxTextEditProperties'
  291. Properties.Alignment.Horz = taCenter
  292. Properties.Alignment.Vert = taVCenter
  293. HeaderAlignmentHorz = taCenter
  294. HeaderAlignmentVert = vaCenter
  295. Options.Editing = False
  296. Width = 63
  297. Position.BandIndex = 3
  298. Position.ColIndex = 0
  299. Position.RowIndex = 0
  300. end
  301. object ColTextS: TcxGridBandedColumn
  302. Caption = #47928#51088
  303. PropertiesClassName = 'TcxTextEditProperties'
  304. Properties.Alignment.Horz = taCenter
  305. Properties.Alignment.Vert = taVCenter
  306. HeaderAlignmentHorz = taCenter
  307. HeaderAlignmentVert = vaCenter
  308. Options.Editing = False
  309. Width = 55
  310. Position.BandIndex = 3
  311. Position.ColIndex = 1
  312. Position.RowIndex = 0
  313. end
  314. object ColFanOn: TcxGridBandedColumn
  315. Caption = 'On'
  316. PropertiesClassName = 'TcxTextEditProperties'
  317. Properties.Alignment.Horz = taRightJustify
  318. Properties.Alignment.Vert = taVCenter
  319. HeaderAlignmentHorz = taCenter
  320. HeaderAlignmentVert = vaCenter
  321. Options.Editing = False
  322. Position.BandIndex = 5
  323. Position.ColIndex = 0
  324. Position.RowIndex = 0
  325. end
  326. object ColFanOff: TcxGridBandedColumn
  327. Caption = 'Off'
  328. PropertiesClassName = 'TcxTextEditProperties'
  329. Properties.Alignment.Horz = taRightJustify
  330. Properties.Alignment.Vert = taVCenter
  331. HeaderAlignmentHorz = taCenter
  332. HeaderAlignmentVert = vaCenter
  333. Options.Editing = False
  334. Position.BandIndex = 5
  335. Position.ColIndex = 1
  336. Position.RowIndex = 0
  337. end
  338. object ColHeaterOff: TcxGridBandedColumn
  339. Caption = 'Off'
  340. PropertiesClassName = 'TcxTextEditProperties'
  341. Properties.Alignment.Horz = taRightJustify
  342. Properties.Alignment.Vert = taVCenter
  343. HeaderAlignmentHorz = taCenter
  344. HeaderAlignmentVert = vaCenter
  345. Options.Editing = False
  346. Position.BandIndex = 6
  347. Position.ColIndex = 1
  348. Position.RowIndex = 0
  349. end
  350. object ColHeaterOn: TcxGridBandedColumn
  351. Caption = 'On'
  352. PropertiesClassName = 'TcxTextEditProperties'
  353. Properties.Alignment.Horz = taRightJustify
  354. Properties.Alignment.Vert = taVCenter
  355. HeaderAlignmentHorz = taCenter
  356. HeaderAlignmentVert = vaCenter
  357. Options.Editing = False
  358. Position.BandIndex = 6
  359. Position.ColIndex = 0
  360. Position.RowIndex = 0
  361. end
  362. object ColBattS: TcxGridBandedColumn
  363. Caption = #48176#53552#47532
  364. PropertiesClassName = 'TcxTextEditProperties'
  365. Properties.Alignment.Horz = taCenter
  366. Properties.Alignment.Vert = taVCenter
  367. HeaderAlignmentHorz = taCenter
  368. HeaderAlignmentVert = vaCenter
  369. Options.Editing = False
  370. Width = 56
  371. Position.BandIndex = 3
  372. Position.ColIndex = 2
  373. Position.RowIndex = 0
  374. end
  375. object ColHamS: TcxGridBandedColumn
  376. Caption = #54632#52404
  377. PropertiesClassName = 'TcxTextEditProperties'
  378. Properties.Alignment.Horz = taCenter
  379. Properties.Alignment.Vert = taVCenter
  380. Visible = False
  381. HeaderAlignmentHorz = taCenter
  382. HeaderAlignmentVert = vaCenter
  383. Options.Editing = False
  384. VisibleForCustomization = False
  385. Width = 222
  386. Position.BandIndex = 1
  387. Position.ColIndex = 2
  388. Position.RowIndex = 0
  389. end
  390. object ColCtrlS: TcxGridBandedColumn
  391. Caption = #51228#50612#44592
  392. PropertiesClassName = 'TcxTextEditProperties'
  393. Properties.Alignment.Horz = taCenter
  394. Properties.Alignment.Vert = taVCenter
  395. Visible = False
  396. HeaderAlignmentHorz = taCenter
  397. HeaderAlignmentVert = vaCenter
  398. Options.Editing = False
  399. VisibleForCustomization = False
  400. Width = 168
  401. Position.BandIndex = 1
  402. Position.ColIndex = 3
  403. Position.RowIndex = 0
  404. end
  405. object ColTemp: TcxGridBandedColumn
  406. Caption = #50728#46020
  407. PropertiesClassName = 'TcxTextEditProperties'
  408. Properties.Alignment.Horz = taRightJustify
  409. Properties.Alignment.Vert = taVCenter
  410. OnCustomDrawCell = ColTempCustomDrawCell
  411. HeaderAlignmentHorz = taCenter
  412. HeaderAlignmentVert = vaCenter
  413. Options.Editing = False
  414. Position.BandIndex = 2
  415. Position.ColIndex = 3
  416. Position.RowIndex = 0
  417. end
  418. object ColVolt: TcxGridBandedColumn
  419. Caption = #51077#47141#51204#50517
  420. PropertiesClassName = 'TcxTextEditProperties'
  421. Properties.Alignment.Horz = taRightJustify
  422. Properties.Alignment.Vert = taVCenter
  423. HeaderAlignmentHorz = taCenter
  424. HeaderAlignmentVert = vaCenter
  425. Options.Editing = False
  426. Width = 60
  427. Position.BandIndex = 4
  428. Position.ColIndex = 0
  429. Position.RowIndex = 0
  430. end
  431. object ColVoltOut: TcxGridBandedColumn
  432. Caption = #52636#47141#51204#50517
  433. PropertiesClassName = 'TcxTextEditProperties'
  434. Properties.Alignment.Horz = taRightJustify
  435. Properties.Alignment.Vert = taVCenter
  436. HeaderAlignmentHorz = taCenter
  437. HeaderAlignmentVert = vaCenter
  438. Width = 60
  439. Position.BandIndex = 4
  440. Position.ColIndex = 1
  441. Position.RowIndex = 0
  442. end
  443. object ColUpdtDt: TcxGridBandedColumn
  444. Caption = #50629#45936#51060#53944' '#49884#44033
  445. PropertiesClassName = 'TcxLabelProperties'
  446. Properties.Alignment.Horz = taCenter
  447. Properties.Alignment.Vert = taVCenter
  448. OnCustomDrawCell = ColUpdtDtCustomDrawCell
  449. HeaderAlignmentHorz = taCenter
  450. HeaderAlignmentVert = vaCenter
  451. Width = 371
  452. Position.BandIndex = 1
  453. Position.ColIndex = 0
  454. Position.RowIndex = 0
  455. end
  456. object ColNmbr: TcxGridBandedColumn
  457. Caption = #48264#54840
  458. DataBinding.ValueType = 'Integer'
  459. PropertiesClassName = 'TcxSpinEditProperties'
  460. Properties.Alignment.Horz = taCenter
  461. Properties.Alignment.Vert = taVCenter
  462. HeaderAlignmentHorz = taCenter
  463. HeaderAlignmentVert = vaCenter
  464. Width = 64
  465. Position.BandIndex = 0
  466. Position.ColIndex = 0
  467. Position.RowIndex = 0
  468. end
  469. object ColTypeNm: TcxGridBandedColumn
  470. Caption = #50976#54805
  471. PropertiesClassName = 'TcxLabelProperties'
  472. Properties.Alignment.Horz = taCenter
  473. Properties.Alignment.Vert = taVCenter
  474. HeaderAlignmentHorz = taCenter
  475. HeaderAlignmentVert = vaCenter
  476. Width = 51
  477. Position.BandIndex = 0
  478. Position.ColIndex = 3
  479. Position.RowIndex = 0
  480. end
  481. end
  482. object GlList: TcxGridLevel
  483. GridView = TvList
  484. end
  485. end
  486. object lblMOS0: TcxLabel
  487. Left = 413
  488. Top = 189
  489. Caption = #51221#49345
  490. Transparent = True
  491. Visible = False
  492. end
  493. object lblMOS1: TcxLabel
  494. Left = 413
  495. Top = 204
  496. Caption = #51109#50528
  497. Transparent = True
  498. Visible = False
  499. end
  500. object lblPWS0: TcxLabel
  501. Left = 413
  502. Top = 220
  503. Caption = #53020#51664
  504. Transparent = True
  505. Visible = False
  506. end
  507. object lblPWS1: TcxLabel
  508. Left = 413
  509. Top = 236
  510. Caption = #44732#51664
  511. Transparent = True
  512. Visible = False
  513. end
  514. object lblCDS0: TcxLabel
  515. Left = 413
  516. Top = 252
  517. Caption = #45803#55192
  518. Transparent = True
  519. Visible = False
  520. end
  521. object lblCDS1: TcxLabel
  522. Left = 413
  523. Top = 268
  524. Caption = #50676#47548
  525. Transparent = True
  526. Visible = False
  527. end
  528. object lblPAS0: TcxLabel
  529. Left = 413
  530. Top = 284
  531. Caption = #44032#46041
  532. Transparent = True
  533. Visible = False
  534. end
  535. object lblPAS1: TcxLabel
  536. Left = 413
  537. Top = 300
  538. Caption = #51473#51648
  539. Transparent = True
  540. Visible = False
  541. end
  542. object lblHTS0: TcxLabel
  543. Left = 413
  544. Top = 316
  545. Caption = #44032#46041
  546. Transparent = True
  547. Visible = False
  548. end
  549. object lblHTS1: TcxLabel
  550. Left = 413
  551. Top = 333
  552. Caption = #51473#51648
  553. Transparent = True
  554. Visible = False
  555. end
  556. object lblUnknown: TcxLabel
  557. Left = 413
  558. Top = 360
  559. Caption = '?'
  560. Transparent = True
  561. Visible = False
  562. end
  563. end
  564. end
  565. end
  566. object TmrShow: TTimer
  567. Enabled = False
  568. Interval = 500
  569. OnTimer = TmrShowTimer
  570. Left = 492
  571. Top = 300
  572. end
  573. end