CTVM010MF.dfm 19 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575
  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 = 940
  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. 940
  23. 677)
  24. PixelsPerInch = 96
  25. TextHeight = 15
  26. object ShpTitle: TShape
  27. Left = 4
  28. Top = 4
  29. Width = 932
  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 = 932
  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 = 766
  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 = 851
  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 = 914
  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 = 914
  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 = 914
  138. object CxList: TcxGrid
  139. Left = 3
  140. Top = 19
  141. Width = 908
  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. Visible = False
  182. VisibleForCustomization = False
  183. Width = 334
  184. end
  185. item
  186. Caption = #51228#50612#44592' '#49345#53468
  187. Visible = False
  188. VisibleForCustomization = False
  189. Width = 241
  190. end
  191. item
  192. Caption = #54788#51116#44050
  193. Visible = False
  194. VisibleForCustomization = False
  195. end
  196. item
  197. Caption = #54060' '#49444#51221#44050
  198. Visible = False
  199. VisibleForCustomization = False
  200. Width = 143
  201. end
  202. item
  203. Caption = #55176#53552' '#49444#51221#44050
  204. Visible = False
  205. VisibleForCustomization = False
  206. Width = 126
  207. end>
  208. object ColId: TcxGridBandedColumn
  209. Caption = 'CCTV ID'
  210. PropertiesClassName = 'TcxTextEditProperties'
  211. Properties.Alignment.Horz = taCenter
  212. Properties.Alignment.Vert = taVCenter
  213. HeaderAlignmentHorz = taCenter
  214. HeaderAlignmentVert = vaCenter
  215. Options.Editing = False
  216. Width = 89
  217. Position.BandIndex = 0
  218. Position.ColIndex = 1
  219. Position.RowIndex = 0
  220. end
  221. object ColName: TcxGridBandedColumn
  222. Caption = 'CCTV '#47749#52845
  223. PropertiesClassName = 'TcxTextEditProperties'
  224. Properties.Alignment.Horz = taLeftJustify
  225. Properties.Alignment.Vert = taVCenter
  226. HeaderAlignmentHorz = taCenter
  227. HeaderAlignmentVert = vaCenter
  228. Options.Editing = False
  229. Width = 270
  230. Position.BandIndex = 0
  231. Position.ColIndex = 2
  232. Position.RowIndex = 0
  233. end
  234. object ColCommS: TcxGridBandedColumn
  235. Caption = #53685#49888' '#49345#53468
  236. PropertiesClassName = 'TcxTextEditProperties'
  237. Properties.Alignment.Horz = taCenter
  238. Properties.Alignment.Vert = taVCenter
  239. OnCustomDrawCell = ColCommSCustomDrawCell
  240. HeaderAlignmentHorz = taCenter
  241. HeaderAlignmentVert = vaCenter
  242. Options.Editing = False
  243. Width = 223
  244. Position.BandIndex = 1
  245. Position.ColIndex = 1
  246. Position.RowIndex = 0
  247. end
  248. object ColDoorS: TcxGridBandedColumn
  249. Caption = #46020#50612
  250. PropertiesClassName = 'TcxTextEditProperties'
  251. Properties.Alignment.Horz = taCenter
  252. Properties.Alignment.Vert = taVCenter
  253. OnCustomDrawCell = ColCommSCustomDrawCell
  254. HeaderAlignmentHorz = taCenter
  255. HeaderAlignmentVert = vaCenter
  256. Options.Editing = False
  257. Width = 45
  258. Position.BandIndex = 2
  259. Position.ColIndex = 0
  260. Position.RowIndex = 0
  261. end
  262. object ColFanS: TcxGridBandedColumn
  263. Caption = #54060
  264. PropertiesClassName = 'TcxTextEditProperties'
  265. Properties.Alignment.Horz = taCenter
  266. Properties.Alignment.Vert = taVCenter
  267. OnCustomDrawCell = ColCommSCustomDrawCell
  268. HeaderAlignmentHorz = taCenter
  269. HeaderAlignmentVert = vaCenter
  270. Options.Editing = False
  271. Width = 45
  272. Position.BandIndex = 2
  273. Position.ColIndex = 1
  274. Position.RowIndex = 0
  275. end
  276. object ColHeaterS: TcxGridBandedColumn
  277. Caption = #55176#53552
  278. PropertiesClassName = 'TcxTextEditProperties'
  279. Properties.Alignment.Horz = taCenter
  280. Properties.Alignment.Vert = taVCenter
  281. OnCustomDrawCell = ColCommSCustomDrawCell
  282. HeaderAlignmentHorz = taCenter
  283. HeaderAlignmentVert = vaCenter
  284. Options.Editing = False
  285. Width = 45
  286. Position.BandIndex = 2
  287. Position.ColIndex = 2
  288. Position.RowIndex = 0
  289. end
  290. object ColCamS: TcxGridBandedColumn
  291. Caption = #52852#47700#46972
  292. PropertiesClassName = 'TcxTextEditProperties'
  293. Properties.Alignment.Horz = taCenter
  294. Properties.Alignment.Vert = taVCenter
  295. HeaderAlignmentHorz = taCenter
  296. HeaderAlignmentVert = vaCenter
  297. Options.Editing = False
  298. Width = 63
  299. Position.BandIndex = 3
  300. Position.ColIndex = 0
  301. Position.RowIndex = 0
  302. end
  303. object ColTextS: TcxGridBandedColumn
  304. Caption = #47928#51088
  305. PropertiesClassName = 'TcxTextEditProperties'
  306. Properties.Alignment.Horz = taCenter
  307. Properties.Alignment.Vert = taVCenter
  308. HeaderAlignmentHorz = taCenter
  309. HeaderAlignmentVert = vaCenter
  310. Options.Editing = False
  311. Width = 55
  312. Position.BandIndex = 3
  313. Position.ColIndex = 1
  314. Position.RowIndex = 0
  315. end
  316. object ColFanOn: TcxGridBandedColumn
  317. Caption = 'On'
  318. PropertiesClassName = 'TcxTextEditProperties'
  319. Properties.Alignment.Horz = taRightJustify
  320. Properties.Alignment.Vert = taVCenter
  321. HeaderAlignmentHorz = taCenter
  322. HeaderAlignmentVert = vaCenter
  323. Options.Editing = False
  324. Position.BandIndex = 5
  325. Position.ColIndex = 0
  326. Position.RowIndex = 0
  327. end
  328. object ColFanOff: TcxGridBandedColumn
  329. Caption = 'Off'
  330. PropertiesClassName = 'TcxTextEditProperties'
  331. Properties.Alignment.Horz = taRightJustify
  332. Properties.Alignment.Vert = taVCenter
  333. HeaderAlignmentHorz = taCenter
  334. HeaderAlignmentVert = vaCenter
  335. Options.Editing = False
  336. Position.BandIndex = 5
  337. Position.ColIndex = 1
  338. Position.RowIndex = 0
  339. end
  340. object ColHeaterOff: TcxGridBandedColumn
  341. Caption = 'Off'
  342. PropertiesClassName = 'TcxTextEditProperties'
  343. Properties.Alignment.Horz = taRightJustify
  344. Properties.Alignment.Vert = taVCenter
  345. HeaderAlignmentHorz = taCenter
  346. HeaderAlignmentVert = vaCenter
  347. Options.Editing = False
  348. Position.BandIndex = 6
  349. Position.ColIndex = 1
  350. Position.RowIndex = 0
  351. end
  352. object ColHeaterOn: TcxGridBandedColumn
  353. Caption = 'On'
  354. PropertiesClassName = 'TcxTextEditProperties'
  355. Properties.Alignment.Horz = taRightJustify
  356. Properties.Alignment.Vert = taVCenter
  357. HeaderAlignmentHorz = taCenter
  358. HeaderAlignmentVert = vaCenter
  359. Options.Editing = False
  360. Position.BandIndex = 6
  361. Position.ColIndex = 0
  362. Position.RowIndex = 0
  363. end
  364. object ColBattS: TcxGridBandedColumn
  365. Caption = #48176#53552#47532
  366. PropertiesClassName = 'TcxTextEditProperties'
  367. Properties.Alignment.Horz = taCenter
  368. Properties.Alignment.Vert = taVCenter
  369. HeaderAlignmentHorz = taCenter
  370. HeaderAlignmentVert = vaCenter
  371. Options.Editing = False
  372. Width = 56
  373. Position.BandIndex = 3
  374. Position.ColIndex = 2
  375. Position.RowIndex = 0
  376. end
  377. object ColHamS: TcxGridBandedColumn
  378. Caption = #54632#52404
  379. PropertiesClassName = 'TcxTextEditProperties'
  380. Properties.Alignment.Horz = taCenter
  381. Properties.Alignment.Vert = taVCenter
  382. Visible = False
  383. HeaderAlignmentHorz = taCenter
  384. HeaderAlignmentVert = vaCenter
  385. Options.Editing = False
  386. VisibleForCustomization = False
  387. Width = 222
  388. Position.BandIndex = 1
  389. Position.ColIndex = 2
  390. Position.RowIndex = 0
  391. end
  392. object ColCtrlS: TcxGridBandedColumn
  393. Caption = #51228#50612#44592
  394. PropertiesClassName = 'TcxTextEditProperties'
  395. Properties.Alignment.Horz = taCenter
  396. Properties.Alignment.Vert = taVCenter
  397. Visible = False
  398. HeaderAlignmentHorz = taCenter
  399. HeaderAlignmentVert = vaCenter
  400. Options.Editing = False
  401. VisibleForCustomization = False
  402. Width = 168
  403. Position.BandIndex = 1
  404. Position.ColIndex = 3
  405. Position.RowIndex = 0
  406. end
  407. object ColTemp: TcxGridBandedColumn
  408. Caption = #50728#46020
  409. PropertiesClassName = 'TcxTextEditProperties'
  410. Properties.Alignment.Horz = taRightJustify
  411. Properties.Alignment.Vert = taVCenter
  412. OnCustomDrawCell = ColTempCustomDrawCell
  413. HeaderAlignmentHorz = taCenter
  414. HeaderAlignmentVert = vaCenter
  415. Options.Editing = False
  416. Position.BandIndex = 2
  417. Position.ColIndex = 3
  418. Position.RowIndex = 0
  419. end
  420. object ColVolt: TcxGridBandedColumn
  421. Caption = #51077#47141#51204#50517
  422. PropertiesClassName = 'TcxTextEditProperties'
  423. Properties.Alignment.Horz = taRightJustify
  424. Properties.Alignment.Vert = taVCenter
  425. HeaderAlignmentHorz = taCenter
  426. HeaderAlignmentVert = vaCenter
  427. Options.Editing = False
  428. Width = 60
  429. Position.BandIndex = 4
  430. Position.ColIndex = 0
  431. Position.RowIndex = 0
  432. end
  433. object ColVoltOut: TcxGridBandedColumn
  434. Caption = #52636#47141#51204#50517
  435. PropertiesClassName = 'TcxTextEditProperties'
  436. Properties.Alignment.Horz = taRightJustify
  437. Properties.Alignment.Vert = taVCenter
  438. HeaderAlignmentHorz = taCenter
  439. HeaderAlignmentVert = vaCenter
  440. Width = 60
  441. Position.BandIndex = 4
  442. Position.ColIndex = 1
  443. Position.RowIndex = 0
  444. end
  445. object ColUpdtDt: TcxGridBandedColumn
  446. Caption = #50629#45936#51060#53944' '#49884#44033
  447. PropertiesClassName = 'TcxLabelProperties'
  448. Properties.Alignment.Horz = taCenter
  449. Properties.Alignment.Vert = taVCenter
  450. OnCustomDrawCell = ColUpdtDtCustomDrawCell
  451. HeaderAlignmentHorz = taCenter
  452. HeaderAlignmentVert = vaCenter
  453. Width = 371
  454. Position.BandIndex = 1
  455. Position.ColIndex = 0
  456. Position.RowIndex = 0
  457. end
  458. object ColNmbr: TcxGridBandedColumn
  459. Caption = #48264#54840
  460. DataBinding.ValueType = 'Integer'
  461. PropertiesClassName = 'TcxSpinEditProperties'
  462. Properties.Alignment.Horz = taCenter
  463. Properties.Alignment.Vert = taVCenter
  464. HeaderAlignmentHorz = taCenter
  465. HeaderAlignmentVert = vaCenter
  466. Width = 64
  467. Position.BandIndex = 0
  468. Position.ColIndex = 0
  469. Position.RowIndex = 0
  470. end
  471. object ColTypeNm: TcxGridBandedColumn
  472. Caption = #50976#54805
  473. PropertiesClassName = 'TcxLabelProperties'
  474. Properties.Alignment.Horz = taCenter
  475. Properties.Alignment.Vert = taVCenter
  476. HeaderAlignmentHorz = taCenter
  477. HeaderAlignmentVert = vaCenter
  478. Width = 51
  479. Position.BandIndex = 0
  480. Position.ColIndex = 3
  481. Position.RowIndex = 0
  482. end
  483. end
  484. object GlList: TcxGridLevel
  485. GridView = TvList
  486. end
  487. end
  488. object lblMOS0: TcxLabel
  489. Left = 413
  490. Top = 189
  491. Caption = #51221#49345
  492. Transparent = True
  493. Visible = False
  494. end
  495. object lblMOS1: TcxLabel
  496. Left = 413
  497. Top = 204
  498. Caption = #51109#50528
  499. Transparent = True
  500. Visible = False
  501. end
  502. object lblPWS0: TcxLabel
  503. Left = 413
  504. Top = 220
  505. Caption = #53020#51664
  506. Transparent = True
  507. Visible = False
  508. end
  509. object lblPWS1: TcxLabel
  510. Left = 413
  511. Top = 236
  512. Caption = #44732#51664
  513. Transparent = True
  514. Visible = False
  515. end
  516. object lblCDS0: TcxLabel
  517. Left = 413
  518. Top = 252
  519. Caption = #45803#55192
  520. Transparent = True
  521. Visible = False
  522. end
  523. object lblCDS1: TcxLabel
  524. Left = 413
  525. Top = 268
  526. Caption = #50676#47548
  527. Transparent = True
  528. Visible = False
  529. end
  530. object lblPAS0: TcxLabel
  531. Left = 413
  532. Top = 284
  533. Caption = #44032#46041
  534. Transparent = True
  535. Visible = False
  536. end
  537. object lblPAS1: TcxLabel
  538. Left = 413
  539. Top = 300
  540. Caption = #51473#51648
  541. Transparent = True
  542. Visible = False
  543. end
  544. object lblHTS0: TcxLabel
  545. Left = 413
  546. Top = 316
  547. Caption = #44032#46041
  548. Transparent = True
  549. Visible = False
  550. end
  551. object lblHTS1: TcxLabel
  552. Left = 413
  553. Top = 333
  554. Caption = #51473#51648
  555. Transparent = True
  556. Visible = False
  557. end
  558. object lblUnknown: TcxLabel
  559. Left = 413
  560. Top = 360
  561. Caption = '?'
  562. Transparent = True
  563. Visible = False
  564. end
  565. end
  566. end
  567. end
  568. object TmrShow: TTimer
  569. Enabled = False
  570. Interval = 500
  571. OnTimer = TmrShowTimer
  572. Left = 492
  573. Top = 300
  574. end
  575. end