VDSH0601F.dfm 7.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258
  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. 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 Column09: 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. Width = 95
  137. end
  138. object Column01: TcxGridColumn
  139. Caption = #49444#52824#52264#47196
  140. PropertiesClassName = 'TcxTextEditProperties'
  141. Properties.Alignment.Horz = taCenter
  142. Properties.Alignment.Vert = taVCenter
  143. HeaderAlignmentHorz = taCenter
  144. HeaderAlignmentVert = vaCenter
  145. Options.Editing = False
  146. Width = 80
  147. end
  148. object Column02: TcxGridColumn
  149. Caption = #48156#49373#51068#49884
  150. PropertiesClassName = 'TcxTextEditProperties'
  151. Properties.Alignment.Horz = taCenter
  152. Properties.Alignment.Vert = taVCenter
  153. Properties.MaxLength = 0
  154. Properties.PasswordChar = '*'
  155. HeaderAlignmentHorz = taCenter
  156. HeaderAlignmentVert = vaCenter
  157. Options.Editing = False
  158. Width = 170
  159. end
  160. object Column03: TcxGridColumn
  161. Caption = #49884#49828#53596#51333#47448#44396#48516
  162. PropertiesClassName = 'TcxTextEditProperties'
  163. Properties.Alignment.Horz = taCenter
  164. Properties.Alignment.Vert = taVCenter
  165. Properties.MaxLength = 0
  166. HeaderAlignmentHorz = taCenter
  167. HeaderAlignmentVert = vaCenter
  168. Options.Editing = False
  169. Width = 96
  170. end
  171. object Column04: TcxGridColumn
  172. Caption = #44368#53685#47049
  173. DataBinding.ValueType = 'Integer'
  174. PropertiesClassName = 'TcxLabelProperties'
  175. Properties.Alignment.Horz = taRightJustify
  176. Properties.Alignment.Vert = taVCenter
  177. HeaderAlignmentHorz = taCenter
  178. HeaderAlignmentVert = vaCenter
  179. Options.Editing = False
  180. Width = 85
  181. end
  182. object Column05: TcxGridColumn
  183. Caption = #49549#46020
  184. PropertiesClassName = 'TcxLabelProperties'
  185. Properties.Alignment.Horz = taRightJustify
  186. Properties.Alignment.Vert = taVCenter
  187. HeaderAlignmentHorz = taCenter
  188. HeaderAlignmentVert = vaCenter
  189. Width = 66
  190. end
  191. object Column06: TcxGridColumn
  192. Caption = #54217#44512' '#51216#50976#50984
  193. PropertiesClassName = 'TcxLabelProperties'
  194. Properties.Alignment.Horz = taRightJustify
  195. Properties.Alignment.Vert = taVCenter
  196. HeaderAlignmentHorz = taCenter
  197. HeaderAlignmentVert = vaCenter
  198. Width = 75
  199. end
  200. object Column07: TcxGridColumn
  201. Caption = #52264#46160#49884#44036
  202. PropertiesClassName = 'TcxLabelProperties'
  203. Properties.Alignment.Horz = taRightJustify
  204. Properties.Alignment.Vert = taVCenter
  205. HeaderAlignmentHorz = taCenter
  206. HeaderAlignmentVert = vaCenter
  207. Width = 74
  208. end
  209. object Column08: TcxGridColumn
  210. Caption = #54217#44512' '#44600#51060
  211. PropertiesClassName = 'TcxLabelProperties'
  212. Properties.Alignment.Horz = taRightJustify
  213. Properties.Alignment.Vert = taVCenter
  214. HeaderAlignmentHorz = taCenter
  215. HeaderAlignmentVert = vaCenter
  216. Width = 71
  217. end
  218. end
  219. object GlList: TcxGridLevel
  220. GridView = TvList
  221. end
  222. end
  223. object ChkExpand: TcxCheckBox
  224. Tag = 9
  225. Left = 758
  226. Top = 7
  227. Cursor = crHandPoint
  228. Hint = #44536#47353' '#47785#47197' '#54869#51109' '#46608#45716' '#52712#49548
  229. Anchors = [akTop, akRight]
  230. Caption = #54869#51109'/'#52629#49548
  231. ParentBackground = False
  232. ParentColor = False
  233. ParentShowHint = False
  234. ShowHint = True
  235. State = cbsChecked
  236. Style.BorderColor = 9868950
  237. Style.BorderStyle = ebsThick
  238. Style.Color = 14671839
  239. Style.Shadow = False
  240. TabOrder = 0
  241. Transparent = True
  242. OnClick = ChkExpandClick
  243. Width = 85
  244. end
  245. end
  246. object ADOQry: TADOQuery
  247. Parameters = <>
  248. Left = 240
  249. Top = 148
  250. end
  251. object TmrShow: TTimer
  252. Enabled = False
  253. Interval = 300
  254. OnTimer = TmrShowTimer
  255. Left = 320
  256. Top = 156
  257. end
  258. end