VDSH0301F.dfm 7.9 KB

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