VDSH0101F.dfm 8.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279
  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 = 1139
  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 = 1139
  30. Height = 34
  31. Align = alTop
  32. BevelOuter = bvNone
  33. TabOrder = 0
  34. DesignSize = (
  35. 1139
  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 = 989
  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. ExplicitLeft = 863
  62. end
  63. object BtnExlSave: TcxButton
  64. Left = 1057
  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 = 1139
  87. Height = 664
  88. Align = alClient
  89. BevelOuter = bvNone
  90. TabOrder = 1
  91. DesignSize = (
  92. 1139
  93. 664)
  94. object CxList: TcxGrid
  95. Left = 0
  96. Top = 0
  97. Width = 1139
  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 Column00: TcxGridColumn
  120. Caption = #44288#47532#48264#54840
  121. PropertiesClassName = 'TcxLabelProperties'
  122. Properties.Alignment.Horz = taCenter
  123. Properties.Alignment.Vert = taVCenter
  124. HeaderAlignmentHorz = taCenter
  125. HeaderAlignmentVert = vaCenter
  126. Width = 80
  127. end
  128. object Column11: TcxGridColumn
  129. Caption = #51228#50612#44592'ID'
  130. PropertiesClassName = 'TcxLabelProperties'
  131. Properties.Alignment.Horz = taCenter
  132. Properties.Alignment.Vert = taVCenter
  133. HeaderAlignmentHorz = taCenter
  134. HeaderAlignmentVert = vaCenter
  135. Width = 90
  136. end
  137. object Column09: TcxGridColumn
  138. Caption = #49444#52824#50948#52824
  139. PropertiesClassName = 'TcxLabelProperties'
  140. Properties.Alignment.Horz = taLeftJustify
  141. Properties.Alignment.Vert = taVCenter
  142. HeaderAlignmentHorz = taCenter
  143. HeaderAlignmentVert = vaCenter
  144. Width = 206
  145. end
  146. object Column01: TcxGridColumn
  147. Caption = #49688#51665#49884#44033
  148. PropertiesClassName = 'TcxTextEditProperties'
  149. Properties.Alignment.Horz = taCenter
  150. Properties.Alignment.Vert = taVCenter
  151. HeaderAlignmentHorz = taCenter
  152. HeaderAlignmentVert = vaCenter
  153. Options.Editing = False
  154. Width = 168
  155. end
  156. object Column02: TcxGridColumn
  157. Caption = #53685#49888
  158. PropertiesClassName = 'TcxLabelProperties'
  159. Properties.Alignment.Horz = taCenter
  160. Properties.Alignment.Vert = taVCenter
  161. OnCustomDrawCell = Column02CustomDrawCell
  162. HeaderAlignmentHorz = taCenter
  163. HeaderAlignmentVert = vaCenter
  164. Options.Editing = False
  165. Width = 95
  166. end
  167. object Column03: TcxGridColumn
  168. Caption = #51204#50896
  169. PropertiesClassName = 'TcxLabelProperties'
  170. Properties.Alignment.Horz = taCenter
  171. Properties.Alignment.Vert = taVCenter
  172. Visible = False
  173. OnCustomDrawCell = Column02CustomDrawCell
  174. HeaderAlignmentHorz = taCenter
  175. HeaderAlignmentVert = vaCenter
  176. Options.Editing = False
  177. VisibleForCustomization = False
  178. Width = 95
  179. end
  180. object Column04: TcxGridColumn
  181. Caption = #54632#52404#47928
  182. PropertiesClassName = 'TcxLabelProperties'
  183. Properties.Alignment.Horz = taCenter
  184. Properties.Alignment.Vert = taVCenter
  185. OnCustomDrawCell = Column02CustomDrawCell
  186. HeaderAlignmentHorz = taCenter
  187. HeaderAlignmentVert = vaCenter
  188. Options.Editing = False
  189. Width = 95
  190. end
  191. object Column05: TcxGridColumn
  192. Caption = #54060
  193. PropertiesClassName = 'TcxLabelProperties'
  194. Properties.Alignment.Horz = taCenter
  195. Properties.Alignment.Vert = taVCenter
  196. HeaderAlignmentHorz = taCenter
  197. HeaderAlignmentVert = vaCenter
  198. Width = 95
  199. end
  200. object Column06: TcxGridColumn
  201. Caption = #55176#53552
  202. PropertiesClassName = 'TcxLabelProperties'
  203. Properties.Alignment.Horz = taCenter
  204. Properties.Alignment.Vert = taVCenter
  205. OnCustomDrawCell = Column02CustomDrawCell
  206. HeaderAlignmentHorz = taCenter
  207. HeaderAlignmentVert = vaCenter
  208. Width = 95
  209. end
  210. object Column08: TcxGridColumn
  211. Caption = #48512#51228#50612#44592#44050
  212. PropertiesClassName = 'TcxLabelProperties'
  213. Properties.Alignment.Horz = taRightJustify
  214. Properties.Alignment.Vert = taVCenter
  215. Visible = False
  216. OnCustomDrawCell = Column02CustomDrawCell
  217. HeaderAlignmentHorz = taCenter
  218. HeaderAlignmentVert = vaCenter
  219. Width = 95
  220. end
  221. object Column10: TcxGridColumn
  222. Caption = #54632#52404#50728#46020
  223. PropertiesClassName = 'TcxLabelProperties'
  224. Properties.Alignment.Horz = taRightJustify
  225. Properties.Alignment.Vert = taVCenter
  226. HeaderAlignmentHorz = taCenter
  227. HeaderAlignmentVert = vaCenter
  228. end
  229. object Column07: TcxGridColumn
  230. Caption = #48708#46356#50724' '#51077#47141
  231. PropertiesClassName = 'TcxLabelProperties'
  232. Properties.Alignment.Horz = taCenter
  233. Properties.Alignment.Vert = taVCenter
  234. OnCustomDrawCell = Column02CustomDrawCell
  235. HeaderAlignmentHorz = taCenter
  236. HeaderAlignmentVert = vaCenter
  237. Width = 95
  238. end
  239. end
  240. object GlList: TcxGridLevel
  241. GridView = TvList
  242. end
  243. end
  244. object ChkExpand: TcxCheckBox
  245. Tag = 9
  246. Left = 1025
  247. Top = 7
  248. Cursor = crHandPoint
  249. Hint = #44536#47353' '#47785#47197' '#54869#51109' '#46608#45716' '#52712#49548
  250. Anchors = [akTop, akRight]
  251. Caption = #54869#51109'/'#52629#49548
  252. ParentBackground = False
  253. ParentColor = False
  254. ParentShowHint = False
  255. ShowHint = True
  256. State = cbsChecked
  257. Style.BorderColor = 9868950
  258. Style.BorderStyle = ebsThick
  259. Style.Color = 14671839
  260. Style.Shadow = False
  261. TabOrder = 0
  262. Transparent = True
  263. OnClick = ChkExpandClick
  264. Width = 85
  265. end
  266. end
  267. object ADOQry: TADOQuery
  268. Parameters = <>
  269. Left = 240
  270. Top = 148
  271. end
  272. object TmrShow: TTimer
  273. Enabled = False
  274. Interval = 300
  275. OnTimer = TmrShowTimer
  276. Left = 320
  277. Top = 156
  278. end
  279. end