DSRH0701F.dfm 10 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328
  1. object DSRH0701: TDSRH0701
  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 BtClose: TSpeedButton
  67. Left = 773
  68. Top = 14
  69. Width = 16
  70. Height = 16
  71. Cursor = crHandPoint
  72. Hint = #53485#45803#44592
  73. Anchors = [akTop, akRight]
  74. Flat = True
  75. Font.Charset = ANSI_CHARSET
  76. Font.Color = clBlack
  77. Font.Height = -12
  78. Font.Name = #46027#50880
  79. Font.Style = [fsBold]
  80. Glyph.Data = {
  81. 36040000424D3604000000000000360000002800000010000000100000000100
  82. 20000000000000040000C40E0000C40E00000000000000000000FFFFFF00FFFF
  83. FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
  84. FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FBE7D4E6DBC8
  85. BEE6A598A9E69D8FA5E6A090A8E69F91A8E6A093A8E6A094A9E6A394ACE6A396
  86. ACE6A497AFE6A598B1E6AA9DB3E6D0C0C0E6FAE6D3D9FFFFFF00DBC8BDE6413D
  87. 7FE6061182E60A198FE6101B93E60F1C95E6101D96E6111E96E6101D96E6101D
  88. 95E60E1C95E60C1B95E6091590E6272A89E6BCABB7D7FFFFFF00AD9EA1E60008
  89. 8CE60018B9E6001BC1E60019C6E60019C6E6001EC7E6001FC8E6001FC8E6001E
  90. CAE6001FCCE60625CEE60B28D2E60011B3E6766C9DD6FFFFFF00A2949EE60009
  91. 9AE6001BBFE60524C6E61B35C7E61934C3E60020CAE60020CCE60020D0E6102D
  92. C8E61F3AC8E61331D4E61333DFE6041FCCE66C65A3D6FFFFFF00A5969EE6000A
  93. 99E60019BFE61635D0E6BEC8FFE6CDD8FFE6435AD5E6001ACDE61A37CEE6A9B5
  94. F3E6D8E0FFE6455CE1E61234E5E60B27D5E6706BA9D6FFFFFF00A9979EE6000A
  95. 98E60019C0E61331D1E6D6DDFFE6FFFFFFE6DFE7FFE64B60D3E6A7B3EFE6FFFF
  96. FFE6FFFFFFE6485EE0E61A3CEBE61330DDE6726FADD6FFFFFF00AA99A0E6000A
  97. 99E6001DC6E60020CBE63E58D4E6DCE4FFE6FFFFFFE6FEFFFFE6FFFFFFE6FAFC
  98. FFE67481D4E6213ED8E63150F4E61E39E1E67872B2D6FFFFFF00AC9AA2E6000B
  99. 9AE6001EC8E60024D2E6001BD1E64D5EC7E6FFFFFFE6FFFFFFE6FFFFFFE6999E
  100. D3E62F47D5E6526FFFE65B76FFE63C54EEE67C77B5D6FFFFFF00AF9DA3E6000B
  101. 9DE6021FCCE60525D3E61C34CBE6A3ADEAE6FFFFFFE6FFFFFFE6FFFFFFE6D8DA
  102. F0E65D6ACCE6596EEFE6728AFFE6536BF5E6837CB8D6FFFFFF00B2A0A5E6000E
  103. A0E60421CEE6122BD4E6A7AEE9E6FFFFFFE6FFFBFFE69398D1E6DAD7EEE6FFFF
  104. FFE6DEDAE7E65D6AD4E67189FFE65B71FBE68881B9D6FFFFFF00B4A2A8E60010
  105. A4E60524D5E61D37D4E6D8DAFDE6FCFBFFE67A82CDE62B42D1E65461C6E6DAD5
  106. E8E6F9F2F7E6717BD3E6728BFFE66A80FDE68E89B9D6FFFFFF00B6A7ADE60213
  107. ABE60C2ADAE61C39DCE65163D4E65967D2E6394FDEE64F6DFFE64B62F2E65A64
  108. CEE66F78D1E65E6FDEE68096FFE6798DFCE6968FB9D6FFFFFF00BDAFB8E60414
  109. ABE61130DDE62647ECE63250F1E63B59F3E64D68FFE65772FFE6647EFFE66782
  110. FFE66E86FFE68096FFE68A9FFFE6889AFCE69D98C1D6FFFFFF00E1D0D1E63138
  111. A3E61329BDE6334CD5E6495EDEE6586DE1E66679E2E67283E2E67F8DE4E68B99
  112. E4E695A2E5E69FAAE5E6A8B1E8E68993E5E6BEB8DCDBFFFFFF00F9E8E0E5C8BB
  113. CDE58381C0E57E7BC4E58580C9E58A89CBE5908FCEE58B8AD0D68E8DD1D68F8E
  114. D3D69090D4D69193D6D69496D7D6C0BBDDD6FDECE5C6FFFFFF00}
  115. ParentFont = False
  116. ParentShowHint = False
  117. ShowHint = True
  118. Visible = False
  119. ExplicitLeft = 422
  120. end
  121. object BtnExlSave: TcxButton
  122. Left = 1007
  123. Top = 5
  124. Width = 75
  125. Height = 25
  126. Cursor = crHandPoint
  127. Hint = #51312#54924' '#44208#44284' '#45936#51060#53552#47484' '#54028#51068#47196' '#51200#51109#54633#45768#45796'.'
  128. Anchors = [akTop, akRight]
  129. Caption = #51200#51109
  130. Colors.Default = 3893744
  131. TabOrder = 0
  132. Font.Charset = DEFAULT_CHARSET
  133. Font.Color = clWindowText
  134. Font.Height = -13
  135. Font.Name = #47569#51008' '#44256#46357
  136. Font.Style = [fsBold]
  137. ParentFont = False
  138. OnClick = BtnExlSaveClick
  139. end
  140. end
  141. object PnlList: TPanel
  142. Left = 0
  143. Top = 34
  144. Width = 1089
  145. Height = 372
  146. Align = alClient
  147. BevelOuter = bvNone
  148. TabOrder = 1
  149. DesignSize = (
  150. 1089
  151. 372)
  152. object CxList: TcxGrid
  153. Left = 0
  154. Top = 0
  155. Width = 1089
  156. Height = 372
  157. Align = alClient
  158. TabOrder = 1
  159. object TvList: TcxGridTableView
  160. Navigator.Buttons.Append.Visible = True
  161. Navigator.Buttons.SaveBookmark.Visible = False
  162. Navigator.InfoPanel.Visible = True
  163. DataController.Summary.DefaultGroupSummaryItems = <>
  164. DataController.Summary.FooterSummaryItems = <>
  165. DataController.Summary.SummaryGroups = <>
  166. FilterRow.InfoText = #44160#49353#50612#47484' '#51077#47141#54616#49464#50836'.'
  167. OptionsBehavior.CellHints = True
  168. OptionsBehavior.ShowLockedStateImageOptions.BestFit = lsimImmediate
  169. OptionsBehavior.ShowLockedStateImageOptions.Filtering = lsimImmediate
  170. OptionsBehavior.ShowLockedStateImageOptions.Grouping = lsimImmediate
  171. OptionsBehavior.ShowLockedStateImageOptions.Sorting = lsimImmediate
  172. OptionsData.Deleting = False
  173. OptionsData.DeletingConfirmation = False
  174. OptionsData.Editing = False
  175. OptionsData.Inserting = False
  176. OptionsView.Indicator = True
  177. object Column01: TcxGridColumn
  178. Caption = 'ID'
  179. PropertiesClassName = 'TcxLabelProperties'
  180. Properties.Alignment.Horz = taCenter
  181. Properties.Alignment.Vert = taVCenter
  182. HeaderAlignmentHorz = taCenter
  183. HeaderAlignmentVert = vaCenter
  184. Options.Editing = False
  185. Width = 66
  186. end
  187. object Column02: TcxGridColumn
  188. Caption = 'RSE ID'
  189. PropertiesClassName = 'TcxLabelProperties'
  190. Properties.Alignment.Vert = taVCenter
  191. HeaderAlignmentHorz = taCenter
  192. HeaderAlignmentVert = vaCenter
  193. Options.Editing = False
  194. Width = 151
  195. end
  196. object Column03: TcxGridColumn
  197. Caption = #47749#52845
  198. PropertiesClassName = 'TcxLabelProperties'
  199. Properties.Alignment.Vert = taVCenter
  200. HeaderAlignmentHorz = taCenter
  201. HeaderAlignmentVert = vaCenter
  202. Width = 178
  203. end
  204. object Column04: TcxGridColumn
  205. Caption = #53685#44228' '#49884#44033
  206. PropertiesClassName = 'TcxLabelProperties'
  207. Properties.Alignment.Horz = taCenter
  208. Properties.Alignment.Vert = taVCenter
  209. HeaderAlignmentHorz = taCenter
  210. HeaderAlignmentVert = vaCenter
  211. Width = 159
  212. end
  213. object Column05: TcxGridColumn
  214. Caption = #50836#51068#50976#54805
  215. PropertiesClassName = 'TcxLabelProperties'
  216. Properties.Alignment.Horz = taCenter
  217. Properties.Alignment.Vert = taVCenter
  218. HeaderAlignmentHorz = taCenter
  219. HeaderAlignmentVert = vaCenter
  220. Width = 127
  221. end
  222. object Column06: TcxGridColumn
  223. Caption = #49688#51665#44060#49688
  224. DataBinding.ValueType = 'Integer'
  225. PropertiesClassName = 'TcxCalcEditProperties'
  226. Properties.Alignment.Horz = taRightJustify
  227. Properties.Alignment.Vert = taVCenter
  228. HeaderAlignmentHorz = taCenter
  229. HeaderAlignmentVert = vaCenter
  230. Width = 123
  231. end
  232. object Column07: TcxGridColumn
  233. Caption = #51221#48372#50630#51020
  234. DataBinding.ValueType = 'Integer'
  235. PropertiesClassName = 'TcxCalcEditProperties'
  236. Properties.Alignment.Horz = taRightJustify
  237. Properties.Alignment.Vert = taVCenter
  238. Visible = False
  239. HeaderAlignmentHorz = taCenter
  240. HeaderAlignmentVert = vaCenter
  241. VisibleForCustomization = False
  242. Width = 83
  243. end
  244. end
  245. object GlList: TcxGridLevel
  246. GridView = TvList
  247. end
  248. end
  249. object ChkExpand: TcxCheckBox
  250. Tag = 9
  251. Left = 975
  252. Top = 7
  253. Cursor = crHandPoint
  254. Hint = #44536#47353' '#47785#47197' '#54869#51109' '#46608#45716' '#52712#49548
  255. Anchors = [akTop, akRight]
  256. Caption = #54869#51109'/'#52629#49548
  257. ParentBackground = False
  258. ParentColor = False
  259. ParentShowHint = False
  260. ShowHint = True
  261. State = cbsChecked
  262. Style.BorderColor = 9868950
  263. Style.BorderStyle = ebsThick
  264. Style.Color = 14671839
  265. Style.Shadow = False
  266. TabOrder = 0
  267. Transparent = True
  268. OnClick = ChkExpandClick
  269. Width = 85
  270. end
  271. end
  272. object PnlChart: TPanel
  273. Left = 0
  274. Top = 412
  275. Width = 1089
  276. Height = 286
  277. Align = alBottom
  278. BevelOuter = bvNone
  279. TabOrder = 2
  280. inline FRAMEChart1: TFRAMEChart
  281. Left = 0
  282. Top = 0
  283. Width = 1089
  284. Height = 286
  285. Align = alClient
  286. TabOrder = 0
  287. ExplicitWidth = 1089
  288. ExplicitHeight = 286
  289. inherited CxChart: TcxGrid
  290. Width = 1089
  291. Height = 286
  292. ExplicitWidth = 1089
  293. ExplicitHeight = 286
  294. end
  295. inherited ChkDisplayVal: TcxCheckBox
  296. ExplicitHeight = 21
  297. end
  298. inherited cxLabel2: TcxLabel
  299. ExplicitWidth = 30
  300. ExplicitHeight = 21
  301. end
  302. inherited LblPage: TcxLabel
  303. ExplicitWidth = 18
  304. ExplicitHeight = 21
  305. end
  306. end
  307. end
  308. object cxSplitter1: TcxSplitter
  309. Left = 0
  310. Top = 406
  311. Width = 1089
  312. Height = 6
  313. AlignSplitter = salBottom
  314. Control = PnlChart
  315. end
  316. object ADOQry: TADOQuery
  317. Parameters = <>
  318. Left = 240
  319. Top = 148
  320. end
  321. object TmrShow: TTimer
  322. Enabled = False
  323. Interval = 300
  324. OnTimer = TmrShowTimer
  325. Left = 320
  326. Top = 156
  327. end
  328. end