IHS00401F.dfm 11 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352
  1. object IHS00401: TIHS00401
  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 = 'CCTV '#51109#50528#51060#47141
  10. ClientHeight = 698
  11. ClientWidth = 1089
  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. ExplicitWidth = 320
  26. ExplicitHeight = 240
  27. PixelsPerInch = 96
  28. TextHeight = 17
  29. object PnlTop: TPanel
  30. Left = 0
  31. Top = 0
  32. Width = 1089
  33. Height = 34
  34. Align = alTop
  35. BevelOuter = bvNone
  36. TabOrder = 0
  37. DesignSize = (
  38. 1089
  39. 34)
  40. object LblSearch: TLabel
  41. Left = 20
  42. Top = 9
  43. Width = 52
  44. Height = 17
  45. Caption = #44160#49353#51312#44148
  46. Transparent = True
  47. end
  48. object ImgDesc01: TImage
  49. Left = 5
  50. Top = 12
  51. Width = 9
  52. Height = 9
  53. Transparent = True
  54. end
  55. object LblRecords: TLabel
  56. Left = 939
  57. Top = 9
  58. Width = 52
  59. Height = 17
  60. Alignment = taRightJustify
  61. Anchors = [akTop, akRight]
  62. Caption = #51312#54924#44148#49688
  63. Transparent = True
  64. ExplicitLeft = 588
  65. end
  66. object BtnExlSave: TcxButton
  67. Left = 1007
  68. Top = 5
  69. Width = 75
  70. Height = 25
  71. Cursor = crHandPoint
  72. Hint = #51312#54924' '#44208#44284' '#45936#51060#53552#47484' '#54028#51068#47196' '#51200#51109#54633#45768#45796'.'
  73. Anchors = [akTop, akRight]
  74. Caption = #51200#51109
  75. Colors.Default = 3893744
  76. TabOrder = 0
  77. Font.Charset = DEFAULT_CHARSET
  78. Font.Color = clWindowText
  79. Font.Height = -13
  80. Font.Name = #47569#51008' '#44256#46357
  81. Font.Style = [fsBold]
  82. ParentFont = False
  83. OnClick = BtnExlSaveClick
  84. end
  85. end
  86. object PnlList: TPanel
  87. Left = 0
  88. Top = 34
  89. Width = 1089
  90. Height = 372
  91. Align = alClient
  92. BevelOuter = bvNone
  93. TabOrder = 1
  94. DesignSize = (
  95. 1089
  96. 372)
  97. object CxList: TcxGrid
  98. Left = 0
  99. Top = 0
  100. Width = 1089
  101. Height = 372
  102. Align = alClient
  103. TabOrder = 1
  104. object TvList: TcxGridTableView
  105. Navigator.Buttons.Append.Visible = True
  106. Navigator.Buttons.SaveBookmark.Visible = False
  107. Navigator.InfoPanel.Visible = True
  108. DataController.Summary.DefaultGroupSummaryItems = <>
  109. DataController.Summary.FooterSummaryItems = <>
  110. DataController.Summary.SummaryGroups = <>
  111. FilterRow.InfoText = #44160#49353#50612#47484' '#51077#47141#54616#49464#50836'.'
  112. OptionsBehavior.CellHints = True
  113. OptionsBehavior.ShowLockedStateImageOptions.BestFit = lsimImmediate
  114. OptionsBehavior.ShowLockedStateImageOptions.Filtering = lsimImmediate
  115. OptionsBehavior.ShowLockedStateImageOptions.Grouping = lsimImmediate
  116. OptionsBehavior.ShowLockedStateImageOptions.Sorting = lsimImmediate
  117. OptionsData.Deleting = False
  118. OptionsData.DeletingConfirmation = False
  119. OptionsData.Editing = False
  120. OptionsData.Inserting = False
  121. OptionsView.Indicator = True
  122. object Column01: TcxGridColumn
  123. Caption = #44032#44277#51068#49884
  124. PropertiesClassName = 'TcxTextEditProperties'
  125. Properties.Alignment.Horz = taCenter
  126. Properties.Alignment.Vert = taVCenter
  127. HeaderAlignmentHorz = taCenter
  128. HeaderAlignmentVert = vaCenter
  129. Options.Editing = False
  130. Width = 162
  131. end
  132. object Column02: TcxGridColumn
  133. Caption = #47553#53356
  134. PropertiesClassName = 'TcxTextEditProperties'
  135. Properties.Alignment.Horz = taCenter
  136. Properties.Alignment.Vert = taVCenter
  137. Properties.MaxLength = 0
  138. Properties.PasswordChar = '*'
  139. HeaderAlignmentHorz = taCenter
  140. HeaderAlignmentVert = vaCenter
  141. Options.Editing = False
  142. Width = 129
  143. end
  144. object Column03: TcxGridColumn
  145. Caption = #49549#46020
  146. DataBinding.ValueType = 'Integer'
  147. PropertiesClassName = 'TcxCalcEditProperties'
  148. Properties.Alignment.Horz = taRightJustify
  149. Properties.Alignment.Vert = taVCenter
  150. HeaderAlignmentHorz = taCenter
  151. HeaderAlignmentVert = vaCenter
  152. Options.Editing = False
  153. Width = 65
  154. end
  155. object Column04: TcxGridColumn
  156. Caption = #49548#53685#46321#44553
  157. PropertiesClassName = 'TcxTextEditProperties'
  158. Properties.Alignment.Horz = taCenter
  159. Properties.Alignment.Vert = taVCenter
  160. HeaderAlignmentHorz = taCenter
  161. HeaderAlignmentVert = vaCenter
  162. Options.Editing = False
  163. Width = 95
  164. end
  165. object Column05: TcxGridColumn
  166. Caption = #44208#52769#50668#48512
  167. PropertiesClassName = 'TcxTextEditProperties'
  168. Properties.Alignment.Horz = taCenter
  169. Properties.Alignment.Vert = taVCenter
  170. HeaderAlignmentHorz = taCenter
  171. HeaderAlignmentVert = vaCenter
  172. end
  173. object Column06: TcxGridColumn
  174. Caption = #44032#44277#49549#46020
  175. DataBinding.ValueType = 'Integer'
  176. PropertiesClassName = 'TcxCalcEditProperties'
  177. Properties.Alignment.Horz = taRightJustify
  178. Properties.Alignment.Vert = taVCenter
  179. HeaderAlignmentHorz = taCenter
  180. HeaderAlignmentVert = vaCenter
  181. Width = 77
  182. end
  183. object Column07: TcxGridColumn
  184. Caption = #54217#54876#54868#49549#46020
  185. DataBinding.ValueType = 'Integer'
  186. PropertiesClassName = 'TcxCalcEditProperties'
  187. Properties.Alignment.Horz = taRightJustify
  188. Properties.Alignment.Vert = taVCenter
  189. HeaderAlignmentHorz = taCenter
  190. HeaderAlignmentVert = vaCenter
  191. Width = 82
  192. end
  193. object Column08: TcxGridColumn
  194. Caption = #48372#51221#49549#46020
  195. DataBinding.ValueType = 'Integer'
  196. PropertiesClassName = 'TcxCalcEditProperties'
  197. Properties.Alignment.Horz = taRightJustify
  198. Properties.Alignment.Vert = taVCenter
  199. HeaderAlignmentHorz = taCenter
  200. HeaderAlignmentVert = vaCenter
  201. end
  202. object Column09: TcxGridColumn
  203. Caption = #54056#53556#49549#46020
  204. DataBinding.ValueType = 'Integer'
  205. PropertiesClassName = 'TcxCalcEditProperties'
  206. Properties.Alignment.Horz = taRightJustify
  207. Properties.Alignment.Vert = taVCenter
  208. HeaderAlignmentHorz = taCenter
  209. HeaderAlignmentVert = vaCenter
  210. end
  211. object Column10: TcxGridColumn
  212. Caption = #49688#51665#50896
  213. PropertiesClassName = 'TcxTextEditProperties'
  214. Properties.Alignment.Horz = taCenter
  215. Properties.Alignment.Vert = taVCenter
  216. HeaderAlignmentHorz = taCenter
  217. HeaderAlignmentVert = vaCenter
  218. end
  219. object Column11: TcxGridColumn
  220. Caption = #48372#51221#49548#49828
  221. PropertiesClassName = 'TcxTextEditProperties'
  222. Properties.Alignment.Horz = taCenter
  223. Properties.Alignment.Vert = taVCenter
  224. HeaderAlignmentHorz = taCenter
  225. HeaderAlignmentVert = vaCenter
  226. end
  227. object Column12: TcxGridColumn
  228. Caption = #45936#51060#53552#44079#49688
  229. DataBinding.ValueType = 'Integer'
  230. PropertiesClassName = 'TcxCalcEditProperties'
  231. Properties.Alignment.Horz = taRightJustify
  232. Properties.Alignment.Vert = taVCenter
  233. HeaderAlignmentHorz = taCenter
  234. HeaderAlignmentVert = vaCenter
  235. Width = 83
  236. end
  237. object Column13: TcxGridColumn
  238. Caption = #44368#53685#47049
  239. DataBinding.ValueType = 'Integer'
  240. PropertiesClassName = 'TcxCalcEditProperties'
  241. Properties.Alignment.Horz = taRightJustify
  242. Properties.Alignment.Vert = taVCenter
  243. Visible = False
  244. HeaderAlignmentHorz = taCenter
  245. HeaderAlignmentVert = vaCenter
  246. end
  247. object Column14: TcxGridColumn
  248. Caption = #51216#50976#50984
  249. DataBinding.ValueType = 'Float'
  250. PropertiesClassName = 'TcxCalcEditProperties'
  251. Properties.Alignment.Horz = taRightJustify
  252. Properties.Alignment.Vert = taVCenter
  253. Properties.DisplayFormat = '#0.#0'
  254. Visible = False
  255. HeaderAlignmentHorz = taCenter
  256. HeaderAlignmentVert = vaCenter
  257. end
  258. object Column15: TcxGridColumn
  259. Caption = #53685#54665#49884#44036
  260. DataBinding.ValueType = 'Integer'
  261. PropertiesClassName = 'TcxCalcEditProperties'
  262. Properties.Alignment.Horz = taRightJustify
  263. Properties.Alignment.Vert = taVCenter
  264. Visible = False
  265. HeaderAlignmentHorz = taCenter
  266. HeaderAlignmentVert = vaCenter
  267. end
  268. end
  269. object GlList: TcxGridLevel
  270. GridView = TvList
  271. end
  272. end
  273. object ChkExpand: TcxCheckBox
  274. Tag = 9
  275. Left = 975
  276. Top = 7
  277. Cursor = crHandPoint
  278. Hint = #44536#47353' '#47785#47197' '#54869#51109' '#46608#45716' '#52712#49548
  279. Anchors = [akTop, akRight]
  280. Caption = #54869#51109'/'#52629#49548
  281. ParentBackground = False
  282. ParentColor = False
  283. ParentShowHint = False
  284. ShowHint = True
  285. State = cbsChecked
  286. Style.BorderColor = 9868950
  287. Style.BorderStyle = ebsThick
  288. Style.Color = 14671839
  289. Style.Shadow = False
  290. TabOrder = 0
  291. Transparent = True
  292. OnClick = ChkExpandClick
  293. Width = 85
  294. end
  295. end
  296. object PnlChart: TPanel
  297. Left = 0
  298. Top = 412
  299. Width = 1089
  300. Height = 286
  301. Align = alBottom
  302. BevelOuter = bvNone
  303. TabOrder = 2
  304. inline FRAMEChart1: TFRAMEChart
  305. Left = 0
  306. Top = 0
  307. Width = 1089
  308. Height = 286
  309. Align = alClient
  310. TabOrder = 0
  311. ExplicitWidth = 1089
  312. ExplicitHeight = 286
  313. inherited CxChart: TcxGrid
  314. Width = 1089
  315. Height = 286
  316. ExplicitWidth = 1089
  317. ExplicitHeight = 286
  318. end
  319. inherited ChkDisplayVal: TcxCheckBox
  320. ExplicitHeight = 21
  321. end
  322. inherited cxLabel2: TcxLabel
  323. ExplicitWidth = 30
  324. ExplicitHeight = 21
  325. end
  326. inherited LblPage: TcxLabel
  327. ExplicitWidth = 18
  328. ExplicitHeight = 21
  329. end
  330. end
  331. end
  332. object cxSplitter1: TcxSplitter
  333. Left = 0
  334. Top = 406
  335. Width = 1089
  336. Height = 6
  337. AlignSplitter = salBottom
  338. Control = PnlChart
  339. end
  340. object ADOQry: TADOQuery
  341. Parameters = <>
  342. Left = 240
  343. Top = 148
  344. end
  345. object TmrShow: TTimer
  346. Enabled = False
  347. Interval = 300
  348. OnTimer = TmrShowTimer
  349. Left = 320
  350. Top = 156
  351. end
  352. end