IHS0020MF.dfm 9.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360
  1. object IHS0020M: TIHS0020M
  2. Left = 0
  3. Top = 0
  4. HorzScrollBar.Visible = False
  5. VertScrollBar.Visible = False
  6. Caption = #54532#47196#49464#49828' '#49345#53468#51060#47141
  7. ClientHeight = 839
  8. ClientWidth = 1053
  9. Color = clBtnFace
  10. DoubleBuffered = True
  11. Font.Charset = DEFAULT_CHARSET
  12. Font.Color = clWindowText
  13. Font.Height = -13
  14. Font.Name = #47569#51008' '#44256#46357
  15. Font.Style = []
  16. KeyPreview = True
  17. OldCreateOrder = False
  18. Position = poOwnerFormCenter
  19. ShowHint = True
  20. OnClose = FormClose
  21. OnShow = FormShow
  22. DesignSize = (
  23. 1053
  24. 839)
  25. PixelsPerInch = 96
  26. TextHeight = 17
  27. object ShpTitle: TShape
  28. Left = 4
  29. Top = 4
  30. Width = 1045
  31. Height = 40
  32. Anchors = [akLeft, akTop, akRight]
  33. Brush.Color = 14671839
  34. Pen.Color = 10849679
  35. Pen.Width = 2
  36. ExplicitWidth = 1269
  37. end
  38. object LblCaption: TLabel
  39. Left = 16
  40. Top = 10
  41. Width = 267
  42. Height = 23
  43. Caption = #53440#51060#53952' '
  44. Font.Charset = DEFAULT_CHARSET
  45. Font.Color = 4740964
  46. Font.Height = -17
  47. Font.Name = #47569#51008' '#44256#46357
  48. Font.Style = [fsBold]
  49. ParentFont = False
  50. ParentShowHint = False
  51. ShowHint = True
  52. end
  53. object ShpList: TShape
  54. Left = 4
  55. Top = 50
  56. Width = 1045
  57. Height = 783
  58. Anchors = [akLeft, akTop, akRight, akBottom]
  59. Pen.Color = 10849679
  60. Pen.Width = 2
  61. ExplicitWidth = 1436
  62. ExplicitHeight = 766
  63. end
  64. object BtnClose: TcxButton
  65. Left = 959
  66. Top = 11
  67. Width = 80
  68. Height = 25
  69. Cursor = crHandPoint
  70. Hint = #45803#44592
  71. Anchors = [akTop, akRight]
  72. Caption = #45803#44592
  73. Colors.Default = 10737865
  74. TabOrder = 0
  75. Font.Charset = DEFAULT_CHARSET
  76. Font.Color = clBlack
  77. Font.Height = -13
  78. Font.Name = #47569#51008' '#44256#46357
  79. Font.Style = [fsBold]
  80. ParentFont = False
  81. OnClick = BtnCloseClick
  82. end
  83. object EdFocus: TEdit
  84. Left = -10
  85. Top = -10
  86. Width = 2
  87. Height = 25
  88. ImeName = 'Microsoft Office IME 2007'
  89. TabOrder = 1
  90. Text = 'EdFocus'
  91. end
  92. object PnlBack: TPanel
  93. Left = 12
  94. Top = 56
  95. Width = 1027
  96. Height = 770
  97. Anchors = [akLeft, akTop, akRight, akBottom]
  98. BevelOuter = bvNone
  99. ParentBackground = False
  100. ParentColor = True
  101. TabOrder = 2
  102. object PnlLeft: TPanel
  103. Left = 0
  104. Top = 0
  105. Width = 353
  106. Height = 770
  107. Align = alLeft
  108. BevelOuter = bvNone
  109. TabOrder = 0
  110. object cxGroupBox2: TcxGroupBox
  111. Left = 0
  112. Top = 0
  113. Align = alClient
  114. Caption = #9654' '#44160#49353' '#51312#44148
  115. Style.BorderColor = clCaptionText
  116. Style.Shadow = False
  117. Style.TextColor = clWindowText
  118. Style.TextStyle = [fsBold]
  119. TabOrder = 0
  120. ExplicitWidth = 329
  121. Height = 770
  122. Width = 353
  123. object ImgDesc01: TImage
  124. Left = 12
  125. Top = 32
  126. Width = 9
  127. Height = 9
  128. Transparent = True
  129. end
  130. object Label26: TLabel
  131. Left = 23
  132. Top = 29
  133. Width = 77
  134. Height = 17
  135. Alignment = taRightJustify
  136. AutoSize = False
  137. Caption = #44160#49353#51068#51088
  138. Transparent = True
  139. end
  140. object ImgDesc02: TImage
  141. Left = 12
  142. Top = 182
  143. Width = 9
  144. Height = 9
  145. Transparent = True
  146. Visible = False
  147. end
  148. object Label6: TLabel
  149. Left = 27
  150. Top = 179
  151. Width = 52
  152. Height = 17
  153. Caption = #51333#47308#49884#44033
  154. Transparent = True
  155. Visible = False
  156. end
  157. object Label1: TLabel
  158. Left = 23
  159. Top = 59
  160. Width = 77
  161. Height = 17
  162. Alignment = taRightJustify
  163. AutoSize = False
  164. Caption = #54532#47196#49464#49828
  165. Transparent = True
  166. end
  167. object ImgDesc03: TImage
  168. Left = 12
  169. Top = 63
  170. Width = 9
  171. Height = 9
  172. Transparent = True
  173. end
  174. object BtnSearch: TcxButton
  175. Left = 264
  176. Top = 88
  177. Width = 80
  178. Height = 25
  179. Cursor = crHandPoint
  180. Hint = #51312#54924
  181. Caption = #51312#54924
  182. Colors.Default = 10737865
  183. TabOrder = 0
  184. Font.Charset = DEFAULT_CHARSET
  185. Font.Color = clBlack
  186. Font.Height = -13
  187. Font.Name = #47569#51008' '#44256#46357
  188. Font.Style = [fsBold]
  189. ParentFont = False
  190. OnClick = BtnSearchClick
  191. end
  192. object DtStDate: TcxDateEdit
  193. Left = 102
  194. Top = 28
  195. EditValue = 39924d
  196. Properties.Alignment.Horz = taCenter
  197. Properties.DateButtons = [btnNow, btnToday]
  198. Properties.DateOnError = deToday
  199. Properties.SaveTime = False
  200. Properties.ShowTime = False
  201. Style.ButtonStyle = btsUltraFlat
  202. StyleFocused.TextStyle = [fsBold]
  203. StyleFocused.ButtonStyle = btsUltraFlat
  204. TabOrder = 1
  205. Width = 242
  206. end
  207. object DtEdDate: TcxDateEdit
  208. Left = 85
  209. Top = 178
  210. EditValue = 39924d
  211. Properties.Alignment.Horz = taCenter
  212. Properties.DateButtons = [btnNow, btnToday]
  213. Properties.DateOnError = deToday
  214. Properties.SaveTime = False
  215. Properties.ShowTime = False
  216. Style.ButtonStyle = btsUltraFlat
  217. StyleFocused.TextStyle = [fsBold]
  218. StyleFocused.ButtonStyle = btsUltraFlat
  219. TabOrder = 2
  220. Visible = False
  221. Width = 103
  222. end
  223. object DtEdTime: TcxTimeEdit
  224. Left = 90
  225. Top = 209
  226. EditValue = 0d
  227. Properties.Alignment.Horz = taCenter
  228. Properties.TimeFormat = tfHour
  229. Style.ButtonStyle = btsUltraFlat
  230. StyleFocused.TextStyle = [fsBold]
  231. TabOrder = 3
  232. Visible = False
  233. Width = 53
  234. end
  235. object DtStTime: TcxTimeEdit
  236. Left = 74
  237. Top = 344
  238. EditValue = 0d
  239. Properties.Alignment.Horz = taCenter
  240. Properties.TimeFormat = tfHour
  241. Style.ButtonStyle = btsUltraFlat
  242. StyleFocused.TextStyle = [fsBold]
  243. TabOrder = 4
  244. Visible = False
  245. Width = 53
  246. end
  247. object cxLabel1: TcxLabel
  248. Left = 3
  249. Top = 250
  250. AutoSize = False
  251. Caption = #44160#49353#44592#44036#51060' '#53364' '#44221#50864' '#44160#49353#44208#44284#44032' '#45734#50612#51656#49688' '#51080#49845#45768#45796'.'
  252. ParentFont = False
  253. Style.Font.Charset = DEFAULT_CHARSET
  254. Style.Font.Color = clWindowText
  255. Style.Font.Height = -12
  256. Style.Font.Name = #47569#51008' '#44256#46357
  257. Style.Font.Style = [fsBold]
  258. Style.TextColor = clRed
  259. Style.IsFontAssigned = True
  260. Properties.WordWrap = True
  261. Transparent = True
  262. Visible = False
  263. Height = 36
  264. Width = 179
  265. end
  266. object CbType: TcxComboBox
  267. Left = 102
  268. Top = 57
  269. Cursor = crHandPoint
  270. Hint = #49884#49444#47932' '#51333#47448#47484' '#49440#53469' '#54633#45768#45796'.'
  271. Properties.Alignment.Horz = taLeftJustify
  272. Properties.Alignment.Vert = taVCenter
  273. Properties.DropDownListStyle = lsFixedList
  274. Properties.DropDownSizeable = True
  275. Properties.HideSelection = False
  276. Properties.Items.Strings = (
  277. 'CCTV '#49436#48260
  278. 'VMS '#49436#48260)
  279. Properties.ReadOnly = False
  280. Style.BorderColor = clWindowFrame
  281. Style.BorderStyle = ebsUltraFlat
  282. Style.LookAndFeel.Kind = lfUltraFlat
  283. Style.LookAndFeel.NativeStyle = False
  284. Style.ButtonStyle = btsUltraFlat
  285. Style.PopupBorderStyle = epbsFlat
  286. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  287. StyleDisabled.LookAndFeel.NativeStyle = False
  288. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  289. StyleFocused.LookAndFeel.NativeStyle = False
  290. StyleFocused.TextColor = clBlack
  291. StyleFocused.TextStyle = [fsBold]
  292. StyleHot.LookAndFeel.Kind = lfUltraFlat
  293. StyleHot.LookAndFeel.NativeStyle = False
  294. TabOrder = 6
  295. Text = 'CCTV '#49436#48260
  296. Width = 242
  297. end
  298. end
  299. end
  300. object cxSplitter1: TcxSplitter
  301. Left = 353
  302. Top = 0
  303. Width = 6
  304. Height = 770
  305. Control = PnlLeft
  306. ExplicitLeft = 329
  307. end
  308. object cxGroupBox1: TcxGroupBox
  309. Left = 359
  310. Top = 0
  311. Align = alClient
  312. Caption = #9654' '#44160#49353' '#44208#44284
  313. Style.BorderColor = clCaptionText
  314. Style.Shadow = False
  315. Style.TextColor = clBlack
  316. Style.TextStyle = [fsBold]
  317. TabOrder = 2
  318. ExplicitLeft = 335
  319. ExplicitWidth = 692
  320. DesignSize = (
  321. 668
  322. 763)
  323. Height = 770
  324. Width = 668
  325. object PgTab: TcxPageControl
  326. Left = 7
  327. Top = 19
  328. Width = 655
  329. Height = 742
  330. Anchors = [akLeft, akTop, akRight, akBottom]
  331. Focusable = False
  332. TabOrder = 0
  333. Properties.ActivePage = TsList01
  334. Properties.CloseButtonMode = cbmEveryTab
  335. Properties.HotTrack = True
  336. Properties.TabSlants.Positions = [spRight]
  337. TabSlants.Positions = [spRight]
  338. OnCanCloseEx = PgTabCanCloseEx
  339. OnDblClick = PgTabDblClick
  340. ExplicitWidth = 679
  341. ClientRectBottom = 737
  342. ClientRectLeft = 2
  343. ClientRectRight = 650
  344. ClientRectTop = 28
  345. object TsList01: TcxTabSheet
  346. Caption = #44160#49353#44208#44284
  347. ImageIndex = 2
  348. ExplicitWidth = 672
  349. end
  350. end
  351. end
  352. end
  353. object TmrShow: TTimer
  354. Enabled = False
  355. Interval = 300
  356. OnTimer = TmrShowTimer
  357. Left = 876
  358. Top = 8
  359. end
  360. end