VDSH0101F.dfm 11 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379
  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 Column04: TcxGridColumn
  168. Caption = #54632#52404#47928
  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 Column12: TcxGridColumn
  181. Caption = #50526#47928
  182. PropertiesClassName = 'TcxLabelProperties'
  183. Properties.Alignment.Horz = taCenter
  184. Properties.Alignment.Vert = taVCenter
  185. OnCustomDrawCell = Column02CustomDrawCell
  186. HeaderAlignmentHorz = taCenter
  187. HeaderAlignmentVert = vaCenter
  188. end
  189. object Column13: TcxGridColumn
  190. Caption = #46263#47928
  191. PropertiesClassName = 'TcxLabelProperties'
  192. Properties.Alignment.Horz = taCenter
  193. Properties.Alignment.Vert = taVCenter
  194. OnCustomDrawCell = Column02CustomDrawCell
  195. HeaderAlignmentHorz = taCenter
  196. HeaderAlignmentVert = vaCenter
  197. end
  198. object Column03: TcxGridColumn
  199. Caption = #51204#50896
  200. PropertiesClassName = 'TcxLabelProperties'
  201. Properties.Alignment.Horz = taCenter
  202. Properties.Alignment.Vert = taVCenter
  203. Visible = False
  204. OnCustomDrawCell = Column02CustomDrawCell
  205. HeaderAlignmentHorz = taCenter
  206. HeaderAlignmentVert = vaCenter
  207. Options.Editing = False
  208. VisibleForCustomization = False
  209. Width = 95
  210. end
  211. object Column05: TcxGridColumn
  212. Caption = #54060
  213. PropertiesClassName = 'TcxLabelProperties'
  214. Properties.Alignment.Horz = taCenter
  215. Properties.Alignment.Vert = taVCenter
  216. OnCustomDrawCell = Column02CustomDrawCell
  217. HeaderAlignmentHorz = taCenter
  218. HeaderAlignmentVert = vaCenter
  219. Width = 95
  220. end
  221. object Column06: TcxGridColumn
  222. Caption = #55176#53552
  223. PropertiesClassName = 'TcxLabelProperties'
  224. Properties.Alignment.Horz = taCenter
  225. Properties.Alignment.Vert = taVCenter
  226. OnCustomDrawCell = Column02CustomDrawCell
  227. HeaderAlignmentHorz = taCenter
  228. HeaderAlignmentVert = vaCenter
  229. Width = 95
  230. end
  231. object Column08: TcxGridColumn
  232. Caption = #48512#51228#50612#44592#44050
  233. PropertiesClassName = 'TcxLabelProperties'
  234. Properties.Alignment.Horz = taRightJustify
  235. Properties.Alignment.Vert = taVCenter
  236. Visible = False
  237. OnCustomDrawCell = Column02CustomDrawCell
  238. HeaderAlignmentHorz = taCenter
  239. HeaderAlignmentVert = vaCenter
  240. Width = 95
  241. end
  242. object Column10: TcxGridColumn
  243. Caption = #54632#52404#50728#46020
  244. PropertiesClassName = 'TcxLabelProperties'
  245. Properties.Alignment.Horz = taRightJustify
  246. Properties.Alignment.Vert = taVCenter
  247. HeaderAlignmentHorz = taCenter
  248. HeaderAlignmentVert = vaCenter
  249. end
  250. object Column07: TcxGridColumn
  251. Caption = #48708#46356#50724' '#51077#47141
  252. PropertiesClassName = 'TcxLabelProperties'
  253. Properties.Alignment.Horz = taCenter
  254. Properties.Alignment.Vert = taVCenter
  255. Visible = False
  256. OnCustomDrawCell = Column02CustomDrawCell
  257. HeaderAlignmentHorz = taCenter
  258. HeaderAlignmentVert = vaCenter
  259. VisibleForCustomization = False
  260. Width = 95
  261. end
  262. end
  263. object GlList: TcxGridLevel
  264. GridView = TvList
  265. end
  266. end
  267. object ChkExpand: TcxCheckBox
  268. Tag = 9
  269. Left = 1025
  270. Top = 7
  271. Cursor = crHandPoint
  272. Hint = #44536#47353' '#47785#47197' '#54869#51109' '#46608#45716' '#52712#49548
  273. Anchors = [akTop, akRight]
  274. Caption = #54869#51109'/'#52629#49548
  275. ParentBackground = False
  276. ParentColor = False
  277. ParentShowHint = False
  278. ShowHint = True
  279. State = cbsChecked
  280. Style.BorderColor = 9868950
  281. Style.BorderStyle = ebsThick
  282. Style.Color = 14671839
  283. Style.Shadow = False
  284. TabOrder = 0
  285. Transparent = True
  286. OnClick = ChkExpandClick
  287. Width = 85
  288. end
  289. end
  290. object lblMOS0: TcxLabel
  291. Left = 413
  292. Top = 189
  293. Caption = #51221#49345
  294. Transparent = True
  295. Visible = False
  296. end
  297. object lblMOS1: TcxLabel
  298. Left = 413
  299. Top = 204
  300. Caption = #51109#50528
  301. Transparent = True
  302. Visible = False
  303. end
  304. object lblPWS0: TcxLabel
  305. Left = 413
  306. Top = 220
  307. Caption = #53020#51664
  308. Transparent = True
  309. Visible = False
  310. end
  311. object lblPWS1: TcxLabel
  312. Left = 413
  313. Top = 236
  314. Caption = #44732#51664
  315. Transparent = True
  316. Visible = False
  317. end
  318. object lblCDS0: TcxLabel
  319. Left = 413
  320. Top = 252
  321. Caption = #45803#55192
  322. Transparent = True
  323. Visible = False
  324. end
  325. object lblCDS1: TcxLabel
  326. Left = 413
  327. Top = 268
  328. Caption = #50676#47548
  329. Transparent = True
  330. Visible = False
  331. end
  332. object lblPAS0: TcxLabel
  333. Left = 413
  334. Top = 284
  335. Caption = #46041#51089
  336. Transparent = True
  337. Visible = False
  338. end
  339. object lblPAS1: TcxLabel
  340. Left = 413
  341. Top = 300
  342. Caption = #51221#51648
  343. Transparent = True
  344. Visible = False
  345. end
  346. object lblHTS0: TcxLabel
  347. Left = 413
  348. Top = 316
  349. Caption = #44032#46041
  350. Transparent = True
  351. Visible = False
  352. end
  353. object lblHTS1: TcxLabel
  354. Left = 413
  355. Top = 333
  356. Caption = #51473#51648
  357. Transparent = True
  358. Visible = False
  359. end
  360. object lblUnknown: TcxLabel
  361. Left = 413
  362. Top = 360
  363. Caption = '?'
  364. Transparent = True
  365. Visible = False
  366. end
  367. object ADOQry: TADOQuery
  368. Parameters = <>
  369. Left = 240
  370. Top = 148
  371. end
  372. object TmrShow: TTimer
  373. Enabled = False
  374. Interval = 300
  375. OnTimer = TmrShowTimer
  376. Left = 320
  377. Top = 156
  378. end
  379. end