FrmCctvLogSttsSubF.dfm 17 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561
  1. object FrmCctvLogSttsSub: TFrmCctvLogSttsSub
  2. Tag = 99
  3. Left = 0
  4. Top = 0
  5. HorzScrollBar.Visible = False
  6. VertScrollBar.Visible = False
  7. Align = alClient
  8. BorderStyle = bsNone
  9. Caption = #51060#47141#51312#54924
  10. ClientHeight = 698
  11. ClientWidth = 1149
  12. Color = clBtnFace
  13. DoubleBuffered = True
  14. Font.Charset = DEFAULT_CHARSET
  15. Font.Color = clWindowText
  16. Font.Height = -13
  17. Font.Name = #47569#51008' '#44256#46357
  18. Font.Style = []
  19. KeyPreview = True
  20. OldCreateOrder = False
  21. WindowState = wsMaximized
  22. OnClose = FormClose
  23. OnDestroy = FormDestroy
  24. OnShow = FormShow
  25. PixelsPerInch = 96
  26. TextHeight = 17
  27. object PnlTop: TPanel
  28. Left = 0
  29. Top = 0
  30. Width = 1149
  31. Height = 34
  32. Align = alTop
  33. BevelOuter = bvNone
  34. TabOrder = 0
  35. DesignSize = (
  36. 1149
  37. 34)
  38. object LblSearch: TLabel
  39. Left = 20
  40. Top = 9
  41. Width = 52
  42. Height = 17
  43. Caption = #44160#49353#51312#44148
  44. Transparent = True
  45. end
  46. object ImgDesc01: TImage
  47. Left = 5
  48. Top = 12
  49. Width = 9
  50. Height = 9
  51. Transparent = True
  52. end
  53. object LblRecords: TLabel
  54. Left = 999
  55. Top = 9
  56. Width = 52
  57. Height = 17
  58. Alignment = taRightJustify
  59. Anchors = [akTop, akRight]
  60. Caption = #51312#54924#44148#49688
  61. Transparent = True
  62. ExplicitLeft = 588
  63. end
  64. object BtnExlSave: TcxButton
  65. Left = 1062
  66. Top = 5
  67. Width = 80
  68. Height = 25
  69. Cursor = crHandPoint
  70. Hint = #51312#54924' '#44208#44284' '#45936#51060#53552#47484' '#54028#51068#47196' '#51200#51109#54633#45768#45796'.'
  71. Anchors = [akTop, akRight]
  72. Caption = #51200#51109
  73. Colors.Default = 3893744
  74. TabOrder = 0
  75. Font.Charset = DEFAULT_CHARSET
  76. Font.Color = clWindowText
  77. Font.Height = -13
  78. Font.Name = #47569#51008' '#44256#46357
  79. Font.Style = [fsBold]
  80. ParentFont = False
  81. OnClick = BtnExlSaveClick
  82. end
  83. end
  84. object PnlList: TPanel
  85. Left = 0
  86. Top = 34
  87. Width = 1149
  88. Height = 664
  89. Align = alClient
  90. BevelOuter = bvNone
  91. TabOrder = 1
  92. DesignSize = (
  93. 1149
  94. 664)
  95. object CxList: TcxGrid
  96. Left = 0
  97. Top = 0
  98. Width = 1149
  99. Height = 664
  100. Align = alClient
  101. TabOrder = 1
  102. LookAndFeel.Kind = lfUltraFlat
  103. LookAndFeel.NativeStyle = False
  104. LookAndFeel.SkinName = 'Blue'
  105. object TvList: TcxGridBandedTableView
  106. Navigator.Buttons.First.Visible = True
  107. Navigator.Buttons.PriorPage.Visible = True
  108. Navigator.Buttons.Prior.Visible = True
  109. Navigator.Buttons.Next.Visible = True
  110. Navigator.Buttons.NextPage.Visible = True
  111. Navigator.Buttons.Last.Visible = True
  112. Navigator.Buttons.Insert.Visible = True
  113. Navigator.Buttons.Append.Visible = False
  114. Navigator.Buttons.Delete.Visible = True
  115. Navigator.Buttons.Edit.Visible = True
  116. Navigator.Buttons.Post.Visible = True
  117. Navigator.Buttons.Cancel.Visible = True
  118. Navigator.Buttons.Refresh.Visible = True
  119. Navigator.Buttons.SaveBookmark.Visible = True
  120. Navigator.Buttons.GotoBookmark.Visible = True
  121. Navigator.Buttons.Filter.Visible = True
  122. FilterBox.CustomizeDialog = False
  123. DataController.Summary.DefaultGroupSummaryItems = <>
  124. DataController.Summary.FooterSummaryItems = <>
  125. DataController.Summary.SummaryGroups = <>
  126. OptionsBehavior.CellHints = True
  127. OptionsCustomize.ColumnMoving = False
  128. OptionsCustomize.ColumnVertSizing = False
  129. OptionsData.CancelOnExit = False
  130. OptionsData.Deleting = False
  131. OptionsData.DeletingConfirmation = False
  132. OptionsData.Inserting = False
  133. OptionsSelection.HideFocusRectOnExit = False
  134. OptionsView.GroupByBox = False
  135. OptionsView.Indicator = True
  136. Bands = <
  137. item
  138. Caption = 'CCTV '#51221#48372
  139. Width = 358
  140. end
  141. item
  142. Caption = #53685#49888
  143. Width = 312
  144. end
  145. item
  146. Caption = #51228#50612#44592#49345#53468
  147. Width = 351
  148. end
  149. item
  150. Caption = #51204#50517
  151. Visible = False
  152. VisibleForCustomization = False
  153. end
  154. item
  155. Caption = #51312#52824
  156. Visible = False
  157. end>
  158. object Col01: TcxGridBandedColumn
  159. Caption = 'CCTV ID'
  160. PropertiesClassName = 'TcxTextEditProperties'
  161. Properties.Alignment.Horz = taCenter
  162. Properties.Alignment.Vert = taVCenter
  163. HeaderAlignmentHorz = taCenter
  164. HeaderAlignmentVert = vaCenter
  165. Options.Editing = False
  166. Width = 75
  167. Position.BandIndex = 0
  168. Position.ColIndex = 1
  169. Position.RowIndex = 0
  170. end
  171. object Col02: TcxGridBandedColumn
  172. Caption = 'CCTV '#47749#52845
  173. PropertiesClassName = 'TcxTextEditProperties'
  174. Properties.Alignment.Horz = taLeftJustify
  175. Properties.Alignment.Vert = taVCenter
  176. HeaderAlignmentHorz = taCenter
  177. HeaderAlignmentVert = vaCenter
  178. Options.Editing = False
  179. Width = 110
  180. Position.BandIndex = 0
  181. Position.ColIndex = 2
  182. Position.RowIndex = 0
  183. end
  184. object Col03: TcxGridBandedColumn
  185. Caption = #49688#51665#49884#44033
  186. PropertiesClassName = 'TcxTextEditProperties'
  187. Properties.Alignment.Horz = taCenter
  188. Properties.Alignment.Vert = taVCenter
  189. HeaderAlignmentHorz = taCenter
  190. HeaderAlignmentVert = vaCenter
  191. Options.Editing = False
  192. Width = 235
  193. Position.BandIndex = 1
  194. Position.ColIndex = 0
  195. Position.RowIndex = 0
  196. end
  197. object Col04: TcxGridBandedColumn
  198. Caption = #53685#49888#49345#53468
  199. PropertiesClassName = 'TcxTextEditProperties'
  200. Properties.Alignment.Horz = taCenter
  201. Properties.Alignment.Vert = taVCenter
  202. OnCustomDrawCell = Col05CustomDrawCell
  203. HeaderAlignmentHorz = taCenter
  204. HeaderAlignmentVert = vaCenter
  205. Options.Editing = False
  206. Width = 77
  207. Position.BandIndex = 1
  208. Position.ColIndex = 1
  209. Position.RowIndex = 0
  210. end
  211. object Col05: TcxGridBandedColumn
  212. Caption = #47928#51088#48156#49373#44592
  213. PropertiesClassName = 'TcxTextEditProperties'
  214. Properties.Alignment.Horz = taCenter
  215. Properties.Alignment.Vert = taVCenter
  216. Visible = False
  217. HeaderAlignmentHorz = taCenter
  218. HeaderAlignmentVert = vaCenter
  219. Options.Editing = False
  220. VisibleForCustomization = False
  221. Width = 74
  222. Position.BandIndex = 1
  223. Position.ColIndex = 2
  224. Position.RowIndex = 0
  225. end
  226. object Col06: TcxGridBandedColumn
  227. Caption = #52852#47700#46972
  228. PropertiesClassName = 'TcxTextEditProperties'
  229. Properties.Alignment.Horz = taCenter
  230. Properties.Alignment.Vert = taVCenter
  231. Visible = False
  232. HeaderAlignmentHorz = taCenter
  233. HeaderAlignmentVert = vaCenter
  234. Options.Editing = False
  235. VisibleForCustomization = False
  236. Width = 70
  237. Position.BandIndex = 1
  238. Position.ColIndex = 3
  239. Position.RowIndex = 0
  240. end
  241. object Col07: TcxGridBandedColumn
  242. Caption = #50728#46020#49345#53468
  243. PropertiesClassName = 'TcxTextEditProperties'
  244. Properties.Alignment.Horz = taCenter
  245. Properties.Alignment.Vert = taVCenter
  246. Visible = False
  247. HeaderAlignmentHorz = taCenter
  248. HeaderAlignmentVert = vaCenter
  249. Options.Editing = False
  250. Width = 70
  251. Position.BandIndex = 2
  252. Position.ColIndex = 0
  253. Position.RowIndex = 0
  254. end
  255. object Col08: TcxGridBandedColumn
  256. Caption = #54632#52404#50728#46020
  257. PropertiesClassName = 'TcxTextEditProperties'
  258. Properties.Alignment.Horz = taCenter
  259. Properties.Alignment.Vert = taVCenter
  260. OnCustomDrawCell = Col08CustomDrawCell
  261. HeaderAlignmentHorz = taCenter
  262. HeaderAlignmentVert = vaCenter
  263. Options.Editing = False
  264. Width = 70
  265. Position.BandIndex = 2
  266. Position.ColIndex = 4
  267. Position.RowIndex = 0
  268. end
  269. object Col09: TcxGridBandedColumn
  270. Caption = #55176#53552
  271. PropertiesClassName = 'TcxTextEditProperties'
  272. Properties.Alignment.Horz = taCenter
  273. Properties.Alignment.Vert = taVCenter
  274. OnCustomDrawCell = Col05CustomDrawCell
  275. HeaderAlignmentHorz = taCenter
  276. HeaderAlignmentVert = vaCenter
  277. Options.Editing = False
  278. Width = 70
  279. Position.BandIndex = 2
  280. Position.ColIndex = 3
  281. Position.RowIndex = 0
  282. end
  283. object Col10: TcxGridBandedColumn
  284. Caption = #55176#53552#46041#51089
  285. PropertiesClassName = 'TcxTextEditProperties'
  286. Properties.Alignment.Horz = taCenter
  287. Properties.Alignment.Vert = taVCenter
  288. Visible = False
  289. HeaderAlignmentHorz = taCenter
  290. HeaderAlignmentVert = vaCenter
  291. Options.Editing = False
  292. VisibleForCustomization = False
  293. Width = 70
  294. Position.BandIndex = 1
  295. Position.ColIndex = 4
  296. Position.RowIndex = 0
  297. end
  298. object Col11: TcxGridBandedColumn
  299. Caption = #54060
  300. PropertiesClassName = 'TcxTextEditProperties'
  301. Properties.Alignment.Horz = taCenter
  302. Properties.Alignment.Vert = taVCenter
  303. OnCustomDrawCell = Col05CustomDrawCell
  304. HeaderAlignmentHorz = taCenter
  305. HeaderAlignmentVert = vaCenter
  306. Options.Editing = False
  307. Width = 70
  308. Position.BandIndex = 2
  309. Position.ColIndex = 2
  310. Position.RowIndex = 0
  311. end
  312. object Col12: TcxGridBandedColumn
  313. Caption = #54060#46041#51089
  314. PropertiesClassName = 'TcxTextEditProperties'
  315. Properties.Alignment.Horz = taCenter
  316. Properties.Alignment.Vert = taVCenter
  317. Visible = False
  318. HeaderAlignmentHorz = taCenter
  319. HeaderAlignmentVert = vaCenter
  320. Options.Editing = False
  321. VisibleForCustomization = False
  322. Width = 70
  323. Position.BandIndex = 1
  324. Position.ColIndex = 5
  325. Position.RowIndex = 0
  326. end
  327. object Col13: TcxGridBandedColumn
  328. Caption = #47928#50676#47548
  329. PropertiesClassName = 'TcxTextEditProperties'
  330. Properties.Alignment.Horz = taCenter
  331. Properties.Alignment.Vert = taVCenter
  332. OnCustomDrawCell = Col05CustomDrawCell
  333. HeaderAlignmentHorz = taCenter
  334. HeaderAlignmentVert = vaCenter
  335. Options.Editing = False
  336. Width = 70
  337. Position.BandIndex = 2
  338. Position.ColIndex = 1
  339. Position.RowIndex = 0
  340. end
  341. object Col14: TcxGridBandedColumn
  342. Caption = #51204#50517#49345#53468
  343. PropertiesClassName = 'TcxTextEditProperties'
  344. Properties.Alignment.Horz = taCenter
  345. Properties.Alignment.Vert = taVCenter
  346. HeaderAlignmentHorz = taCenter
  347. HeaderAlignmentVert = vaCenter
  348. Options.Editing = False
  349. Width = 70
  350. Position.BandIndex = 3
  351. Position.ColIndex = 0
  352. Position.RowIndex = 0
  353. end
  354. object Col15: TcxGridBandedColumn
  355. Caption = #51077#47141#51204#50517
  356. PropertiesClassName = 'TcxTextEditProperties'
  357. Properties.Alignment.Horz = taRightJustify
  358. Properties.Alignment.Vert = taVCenter
  359. HeaderAlignmentHorz = taCenter
  360. HeaderAlignmentVert = vaCenter
  361. Options.Editing = False
  362. Width = 70
  363. Position.BandIndex = 3
  364. Position.ColIndex = 1
  365. Position.RowIndex = 0
  366. end
  367. object Col16: TcxGridBandedColumn
  368. Caption = #51312#52824#50668#48512
  369. PropertiesClassName = 'TcxTextEditProperties'
  370. Properties.Alignment.Horz = taCenter
  371. Properties.Alignment.Vert = taVCenter
  372. HeaderAlignmentHorz = taCenter
  373. HeaderAlignmentVert = vaCenter
  374. Options.Editing = False
  375. Width = 70
  376. Position.BandIndex = 4
  377. Position.ColIndex = 0
  378. Position.RowIndex = 0
  379. end
  380. object Col17: TcxGridBandedColumn
  381. Caption = #51312#52824#45236#50857
  382. PropertiesClassName = 'TcxTextEditProperties'
  383. Properties.Alignment.Horz = taCenter
  384. Properties.Alignment.Vert = taVCenter
  385. HeaderAlignmentHorz = taCenter
  386. HeaderAlignmentVert = vaCenter
  387. Options.Editing = False
  388. Width = 70
  389. Position.BandIndex = 4
  390. Position.ColIndex = 1
  391. Position.RowIndex = 0
  392. end
  393. object Col18: TcxGridBandedColumn
  394. Caption = #52636#47141#51204#50517
  395. PropertiesClassName = 'TcxTextEditProperties'
  396. Properties.Alignment.Horz = taRightJustify
  397. Properties.Alignment.Vert = taVCenter
  398. HeaderAlignmentHorz = taCenter
  399. HeaderAlignmentVert = vaCenter
  400. Position.BandIndex = 3
  401. Position.ColIndex = 2
  402. Position.RowIndex = 0
  403. end
  404. object Col00: TcxGridBandedColumn
  405. Caption = #48264#54840
  406. PropertiesClassName = 'TcxTextEditProperties'
  407. Properties.Alignment.Horz = taCenter
  408. Properties.Alignment.Vert = taVCenter
  409. HeaderAlignmentHorz = taCenter
  410. HeaderAlignmentVert = vaBottom
  411. Position.BandIndex = 0
  412. Position.ColIndex = 0
  413. Position.RowIndex = 0
  414. end
  415. end
  416. object GlList: TcxGridLevel
  417. GridView = TvList
  418. end
  419. end
  420. object ChkExpand: TcxCheckBox
  421. Tag = 9
  422. Left = 1035
  423. Top = 7
  424. Cursor = crHandPoint
  425. Hint = #44536#47353' '#47785#47197' '#54869#51109' '#46608#45716' '#52712#49548
  426. Anchors = [akTop, akRight]
  427. Caption = #54869#51109'/'#52629#49548
  428. ParentBackground = False
  429. ParentColor = False
  430. ParentShowHint = False
  431. ShowHint = True
  432. State = cbsChecked
  433. Style.BorderColor = 9868950
  434. Style.BorderStyle = ebsThick
  435. Style.Color = 14671839
  436. Style.Shadow = False
  437. TabOrder = 0
  438. Transparent = True
  439. Visible = False
  440. OnClick = ChkExpandClick
  441. Width = 85
  442. end
  443. end
  444. object lblText1: TcxLabel
  445. Left = 141
  446. Top = 349
  447. Caption = #51312#54924#44208#44284#44032' '#50630#49845#45768#45796'.'
  448. Transparent = True
  449. Visible = False
  450. end
  451. object lblText2: TcxLabel
  452. Left = 141
  453. Top = 376
  454. Caption = #44160#49353#44592#44036': '
  455. Transparent = True
  456. Visible = False
  457. end
  458. object lblSucc: TcxLabel
  459. Left = 141
  460. Top = 403
  461. Caption = #49457#44277
  462. Transparent = True
  463. Visible = False
  464. end
  465. object lblFai: TcxLabel
  466. Left = 141
  467. Top = 430
  468. Caption = #49892#54056
  469. Transparent = True
  470. Visible = False
  471. end
  472. object lblCnt: TcxLabel
  473. Left = 141
  474. Top = 457
  475. Caption = ' '#44148
  476. Transparent = True
  477. Visible = False
  478. end
  479. object lblMOS0: TcxLabel
  480. Left = 413
  481. Top = 189
  482. Caption = #51221#49345
  483. Transparent = True
  484. Visible = False
  485. end
  486. object lblMOS1: TcxLabel
  487. Left = 413
  488. Top = 204
  489. Caption = #51109#50528
  490. Transparent = True
  491. Visible = False
  492. end
  493. object lblPWS0: TcxLabel
  494. Left = 413
  495. Top = 220
  496. Caption = #53020#51664
  497. Transparent = True
  498. Visible = False
  499. end
  500. object lblPWS1: TcxLabel
  501. Left = 413
  502. Top = 236
  503. Caption = #44732#51664
  504. Transparent = True
  505. Visible = False
  506. end
  507. object lblCDS0: TcxLabel
  508. Left = 413
  509. Top = 252
  510. Caption = #45803#55192
  511. Transparent = True
  512. Visible = False
  513. end
  514. object lblCDS1: TcxLabel
  515. Left = 413
  516. Top = 268
  517. Caption = #50676#47548
  518. Transparent = True
  519. Visible = False
  520. end
  521. object lblPAS0: TcxLabel
  522. Left = 413
  523. Top = 284
  524. Caption = #46041#51089
  525. Transparent = True
  526. Visible = False
  527. end
  528. object lblPAS1: TcxLabel
  529. Left = 413
  530. Top = 300
  531. Caption = #51221#51648
  532. Transparent = True
  533. Visible = False
  534. end
  535. object lblHTS0: TcxLabel
  536. Left = 413
  537. Top = 316
  538. Caption = #44032#46041
  539. Transparent = True
  540. Visible = False
  541. end
  542. object lblHTS1: TcxLabel
  543. Left = 413
  544. Top = 333
  545. Caption = #51473#51648
  546. Transparent = True
  547. Visible = False
  548. end
  549. object ADOQry: TADOQuery
  550. Parameters = <>
  551. Left = 240
  552. Top = 148
  553. end
  554. object TmrShow: TTimer
  555. Enabled = False
  556. Interval = 300
  557. OnTimer = TmrShowTimer
  558. Left = 320
  559. Top = 156
  560. end
  561. end