IHS0050MF.dfm 10 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384
  1. object IHS0050M: TIHS0050M
  2. Left = 0
  3. Top = 0
  4. HorzScrollBar.Visible = False
  5. VertScrollBar.Visible = False
  6. Caption = #49884#49444#47932' '#51109#50528#45236#50669
  7. ClientHeight = 790
  8. ClientWidth = 940
  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. 940
  24. 790)
  25. PixelsPerInch = 96
  26. TextHeight = 17
  27. object ShpTitle: TShape
  28. Left = 796
  29. Top = 2
  30. Width = 932
  31. Height = 40
  32. Anchors = [akLeft, akTop, akRight]
  33. Brush.Color = 14671839
  34. Pen.Color = 10849679
  35. Pen.Width = 2
  36. Visible = False
  37. ExplicitWidth = 819
  38. end
  39. object LblCaption: TLabel
  40. Left = 808
  41. Top = 8
  42. Width = 267
  43. Height = 23
  44. Caption = #53440#51060#53952' '
  45. Font.Charset = DEFAULT_CHARSET
  46. Font.Color = 4740964
  47. Font.Height = -17
  48. Font.Name = #47569#51008' '#44256#46357
  49. Font.Style = [fsBold]
  50. ParentFont = False
  51. ParentShowHint = False
  52. ShowHint = True
  53. Visible = False
  54. end
  55. object ShpList: TShape
  56. Left = 4
  57. Top = 4
  58. Width = 932
  59. Height = 781
  60. Anchors = [akLeft, akTop, akRight, akBottom]
  61. Pen.Color = 10849679
  62. Pen.Width = 2
  63. ExplicitWidth = 819
  64. end
  65. object BtnClose: TcxButton
  66. Left = 1643
  67. Top = 9
  68. Width = 75
  69. Height = 25
  70. Cursor = crHandPoint
  71. Hint = #45803#44592
  72. Anchors = [akTop, akRight]
  73. Caption = #45803#44592
  74. Colors.Default = 10737865
  75. TabOrder = 0
  76. Visible = False
  77. Font.Charset = DEFAULT_CHARSET
  78. Font.Color = clBlack
  79. Font.Height = -13
  80. Font.Name = #47569#51008' '#44256#46357
  81. Font.Style = [fsBold]
  82. ParentFont = False
  83. OnClick = BtnCloseClick
  84. end
  85. object EdFocus: TEdit
  86. Left = -10
  87. Top = -10
  88. Width = 2
  89. Height = 25
  90. ImeName = 'Microsoft Office IME 2007'
  91. TabOrder = 1
  92. Text = 'EdFocus'
  93. end
  94. object PnlBack: TPanel
  95. Left = 12
  96. Top = 9
  97. Width = 914
  98. Height = 768
  99. Anchors = [akLeft, akTop, akRight, akBottom]
  100. BevelOuter = bvNone
  101. ParentBackground = False
  102. ParentColor = True
  103. TabOrder = 2
  104. object cxGroupBox1: TcxGroupBox
  105. Left = 0
  106. Top = 70
  107. Align = alClient
  108. Caption = #9654' '#44160#49353' '#44208#44284
  109. Style.BorderColor = clCaptionText
  110. Style.Shadow = False
  111. Style.TextColor = clBlack
  112. Style.TextStyle = [fsBold]
  113. TabOrder = 0
  114. DesignSize = (
  115. 914
  116. 691)
  117. Height = 698
  118. Width = 914
  119. object PgTab: TcxPageControl
  120. Left = 7
  121. Top = 19
  122. Width = 901
  123. Height = 670
  124. Anchors = [akLeft, akTop, akRight, akBottom]
  125. Focusable = False
  126. TabOrder = 0
  127. Properties.ActivePage = TsList01
  128. Properties.CloseButtonMode = cbmEveryTab
  129. Properties.HotTrack = True
  130. Properties.TabSlants.Positions = [spRight]
  131. TabSlants.Positions = [spRight]
  132. OnCanCloseEx = PgTabCanCloseEx
  133. OnDblClick = PgTabDblClick
  134. ClientRectBottom = 665
  135. ClientRectLeft = 2
  136. ClientRectRight = 896
  137. ClientRectTop = 28
  138. object TsList01: TcxTabSheet
  139. Caption = #44160#49353#44208#44284
  140. ImageIndex = 2
  141. ExplicitLeft = 0
  142. ExplicitTop = 0
  143. ExplicitWidth = 0
  144. ExplicitHeight = 0
  145. end
  146. end
  147. end
  148. object PnlLeft: TPanel
  149. Left = 0
  150. Top = 0
  151. Width = 914
  152. Height = 70
  153. Align = alTop
  154. BevelOuter = bvNone
  155. TabOrder = 1
  156. object cxGroupBox2: TcxGroupBox
  157. Left = 0
  158. Top = 0
  159. Align = alTop
  160. Caption = #9654' '#44160#49353' '#51312#44148
  161. Style.BorderColor = clCaptionText
  162. Style.Shadow = False
  163. Style.TextColor = clWindowText
  164. Style.TextStyle = [fsBold]
  165. TabOrder = 0
  166. Height = 721
  167. Width = 914
  168. object ImgDesc01: TImage
  169. Left = 12
  170. Top = 32
  171. Width = 9
  172. Height = 9
  173. Transparent = True
  174. end
  175. object Label26: TLabel
  176. Left = 82
  177. Top = 29
  178. Width = 52
  179. Height = 17
  180. Alignment = taRightJustify
  181. Caption = #44160#49353#49884#44033
  182. Transparent = True
  183. end
  184. object Label6: TLabel
  185. Left = 337
  186. Top = 30
  187. Width = 19
  188. Height = 17
  189. Caption = ' ~ '
  190. Transparent = True
  191. end
  192. object ImgDesc03: TImage
  193. Left = 587
  194. Top = 32
  195. Width = 9
  196. Height = 9
  197. Transparent = True
  198. end
  199. object Label1: TLabel
  200. Left = 618
  201. Top = 29
  202. Width = 65
  203. Height = 17
  204. Alignment = taRightJustify
  205. Caption = #49884#49444#47932#44396#48516
  206. Transparent = True
  207. end
  208. object BtnSearch: TcxButton
  209. Left = 823
  210. Top = 28
  211. Width = 80
  212. Height = 25
  213. Cursor = crHandPoint
  214. Hint = #51312#54924
  215. Caption = #51312#54924
  216. Colors.Default = 10737865
  217. TabOrder = 0
  218. Font.Charset = DEFAULT_CHARSET
  219. Font.Color = clBlack
  220. Font.Height = -13
  221. Font.Name = #47569#51008' '#44256#46357
  222. Font.Style = [fsBold]
  223. ParentFont = False
  224. OnClick = BtnSearchClick
  225. end
  226. object DtStDate: TcxDateEdit
  227. Left = 140
  228. Top = 28
  229. EditValue = 39924d
  230. Properties.Alignment.Horz = taCenter
  231. Properties.DateButtons = [btnNow, btnToday]
  232. Properties.DateOnError = deToday
  233. Properties.SaveTime = False
  234. Properties.ShowTime = False
  235. Style.ButtonStyle = btsUltraFlat
  236. StyleFocused.TextStyle = [fsBold]
  237. StyleFocused.ButtonStyle = btsUltraFlat
  238. TabOrder = 1
  239. Width = 103
  240. end
  241. object DtEdDate: TcxDateEdit
  242. Left = 356
  243. Top = 28
  244. EditValue = 39924d
  245. Properties.Alignment.Horz = taCenter
  246. Properties.DateButtons = [btnNow, btnToday]
  247. Properties.DateOnError = deToday
  248. Properties.SaveTime = False
  249. Properties.ShowTime = False
  250. Style.ButtonStyle = btsUltraFlat
  251. StyleFocused.TextStyle = [fsBold]
  252. StyleFocused.ButtonStyle = btsUltraFlat
  253. TabOrder = 2
  254. Width = 103
  255. end
  256. object DtEdTime1: TcxTimeEdit
  257. Left = 365
  258. Top = 58
  259. EditValue = 0d
  260. Properties.Alignment.Horz = taCenter
  261. Properties.TimeFormat = tfHour
  262. Style.ButtonStyle = btsUltraFlat
  263. StyleFocused.TextStyle = [fsBold]
  264. TabOrder = 3
  265. Visible = False
  266. Width = 43
  267. end
  268. object DtStTime1: TcxTimeEdit
  269. Left = 188
  270. Top = 58
  271. EditValue = 0d
  272. Properties.Alignment.Horz = taCenter
  273. Properties.TimeFormat = tfHour
  274. Style.ButtonStyle = btsUltraFlat
  275. StyleFocused.TextStyle = [fsBold]
  276. TabOrder = 4
  277. Visible = False
  278. Width = 43
  279. end
  280. object cxLabel1: TcxLabel
  281. Left = 121
  282. Top = -4
  283. Caption = #44160#49353#44592#44036#51060' '#53364' '#44221#50864' '#44160#49353#44208#44284#44032' '#45734#50612#51656#49688' '#51080#49845#45768#45796'.'
  284. ParentFont = False
  285. Style.Font.Charset = DEFAULT_CHARSET
  286. Style.Font.Color = clWindowText
  287. Style.Font.Height = -12
  288. Style.Font.Name = #47569#51008' '#44256#46357
  289. Style.Font.Style = [fsBold]
  290. Style.TextColor = clTeal
  291. Style.IsFontAssigned = True
  292. Properties.Alignment.Vert = taVCenter
  293. Properties.WordWrap = True
  294. Transparent = True
  295. Width = 279
  296. AnchorY = 6
  297. end
  298. object CbType: TcxComboBox
  299. Left = 689
  300. Top = 28
  301. Cursor = crHandPoint
  302. Hint = #49884#49444#47932' '#51333#47448#47484' '#49440#53469' '#54633#45768#45796'.'
  303. Properties.Alignment.Horz = taCenter
  304. Properties.Alignment.Vert = taVCenter
  305. Properties.DropDownListStyle = lsFixedList
  306. Properties.HideSelection = False
  307. Properties.Items.Strings = (
  308. #50937#52852#47700#46972
  309. 'CCTV'
  310. 'VMS'
  311. '')
  312. Properties.ReadOnly = False
  313. Style.BorderColor = clWindowFrame
  314. Style.BorderStyle = ebsUltraFlat
  315. Style.LookAndFeel.Kind = lfUltraFlat
  316. Style.LookAndFeel.NativeStyle = False
  317. Style.ButtonStyle = btsUltraFlat
  318. Style.PopupBorderStyle = epbsFlat
  319. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  320. StyleDisabled.LookAndFeel.NativeStyle = False
  321. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  322. StyleFocused.LookAndFeel.NativeStyle = False
  323. StyleFocused.TextColor = clBlack
  324. StyleFocused.TextStyle = [fsBold]
  325. StyleHot.LookAndFeel.Kind = lfUltraFlat
  326. StyleHot.LookAndFeel.NativeStyle = False
  327. TabOrder = 6
  328. Text = #50937#52852#47700#46972
  329. Width = 113
  330. end
  331. object DtStTime: TDateTimePicker
  332. Left = 249
  333. Top = 28
  334. Width = 84
  335. Height = 25
  336. BevelInner = bvNone
  337. BevelOuter = bvNone
  338. BevelKind = bkFlat
  339. Date = 39924.557697118050000000
  340. Format = ' HH:mm'
  341. Time = 39924.557697118050000000
  342. Color = clBtnFace
  343. DateMode = dmUpDown
  344. ImeName = 'Microsoft Office IME 2007'
  345. Kind = dtkTime
  346. ParentColor = True
  347. TabOrder = 7
  348. end
  349. object DtEdTime: TDateTimePicker
  350. Left = 465
  351. Top = 28
  352. Width = 84
  353. Height = 25
  354. BevelInner = bvNone
  355. BevelOuter = bvNone
  356. BevelKind = bkFlat
  357. Date = 39924.557697118050000000
  358. Format = ' HH:mm'
  359. Time = 39924.557697118050000000
  360. Color = clBtnFace
  361. DateMode = dmUpDown
  362. ImeName = 'Microsoft Office IME 2007'
  363. Kind = dtkTime
  364. ParentColor = True
  365. TabOrder = 8
  366. end
  367. end
  368. end
  369. end
  370. object lblAll: TcxLabel
  371. Left = 36
  372. Top = 173
  373. Caption = #51204' '#52404
  374. Transparent = True
  375. Visible = False
  376. end
  377. object TmrShow: TTimer
  378. Enabled = False
  379. Interval = 300
  380. OnTimer = TmrShowTimer
  381. Left = 404
  382. Top = 220
  383. end
  384. end