VDSH0601F.dfm 7.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256
  1. object VDSH0601: TVDSH0601
  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' '#48372#51221' '#51060#47141
  10. ClientHeight = 698
  11. ClientWidth = 872
  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 = 872
  30. Height = 34
  31. Align = alTop
  32. BevelOuter = bvNone
  33. TabOrder = 0
  34. DesignSize = (
  35. 872
  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 = 722
  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 = 790
  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 = 872
  86. Height = 664
  87. Align = alClient
  88. BevelOuter = bvNone
  89. TabOrder = 1
  90. DesignSize = (
  91. 872
  92. 664)
  93. object CxList: TcxGrid
  94. Left = 0
  95. Top = 0
  96. Width = 872
  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 = #44160#51648#44592' '#48264#54840
  120. PropertiesClassName = 'TcxLabelProperties'
  121. Properties.Alignment.Horz = taCenter
  122. Properties.Alignment.Vert = taVCenter
  123. HeaderAlignmentHorz = taCenter
  124. HeaderAlignmentVert = vaCenter
  125. Width = 117
  126. end
  127. object Column09: TcxGridColumn
  128. Caption = #44160#51648#44592' ID'
  129. PropertiesClassName = 'TcxLabelProperties'
  130. Properties.Alignment.Horz = taCenter
  131. Properties.Alignment.Vert = taVCenter
  132. HeaderAlignmentHorz = taCenter
  133. HeaderAlignmentVert = vaCenter
  134. Width = 95
  135. end
  136. object Column01: TcxGridColumn
  137. Caption = #49444#52824#52264#47196
  138. PropertiesClassName = 'TcxTextEditProperties'
  139. Properties.Alignment.Horz = taCenter
  140. Properties.Alignment.Vert = taVCenter
  141. HeaderAlignmentHorz = taCenter
  142. HeaderAlignmentVert = vaCenter
  143. Options.Editing = False
  144. Width = 80
  145. end
  146. object Column02: TcxGridColumn
  147. Caption = #48156#49373#51068#49884
  148. PropertiesClassName = 'TcxTextEditProperties'
  149. Properties.Alignment.Horz = taCenter
  150. Properties.Alignment.Vert = taVCenter
  151. Properties.MaxLength = 0
  152. Properties.PasswordChar = '*'
  153. HeaderAlignmentHorz = taCenter
  154. HeaderAlignmentVert = vaCenter
  155. Options.Editing = False
  156. Width = 170
  157. end
  158. object Column03: TcxGridColumn
  159. Caption = #49884#49828#53596#51333#47448#44396#48516
  160. PropertiesClassName = 'TcxTextEditProperties'
  161. Properties.Alignment.Horz = taCenter
  162. Properties.Alignment.Vert = taVCenter
  163. Properties.MaxLength = 0
  164. HeaderAlignmentHorz = taCenter
  165. HeaderAlignmentVert = vaCenter
  166. Options.Editing = False
  167. Width = 96
  168. end
  169. object Column04: TcxGridColumn
  170. Caption = #44368#53685#47049
  171. DataBinding.ValueType = 'Integer'
  172. PropertiesClassName = 'TcxLabelProperties'
  173. Properties.Alignment.Horz = taRightJustify
  174. Properties.Alignment.Vert = taVCenter
  175. HeaderAlignmentHorz = taCenter
  176. HeaderAlignmentVert = vaCenter
  177. Options.Editing = False
  178. Width = 85
  179. end
  180. object Column05: TcxGridColumn
  181. Caption = #49549#46020
  182. PropertiesClassName = 'TcxLabelProperties'
  183. Properties.Alignment.Horz = taRightJustify
  184. Properties.Alignment.Vert = taVCenter
  185. HeaderAlignmentHorz = taCenter
  186. HeaderAlignmentVert = vaCenter
  187. Width = 66
  188. end
  189. object Column06: TcxGridColumn
  190. Caption = #54217#44512' '#51216#50976#50984
  191. PropertiesClassName = 'TcxLabelProperties'
  192. Properties.Alignment.Horz = taRightJustify
  193. Properties.Alignment.Vert = taVCenter
  194. HeaderAlignmentHorz = taCenter
  195. HeaderAlignmentVert = vaCenter
  196. Width = 75
  197. end
  198. object Column07: TcxGridColumn
  199. Caption = #52264#46160#49884#44036
  200. PropertiesClassName = 'TcxLabelProperties'
  201. Properties.Alignment.Horz = taRightJustify
  202. Properties.Alignment.Vert = taVCenter
  203. HeaderAlignmentHorz = taCenter
  204. HeaderAlignmentVert = vaCenter
  205. Width = 74
  206. end
  207. object Column08: TcxGridColumn
  208. Caption = #54217#44512' '#44600#51060
  209. PropertiesClassName = 'TcxLabelProperties'
  210. Properties.Alignment.Horz = taRightJustify
  211. Properties.Alignment.Vert = taVCenter
  212. HeaderAlignmentHorz = taCenter
  213. HeaderAlignmentVert = vaCenter
  214. Width = 71
  215. end
  216. end
  217. object GlList: TcxGridLevel
  218. GridView = TvList
  219. end
  220. end
  221. object ChkExpand: TcxCheckBox
  222. Tag = 9
  223. Left = 758
  224. Top = 7
  225. Cursor = crHandPoint
  226. Hint = #44536#47353' '#47785#47197' '#54869#51109' '#46608#45716' '#52712#49548
  227. Anchors = [akTop, akRight]
  228. Caption = #54869#51109'/'#52629#49548
  229. ParentBackground = False
  230. ParentColor = False
  231. ParentShowHint = False
  232. ShowHint = True
  233. State = cbsChecked
  234. Style.BorderColor = 9868950
  235. Style.BorderStyle = ebsThick
  236. Style.Color = 14671839
  237. Style.Shadow = False
  238. TabOrder = 0
  239. Transparent = True
  240. OnClick = ChkExpandClick
  241. Width = 85
  242. end
  243. end
  244. object ADOQry: TADOQuery
  245. Parameters = <>
  246. Left = 240
  247. Top = 148
  248. end
  249. object TmrShow: TTimer
  250. Enabled = False
  251. Interval = 300
  252. OnTimer = TmrShowTimer
  253. Left = 320
  254. Top = 156
  255. end
  256. end