VDSH0101F.dfm 8.6 KB

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