IHS00601F.dfm 12 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373
  1. object IHS00601: TIHS00601
  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 = #49688#51665#45936#51060#53552' '#48516#49437
  10. ClientHeight = 698
  11. ClientWidth = 1034
  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 = 1034
  31. Height = 34
  32. Align = alTop
  33. BevelOuter = bvNone
  34. TabOrder = 0
  35. DesignSize = (
  36. 1034
  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 = 884
  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. end
  63. object BtnExlSave: TcxButton
  64. Left = 952
  65. Top = 5
  66. Width = 75
  67. Height = 25
  68. Cursor = crHandPoint
  69. Hint = #51312#54924' '#44208#44284' '#45936#51060#53552#47484' '#54028#51068#47196' '#51200#51109#54633#45768#45796'.'
  70. Anchors = [akTop, akRight]
  71. Caption = #51200#51109
  72. Colors.Default = 3893744
  73. TabOrder = 0
  74. Font.Charset = DEFAULT_CHARSET
  75. Font.Color = clWindowText
  76. Font.Height = -13
  77. Font.Name = #47569#51008' '#44256#46357
  78. Font.Style = [fsBold]
  79. ParentFont = False
  80. OnClick = BtnExlSaveClick
  81. end
  82. end
  83. object PnlList: TPanel
  84. Left = 0
  85. Top = 34
  86. Width = 1034
  87. Height = 664
  88. Align = alClient
  89. BevelOuter = bvNone
  90. TabOrder = 1
  91. DesignSize = (
  92. 1034
  93. 664)
  94. object CxList: TcxGrid
  95. Left = 0
  96. Top = 0
  97. Width = 1034
  98. Height = 664
  99. Align = alClient
  100. TabOrder = 1
  101. object TvList: TcxGridTableView
  102. Navigator.Buttons.Append.Visible = True
  103. Navigator.Buttons.SaveBookmark.Visible = False
  104. Navigator.InfoPanel.Visible = True
  105. DataController.Summary.DefaultGroupSummaryItems = <>
  106. DataController.Summary.FooterSummaryItems = <>
  107. DataController.Summary.SummaryGroups = <>
  108. FilterRow.InfoText = #44160#49353#50612#47484' '#51077#47141#54616#49464#50836'.'
  109. OptionsBehavior.CellHints = True
  110. OptionsBehavior.ShowLockedStateImageOptions.BestFit = lsimImmediate
  111. OptionsBehavior.ShowLockedStateImageOptions.Filtering = lsimImmediate
  112. OptionsBehavior.ShowLockedStateImageOptions.Grouping = lsimImmediate
  113. OptionsBehavior.ShowLockedStateImageOptions.Sorting = lsimImmediate
  114. OptionsData.Deleting = False
  115. OptionsData.DeletingConfirmation = False
  116. OptionsData.Editing = False
  117. OptionsData.Inserting = False
  118. OptionsView.Indicator = True
  119. object ColRoad: TcxGridColumn
  120. Caption = #46020#47196#47749
  121. PropertiesClassName = 'TcxLabelProperties'
  122. Properties.Alignment.Vert = taVCenter
  123. HeaderAlignmentHorz = taCenter
  124. HeaderAlignmentVert = vaCenter
  125. Width = 102
  126. end
  127. object Column02: TcxGridColumn
  128. Caption = #47553#53356
  129. PropertiesClassName = 'TcxTextEditProperties'
  130. Properties.Alignment.Horz = taCenter
  131. Properties.MaxLength = 0
  132. Properties.PasswordChar = '*'
  133. HeaderAlignmentHorz = taCenter
  134. HeaderAlignmentVert = vaCenter
  135. Options.Editing = False
  136. Width = 114
  137. end
  138. object ColFName: TcxGridColumn
  139. Caption = #49884#51216#47749
  140. PropertiesClassName = 'TcxLabelProperties'
  141. Properties.Alignment.Vert = taVCenter
  142. HeaderAlignmentHorz = taCenter
  143. HeaderAlignmentVert = vaCenter
  144. Width = 155
  145. end
  146. object ColTName: TcxGridColumn
  147. Caption = #51333#51216#47749
  148. PropertiesClassName = 'TcxLabelProperties'
  149. Properties.Alignment.Vert = taVCenter
  150. HeaderAlignmentHorz = taCenter
  151. HeaderAlignmentVert = vaCenter
  152. Width = 161
  153. end
  154. object Column01: TcxGridColumn
  155. Caption = #44032#44277#51068#49884
  156. PropertiesClassName = 'TcxTextEditProperties'
  157. Properties.Alignment.Horz = taCenter
  158. Properties.Alignment.Vert = taVCenter
  159. HeaderAlignmentHorz = taCenter
  160. HeaderAlignmentVert = vaCenter
  161. Options.Editing = False
  162. Width = 168
  163. end
  164. object Column03: TcxGridColumn
  165. Caption = #49688#51665#50896
  166. DataBinding.ValueType = 'Integer'
  167. PropertiesClassName = 'TcxCalcEditProperties'
  168. Properties.Alignment.Horz = taRightJustify
  169. Properties.Alignment.Vert = taVCenter
  170. HeaderAlignmentHorz = taCenter
  171. HeaderAlignmentVert = vaCenter
  172. Options.Editing = False
  173. Width = 110
  174. end
  175. object Column04: TcxGridColumn
  176. Caption = #49549#46020'(Km)'
  177. DataBinding.ValueType = 'Integer'
  178. PropertiesClassName = 'TcxCalcEditProperties'
  179. Properties.Alignment.Horz = taRightJustify
  180. Properties.Alignment.Vert = taVCenter
  181. Visible = False
  182. HeaderAlignmentHorz = taCenter
  183. HeaderAlignmentVert = vaCenter
  184. Options.Editing = False
  185. Width = 110
  186. end
  187. object Column05: TcxGridColumn
  188. DataBinding.ValueType = 'Integer'
  189. PropertiesClassName = 'TcxCalcEditProperties'
  190. Properties.Alignment.Horz = taRightJustify
  191. Properties.Alignment.Vert = taVCenter
  192. Visible = False
  193. HeaderAlignmentHorz = taCenter
  194. HeaderAlignmentVert = vaCenter
  195. Width = 110
  196. end
  197. object Column06: TcxGridColumn
  198. DataBinding.ValueType = 'Integer'
  199. PropertiesClassName = 'TcxCalcEditProperties'
  200. Properties.Alignment.Horz = taRightJustify
  201. Properties.Alignment.Vert = taVCenter
  202. Visible = False
  203. HeaderAlignmentHorz = taCenter
  204. HeaderAlignmentVert = vaCenter
  205. Width = 110
  206. end
  207. object Column07: TcxGridColumn
  208. DataBinding.ValueType = 'Integer'
  209. PropertiesClassName = 'TcxCalcEditProperties'
  210. Properties.Alignment.Horz = taRightJustify
  211. Properties.Alignment.Vert = taVCenter
  212. Visible = False
  213. HeaderAlignmentHorz = taCenter
  214. HeaderAlignmentVert = vaCenter
  215. Width = 110
  216. end
  217. object Column08: TcxGridColumn
  218. DataBinding.ValueType = 'Integer'
  219. PropertiesClassName = 'TcxCalcEditProperties'
  220. Properties.Alignment.Horz = taRightJustify
  221. Properties.Alignment.Vert = taVCenter
  222. Visible = False
  223. HeaderAlignmentHorz = taCenter
  224. HeaderAlignmentVert = vaCenter
  225. Width = 110
  226. end
  227. object Column09: TcxGridColumn
  228. DataBinding.ValueType = 'Integer'
  229. PropertiesClassName = 'TcxCalcEditProperties'
  230. Properties.Alignment.Horz = taRightJustify
  231. Properties.Alignment.Vert = taVCenter
  232. Visible = False
  233. HeaderAlignmentHorz = taCenter
  234. HeaderAlignmentVert = vaCenter
  235. Width = 110
  236. end
  237. object Column10: TcxGridColumn
  238. DataBinding.ValueType = 'Integer'
  239. PropertiesClassName = 'TcxCalcEditProperties'
  240. Properties.Alignment.Horz = taRightJustify
  241. Properties.Alignment.Vert = taVCenter
  242. Visible = False
  243. HeaderAlignmentHorz = taCenter
  244. HeaderAlignmentVert = vaCenter
  245. Width = 110
  246. end
  247. object Column11: TcxGridColumn
  248. DataBinding.ValueType = 'Integer'
  249. PropertiesClassName = 'TcxCalcEditProperties'
  250. Properties.Alignment.Horz = taRightJustify
  251. Properties.Alignment.Vert = taVCenter
  252. Visible = False
  253. HeaderAlignmentHorz = taCenter
  254. HeaderAlignmentVert = vaCenter
  255. Width = 110
  256. end
  257. object Column12: TcxGridColumn
  258. DataBinding.ValueType = 'Integer'
  259. PropertiesClassName = 'TcxCalcEditProperties'
  260. Properties.Alignment.Horz = taRightJustify
  261. Properties.Alignment.Vert = taVCenter
  262. Visible = False
  263. HeaderAlignmentHorz = taCenter
  264. HeaderAlignmentVert = vaCenter
  265. Width = 110
  266. end
  267. object Column13: TcxGridColumn
  268. DataBinding.ValueType = 'Integer'
  269. PropertiesClassName = 'TcxCalcEditProperties'
  270. Properties.Alignment.Horz = taRightJustify
  271. Properties.Alignment.Vert = taVCenter
  272. Visible = False
  273. HeaderAlignmentHorz = taCenter
  274. HeaderAlignmentVert = vaCenter
  275. Width = 110
  276. end
  277. object Column14: TcxGridColumn
  278. DataBinding.ValueType = 'Integer'
  279. PropertiesClassName = 'TcxCalcEditProperties'
  280. Properties.Alignment.Horz = taRightJustify
  281. Properties.Alignment.Vert = taVCenter
  282. Visible = False
  283. HeaderAlignmentHorz = taCenter
  284. HeaderAlignmentVert = vaCenter
  285. Width = 110
  286. end
  287. object Column15: TcxGridColumn
  288. DataBinding.ValueType = 'Integer'
  289. PropertiesClassName = 'TcxCalcEditProperties'
  290. Properties.Alignment.Horz = taRightJustify
  291. Properties.Alignment.Vert = taVCenter
  292. Visible = False
  293. HeaderAlignmentHorz = taCenter
  294. HeaderAlignmentVert = vaCenter
  295. Width = 110
  296. end
  297. object Column16: TcxGridColumn
  298. DataBinding.ValueType = 'Integer'
  299. PropertiesClassName = 'TcxCalcEditProperties'
  300. Properties.Alignment.Horz = taRightJustify
  301. Properties.Alignment.Vert = taVCenter
  302. Visible = False
  303. HeaderAlignmentHorz = taCenter
  304. HeaderAlignmentVert = vaCenter
  305. Width = 110
  306. end
  307. object Column17: TcxGridColumn
  308. DataBinding.ValueType = 'Integer'
  309. PropertiesClassName = 'TcxCalcEditProperties'
  310. Properties.Alignment.Horz = taRightJustify
  311. Properties.Alignment.Vert = taVCenter
  312. Visible = False
  313. HeaderAlignmentHorz = taCenter
  314. HeaderAlignmentVert = vaCenter
  315. Width = 110
  316. end
  317. object Column18: TcxGridColumn
  318. DataBinding.ValueType = 'Integer'
  319. PropertiesClassName = 'TcxCalcEditProperties'
  320. Properties.Alignment.Horz = taRightJustify
  321. Properties.Alignment.Vert = taVCenter
  322. Visible = False
  323. HeaderAlignmentHorz = taCenter
  324. HeaderAlignmentVert = vaCenter
  325. Width = 110
  326. end
  327. end
  328. object GlList: TcxGridLevel
  329. GridView = TvList
  330. end
  331. end
  332. object ChkExpand: TcxCheckBox
  333. Tag = 9
  334. Left = 920
  335. Top = 7
  336. Cursor = crHandPoint
  337. Hint = #44536#47353' '#47785#47197' '#54869#51109' '#46608#45716' '#52712#49548
  338. Anchors = [akTop, akRight]
  339. Caption = #54869#51109'/'#52629#49548
  340. ParentBackground = False
  341. ParentColor = False
  342. ParentShowHint = False
  343. ShowHint = True
  344. State = cbsChecked
  345. Style.BorderColor = 9868950
  346. Style.BorderStyle = ebsThick
  347. Style.Color = 14671839
  348. Style.Shadow = False
  349. TabOrder = 0
  350. Transparent = True
  351. OnClick = ChkExpandClick
  352. Width = 85
  353. end
  354. end
  355. object lblFileName: TcxLabel
  356. Left = 85
  357. Top = 262
  358. Caption = #49688#51665#45936#51060#53552#48516#49437
  359. Transparent = True
  360. end
  361. object ADOQry: TADOQuery
  362. Parameters = <>
  363. Left = 240
  364. Top = 148
  365. end
  366. object TmrShow: TTimer
  367. Enabled = False
  368. Interval = 300
  369. OnTimer = TmrShowTimer
  370. Left = 320
  371. Top = 156
  372. end
  373. end