VDSH0401F.dfm 7.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257
  1. object VDSH0401: TVDSH0401
  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 = 'VDS-'#44160#51648#44592' '#50896#49884#49688#51665' '#51060#47141
  10. ClientHeight = 698
  11. ClientWidth = 786
  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. OnShow = FormShow
  24. ExplicitWidth = 320
  25. ExplicitHeight = 240
  26. PixelsPerInch = 96
  27. TextHeight = 17
  28. object PnlTop: TPanel
  29. Left = 0
  30. Top = 0
  31. Width = 786
  32. Height = 34
  33. Align = alTop
  34. BevelOuter = bvNone
  35. TabOrder = 0
  36. DesignSize = (
  37. 786
  38. 34)
  39. object LblSearch: TLabel
  40. Left = 20
  41. Top = 9
  42. Width = 52
  43. Height = 17
  44. Caption = #44160#49353#51312#44148
  45. Transparent = True
  46. end
  47. object ImgDesc01: TImage
  48. Left = 5
  49. Top = 12
  50. Width = 9
  51. Height = 9
  52. Transparent = True
  53. end
  54. object LblRecords: TLabel
  55. Left = 636
  56. Top = 9
  57. Width = 52
  58. Height = 17
  59. Alignment = taRightJustify
  60. Anchors = [akTop, akRight]
  61. Caption = #51312#54924#44148#49688
  62. Transparent = True
  63. end
  64. object BtnExlSave: TcxButton
  65. Left = 704
  66. Top = 5
  67. Width = 75
  68. Height = 25
  69. Cursor = crHandPoint
  70. Hint = #51312#54924' '#44208#44284' '#45936#51060#53552#47484' '#54028#51068#47196' '#51200#51109#54633#45768#45796'.'
  71. Anchors = [akTop, akRight]
  72. Caption = #51200#51109
  73. Colors.Default = 3893744
  74. TabOrder = 0
  75. Font.Charset = DEFAULT_CHARSET
  76. Font.Color = clWindowText
  77. Font.Height = -13
  78. Font.Name = #47569#51008' '#44256#46357
  79. Font.Style = [fsBold]
  80. ParentFont = False
  81. OnClick = BtnExlSaveClick
  82. end
  83. end
  84. object PnlList: TPanel
  85. Left = 0
  86. Top = 34
  87. Width = 786
  88. Height = 664
  89. Align = alClient
  90. BevelOuter = bvNone
  91. TabOrder = 1
  92. DesignSize = (
  93. 786
  94. 664)
  95. object CxList: TcxGrid
  96. Left = 0
  97. Top = 0
  98. Width = 786
  99. Height = 664
  100. Align = alClient
  101. TabOrder = 1
  102. object TvList: TcxGridTableView
  103. Navigator.Buttons.Append.Visible = True
  104. Navigator.Buttons.SaveBookmark.Visible = False
  105. Navigator.InfoPanel.Visible = True
  106. DataController.Summary.DefaultGroupSummaryItems = <>
  107. DataController.Summary.FooterSummaryItems = <>
  108. DataController.Summary.SummaryGroups = <>
  109. FilterRow.InfoText = #44160#49353#50612#47484' '#51077#47141#54616#49464#50836'.'
  110. OptionsBehavior.CellHints = True
  111. OptionsBehavior.ShowLockedStateImageOptions.BestFit = lsimImmediate
  112. OptionsBehavior.ShowLockedStateImageOptions.Filtering = lsimImmediate
  113. OptionsBehavior.ShowLockedStateImageOptions.Grouping = lsimImmediate
  114. OptionsBehavior.ShowLockedStateImageOptions.Sorting = lsimImmediate
  115. OptionsData.Deleting = False
  116. OptionsData.DeletingConfirmation = False
  117. OptionsData.Editing = False
  118. OptionsData.Inserting = False
  119. OptionsView.Indicator = True
  120. object Column00: TcxGridColumn
  121. Caption = #51228#50612#44592' ID'
  122. PropertiesClassName = 'TcxLabelProperties'
  123. Properties.Alignment.Horz = taCenter
  124. Properties.Alignment.Vert = taVCenter
  125. HeaderAlignmentHorz = taCenter
  126. HeaderAlignmentVert = vaCenter
  127. Width = 102
  128. end
  129. object Column01: TcxGridColumn
  130. Caption = #44160#51648#44592' ID'
  131. PropertiesClassName = 'TcxLabelProperties'
  132. Properties.Alignment.Horz = taCenter
  133. Properties.Alignment.Vert = taVCenter
  134. HeaderAlignmentHorz = taCenter
  135. HeaderAlignmentVert = vaCenter
  136. Options.Editing = False
  137. Width = 94
  138. end
  139. object Column02: TcxGridColumn
  140. Caption = #48169#54693
  141. PropertiesClassName = 'TcxLabelProperties'
  142. Properties.Alignment.Horz = taCenter
  143. Properties.Alignment.Vert = taVCenter
  144. HeaderAlignmentHorz = taCenter
  145. HeaderAlignmentVert = vaCenter
  146. Options.Editing = False
  147. Width = 103
  148. end
  149. object Column09: TcxGridColumn
  150. Caption = #44160#51648#44592' '#47749
  151. PropertiesClassName = 'TcxLabelProperties'
  152. Properties.Alignment.Horz = taCenter
  153. Properties.Alignment.Vert = taVCenter
  154. Visible = False
  155. HeaderAlignmentHorz = taCenter
  156. HeaderAlignmentVert = vaCenter
  157. Width = 141
  158. end
  159. object Column03: TcxGridColumn
  160. Caption = #49688#51665#51068#51088
  161. PropertiesClassName = 'TcxTextEditProperties'
  162. Properties.Alignment.Horz = taCenter
  163. Properties.Alignment.Vert = taVCenter
  164. HeaderAlignmentHorz = taCenter
  165. HeaderAlignmentVert = vaCenter
  166. Options.Editing = False
  167. Width = 187
  168. end
  169. object Column04: TcxGridColumn
  170. Caption = #44368#53685#47049'('#45824')'
  171. PropertiesClassName = 'TcxLabelProperties'
  172. Properties.Alignment.Horz = taRightJustify
  173. Properties.Alignment.Vert = taVCenter
  174. HeaderAlignmentHorz = taCenter
  175. HeaderAlignmentVert = vaCenter
  176. Options.Editing = False
  177. Width = 85
  178. end
  179. object Column05: TcxGridColumn
  180. Caption = #54217#44512' '#51216#50976#50984'(%)'
  181. PropertiesClassName = 'TcxLabelProperties'
  182. Properties.Alignment.Horz = taRightJustify
  183. Properties.Alignment.Vert = taVCenter
  184. HeaderAlignmentHorz = taCenter
  185. HeaderAlignmentVert = vaCenter
  186. Width = 125
  187. end
  188. object Column06: TcxGridColumn
  189. Caption = #54217#44512#49549#46020'(km/h)'
  190. PropertiesClassName = 'TcxLabelProperties'
  191. Properties.Alignment.Horz = taRightJustify
  192. Properties.Alignment.Vert = taVCenter
  193. HeaderAlignmentHorz = taCenter
  194. HeaderAlignmentVert = vaCenter
  195. Width = 101
  196. end
  197. object Column07: TcxGridColumn
  198. Caption = #54217#44512#52264#46160#49884#44036'('#52488')'
  199. PropertiesClassName = 'TcxLabelProperties'
  200. Properties.Alignment.Horz = taRightJustify
  201. Properties.Alignment.Vert = taVCenter
  202. Visible = False
  203. HeaderAlignmentHorz = taCenter
  204. HeaderAlignmentVert = vaCenter
  205. Width = 120
  206. end
  207. object Column08: TcxGridColumn
  208. Caption = #48512' '#51228#50612#44592' '#44050
  209. PropertiesClassName = 'TcxLabelProperties'
  210. Properties.Alignment.Horz = taRightJustify
  211. Properties.Alignment.Vert = taVCenter
  212. Visible = False
  213. HeaderAlignmentHorz = taCenter
  214. HeaderAlignmentVert = vaCenter
  215. Width = 98
  216. end
  217. end
  218. object GlList: TcxGridLevel
  219. GridView = TvList
  220. end
  221. end
  222. object ChkExpand: TcxCheckBox
  223. Tag = 9
  224. Left = 672
  225. Top = 7
  226. Cursor = crHandPoint
  227. Hint = #44536#47353' '#47785#47197' '#54869#51109' '#46608#45716' '#52712#49548
  228. Anchors = [akTop, akRight]
  229. Caption = #54869#51109'/'#52629#49548
  230. ParentBackground = False
  231. ParentColor = False
  232. ParentShowHint = False
  233. ShowHint = True
  234. State = cbsChecked
  235. Style.BorderColor = 9868950
  236. Style.BorderStyle = ebsThick
  237. Style.Color = 14671839
  238. Style.Shadow = False
  239. TabOrder = 0
  240. Transparent = True
  241. OnClick = ChkExpandClick
  242. Width = 85
  243. end
  244. end
  245. object ADOQry: TADOQuery
  246. Parameters = <>
  247. Left = 240
  248. Top = 148
  249. end
  250. object TmrShow: TTimer
  251. Enabled = False
  252. Interval = 300
  253. OnTimer = TmrShowTimer
  254. Left = 320
  255. Top = 156
  256. end
  257. end