FrmVmsLogSttsSubF.dfm 14 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509
  1. object FrmVmsLogSttsSub: TFrmVmsLogSttsSub
  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 = #51060#47141#51312#54924
  10. ClientHeight = 698
  11. ClientWidth = 1149
  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. OnDestroy = FormDestroy
  24. OnShow = FormShow
  25. ExplicitWidth = 320
  26. ExplicitHeight = 240
  27. PixelsPerInch = 96
  28. TextHeight = 17
  29. object PnlTop: TPanel
  30. Left = 0
  31. Top = 0
  32. Width = 1149
  33. Height = 34
  34. Align = alTop
  35. BevelOuter = bvNone
  36. TabOrder = 0
  37. DesignSize = (
  38. 1149
  39. 34)
  40. object LblSearch: TLabel
  41. Left = 20
  42. Top = 9
  43. Width = 52
  44. Height = 17
  45. Caption = #44160#49353#51312#44148
  46. Transparent = True
  47. end
  48. object ImgDesc01: TImage
  49. Left = 5
  50. Top = 12
  51. Width = 9
  52. Height = 9
  53. Transparent = True
  54. end
  55. object LblRecords: TLabel
  56. Left = 999
  57. Top = 9
  58. Width = 52
  59. Height = 17
  60. Alignment = taRightJustify
  61. Anchors = [akTop, akRight]
  62. Caption = #51312#54924#44148#49688
  63. Transparent = True
  64. ExplicitLeft = 588
  65. end
  66. object BtnExlSave: TcxButton
  67. Left = 1062
  68. Top = 5
  69. Width = 80
  70. Height = 25
  71. Cursor = crHandPoint
  72. Hint = #51312#54924' '#44208#44284' '#45936#51060#53552#47484' '#54028#51068#47196' '#51200#51109#54633#45768#45796'.'
  73. Anchors = [akTop, akRight]
  74. Caption = #51200#51109
  75. Colors.Default = 3893744
  76. TabOrder = 0
  77. Font.Charset = DEFAULT_CHARSET
  78. Font.Color = clWindowText
  79. Font.Height = -13
  80. Font.Name = #47569#51008' '#44256#46357
  81. Font.Style = [fsBold]
  82. ParentFont = False
  83. OnClick = BtnExlSaveClick
  84. end
  85. end
  86. object PnlList: TPanel
  87. Left = 0
  88. Top = 34
  89. Width = 1149
  90. Height = 664
  91. Align = alClient
  92. BevelOuter = bvNone
  93. TabOrder = 1
  94. DesignSize = (
  95. 1149
  96. 664)
  97. object ChkExpand: TcxCheckBox
  98. Tag = 9
  99. Left = 1035
  100. Top = 7
  101. Cursor = crHandPoint
  102. Hint = #44536#47353' '#47785#47197' '#54869#51109' '#46608#45716' '#52712#49548
  103. Anchors = [akTop, akRight]
  104. Caption = #54869#51109'/'#52629#49548
  105. ParentBackground = False
  106. ParentColor = False
  107. ParentShowHint = False
  108. ShowHint = True
  109. State = cbsChecked
  110. Style.BorderColor = 9868950
  111. Style.BorderStyle = ebsThick
  112. Style.Color = 14671839
  113. Style.Shadow = False
  114. TabOrder = 0
  115. Transparent = True
  116. OnClick = ChkExpandClick
  117. Width = 85
  118. end
  119. object CxList: TcxGrid
  120. Left = 0
  121. Top = 0
  122. Width = 1149
  123. Height = 664
  124. Align = alClient
  125. TabOrder = 1
  126. LockedStateImageOptions.Effect = lsieDark
  127. LockedStateImageOptions.ShowText = True
  128. LookAndFeel.NativeStyle = False
  129. object TvList: TcxGridBandedTableView
  130. FilterBox.CustomizeDialog = False
  131. DataController.Summary.DefaultGroupSummaryItems = <>
  132. DataController.Summary.FooterSummaryItems = <
  133. item
  134. Kind = skCount
  135. Column = Col02
  136. end
  137. item
  138. Column = Col03
  139. end
  140. item
  141. end
  142. item
  143. Column = Col04
  144. end>
  145. DataController.Summary.SummaryGroups = <>
  146. OptionsBehavior.CellHints = True
  147. OptionsCustomize.ColumnMoving = False
  148. OptionsCustomize.ColumnVertSizing = False
  149. OptionsData.CancelOnExit = False
  150. OptionsData.Deleting = False
  151. OptionsData.DeletingConfirmation = False
  152. OptionsData.Inserting = False
  153. OptionsSelection.HideFocusRectOnExit = False
  154. OptionsSelection.HideSelection = True
  155. OptionsView.GroupByBox = False
  156. OptionsView.Indicator = True
  157. Bands = <
  158. item
  159. Caption = 'VMS '#51221#48372
  160. Width = 374
  161. end
  162. item
  163. Caption = #53685#49888
  164. Width = 244
  165. end
  166. item
  167. Caption = #47784#46280
  168. Width = 160
  169. end
  170. item
  171. Caption = #54632#52404
  172. Width = 333
  173. end
  174. item
  175. Caption = #47784#46280'/'#51204#50896' '#44060#48324#49345#53468
  176. Visible = False
  177. VisibleForCustomization = False
  178. Width = 359
  179. end>
  180. object Col01: TcxGridBandedColumn
  181. Caption = #48264#54840
  182. PropertiesClassName = 'TcxTextEditProperties'
  183. Properties.Alignment.Horz = taCenter
  184. Properties.Alignment.Vert = taVCenter
  185. HeaderAlignmentHorz = taCenter
  186. HeaderAlignmentVert = vaCenter
  187. Options.Editing = False
  188. Width = 69
  189. Position.BandIndex = 0
  190. Position.ColIndex = 0
  191. Position.RowIndex = 0
  192. end
  193. object Col02: TcxGridBandedColumn
  194. Caption = 'VMS ID'
  195. PropertiesClassName = 'TcxTextEditProperties'
  196. Properties.Alignment.Horz = taCenter
  197. Properties.Alignment.Vert = taVCenter
  198. HeaderAlignmentHorz = taCenter
  199. HeaderAlignmentVert = vaCenter
  200. Options.Editing = False
  201. Width = 96
  202. Position.BandIndex = 0
  203. Position.ColIndex = 1
  204. Position.RowIndex = 0
  205. end
  206. object Col03: TcxGridBandedColumn
  207. Caption = 'VMS '#47749#52845
  208. PropertiesClassName = 'TcxTextEditProperties'
  209. Properties.Alignment.Horz = taLeftJustify
  210. Properties.Alignment.Vert = taVCenter
  211. HeaderAlignmentHorz = taCenter
  212. HeaderAlignmentVert = vaCenter
  213. Options.Editing = False
  214. Width = 217
  215. Position.BandIndex = 0
  216. Position.ColIndex = 2
  217. Position.RowIndex = 0
  218. end
  219. object Col04: TcxGridBandedColumn
  220. Tag = 1
  221. Caption = #49688#51665#49884#44033
  222. PropertiesClassName = 'TcxTextEditProperties'
  223. Properties.Alignment.Horz = taCenter
  224. Properties.Alignment.Vert = taVCenter
  225. HeaderAlignmentHorz = taCenter
  226. HeaderAlignmentVert = vaCenter
  227. Options.Editing = False
  228. Width = 150
  229. Position.BandIndex = 1
  230. Position.ColIndex = 0
  231. Position.RowIndex = 0
  232. end
  233. object Col05: TcxGridBandedColumn
  234. Caption = #53685#49888
  235. PropertiesClassName = 'TcxTextEditProperties'
  236. Properties.Alignment.Horz = taCenter
  237. Properties.Alignment.Vert = taVCenter
  238. OnCustomDrawCell = Col05CustomDrawCell
  239. HeaderAlignmentHorz = taCenter
  240. HeaderAlignmentVert = vaCenter
  241. Options.Editing = False
  242. Width = 55
  243. Position.BandIndex = 1
  244. Position.ColIndex = 1
  245. Position.RowIndex = 0
  246. end
  247. object Col11: TcxGridBandedColumn
  248. Caption = #47784#46280#49345#53468
  249. PropertiesClassName = 'TcxTextEditProperties'
  250. Properties.Alignment.Horz = taCenter
  251. Properties.Alignment.Vert = taVCenter
  252. Visible = False
  253. OnCustomDrawCell = Col05CustomDrawCell
  254. HeaderAlignmentHorz = taCenter
  255. HeaderAlignmentVert = vaCenter
  256. Options.Editing = False
  257. VisibleForCustomization = False
  258. Position.BandIndex = 2
  259. Position.ColIndex = 0
  260. Position.RowIndex = 0
  261. end
  262. object Col12: TcxGridBandedColumn
  263. Caption = #51204#50896#49345#53468
  264. PropertiesClassName = 'TcxTextEditProperties'
  265. Properties.Alignment.Horz = taCenter
  266. Properties.Alignment.Vert = taVCenter
  267. OnCustomDrawCell = Col12CustomDrawCell
  268. HeaderAlignmentHorz = taCenter
  269. HeaderAlignmentVert = vaCenter
  270. Options.Editing = False
  271. Position.BandIndex = 2
  272. Position.ColIndex = 1
  273. Position.RowIndex = 0
  274. end
  275. object Col13: TcxGridBandedColumn
  276. Caption = #54868#47732#55064#46020
  277. PropertiesClassName = 'TcxTextEditProperties'
  278. Properties.Alignment.Horz = taCenter
  279. Properties.Alignment.Vert = taVCenter
  280. Visible = False
  281. HeaderAlignmentHorz = taCenter
  282. HeaderAlignmentVert = vaCenter
  283. Options.Editing = False
  284. VisibleForCustomization = False
  285. Position.BandIndex = 3
  286. Position.ColIndex = 4
  287. Position.RowIndex = 0
  288. end
  289. object Col14: TcxGridBandedColumn
  290. Caption = #46020#50612
  291. PropertiesClassName = 'TcxTextEditProperties'
  292. Properties.Alignment.Horz = taCenter
  293. Properties.Alignment.Vert = taVCenter
  294. OnCustomDrawCell = Col05CustomDrawCell
  295. HeaderAlignmentHorz = taCenter
  296. HeaderAlignmentVert = vaCenter
  297. Options.Editing = False
  298. Width = 60
  299. Position.BandIndex = 3
  300. Position.ColIndex = 0
  301. Position.RowIndex = 0
  302. end
  303. object Col15: TcxGridBandedColumn
  304. Caption = #54060#49345#53468
  305. PropertiesClassName = 'TcxTextEditProperties'
  306. Properties.Alignment.Horz = taCenter
  307. Properties.Alignment.Vert = taVCenter
  308. OnCustomDrawCell = Col05CustomDrawCell
  309. HeaderAlignmentHorz = taCenter
  310. HeaderAlignmentVert = vaCenter
  311. Options.Editing = False
  312. Width = 53
  313. Position.BandIndex = 3
  314. Position.ColIndex = 1
  315. Position.RowIndex = 0
  316. end
  317. object Col16: TcxGridBandedColumn
  318. Caption = #55176#53552#49345#53468
  319. PropertiesClassName = 'TcxTextEditProperties'
  320. Properties.Alignment.Horz = taCenter
  321. Properties.Alignment.Vert = taVCenter
  322. OnCustomDrawCell = Col05CustomDrawCell
  323. HeaderAlignmentHorz = taCenter
  324. HeaderAlignmentVert = vaCenter
  325. Options.Editing = False
  326. Width = 60
  327. Position.BandIndex = 3
  328. Position.ColIndex = 2
  329. Position.RowIndex = 0
  330. end
  331. object Col17: TcxGridBandedColumn
  332. Caption = #50728#46020
  333. PropertiesClassName = 'TcxTextEditProperties'
  334. Properties.Alignment.Horz = taCenter
  335. Properties.Alignment.Vert = taVCenter
  336. OnCustomDrawCell = Col17CustomDrawCell
  337. HeaderAlignmentHorz = taCenter
  338. HeaderAlignmentVert = vaCenter
  339. Options.Editing = False
  340. Width = 57
  341. Position.BandIndex = 3
  342. Position.ColIndex = 3
  343. Position.RowIndex = 0
  344. end
  345. object Col22: TcxGridBandedColumn
  346. Caption = #47784#46280
  347. PropertiesClassName = 'TcxTextEditProperties'
  348. Properties.Alignment.Horz = taCenter
  349. Properties.Alignment.Vert = taVCenter
  350. OnCustomDrawCell = Col05CustomDrawCell
  351. HeaderAlignmentHorz = taCenter
  352. HeaderAlignmentVert = vaCenter
  353. Options.Editing = False
  354. Width = 256
  355. Position.BandIndex = 4
  356. Position.ColIndex = 0
  357. Position.RowIndex = 0
  358. end
  359. object Col23: TcxGridBandedColumn
  360. Caption = #51204#50896
  361. PropertiesClassName = 'TcxTextEditProperties'
  362. Properties.Alignment.Horz = taCenter
  363. Properties.Alignment.Vert = taVCenter
  364. OnCustomDrawCell = Col05CustomDrawCell
  365. HeaderAlignmentHorz = taCenter
  366. HeaderAlignmentVert = vaCenter
  367. Options.Editing = False
  368. Width = 103
  369. Position.BandIndex = 4
  370. Position.ColIndex = 1
  371. Position.RowIndex = 0
  372. end
  373. object Col24: TcxGridBandedColumn
  374. Caption = #51204#44305#54032
  375. PropertiesClassName = 'TcxTextEditProperties'
  376. Properties.Alignment.Horz = taCenter
  377. Properties.Alignment.Vert = taVCenter
  378. OnCustomDrawCell = Col12CustomDrawCell
  379. HeaderAlignmentHorz = taCenter
  380. HeaderAlignmentVert = vaCenter
  381. Options.Editing = False
  382. Position.BandIndex = 2
  383. Position.ColIndex = 2
  384. Position.RowIndex = 0
  385. end
  386. end
  387. object GlList: TcxGridLevel
  388. GridView = TvList
  389. end
  390. end
  391. end
  392. object lblText1: TcxLabel
  393. Left = 141
  394. Top = 349
  395. Caption = #51312#54924#44208#44284#44032' '#50630#49845#45768#45796'.'
  396. Transparent = True
  397. Visible = False
  398. end
  399. object lblText2: TcxLabel
  400. Left = 141
  401. Top = 376
  402. Caption = #44160#49353#44592#44036': '
  403. Transparent = True
  404. Visible = False
  405. end
  406. object lblSucc: TcxLabel
  407. Left = 141
  408. Top = 403
  409. Caption = #49457#44277
  410. Transparent = True
  411. Visible = False
  412. end
  413. object lblFai: TcxLabel
  414. Left = 141
  415. Top = 430
  416. Caption = #49892#54056
  417. Transparent = True
  418. Visible = False
  419. end
  420. object lblCnt: TcxLabel
  421. Left = 141
  422. Top = 457
  423. Caption = ' '#44148
  424. Transparent = True
  425. Visible = False
  426. end
  427. object lblMOS0: TcxLabel
  428. Left = 413
  429. Top = 189
  430. Caption = #51221#49345
  431. Transparent = True
  432. Visible = False
  433. end
  434. object lblMOS1: TcxLabel
  435. Left = 413
  436. Top = 204
  437. Caption = #51109#50528
  438. Transparent = True
  439. Visible = False
  440. end
  441. object lblPWS0: TcxLabel
  442. Left = 413
  443. Top = 220
  444. Caption = #53020#51664
  445. Transparent = True
  446. Visible = False
  447. end
  448. object lblPWS1: TcxLabel
  449. Left = 413
  450. Top = 236
  451. Caption = #44732#51664
  452. Transparent = True
  453. Visible = False
  454. end
  455. object lblCDS0: TcxLabel
  456. Left = 413
  457. Top = 252
  458. Caption = #45803#55192
  459. Transparent = True
  460. Visible = False
  461. end
  462. object lblCDS1: TcxLabel
  463. Left = 413
  464. Top = 268
  465. Caption = #50676#47548
  466. Transparent = True
  467. Visible = False
  468. end
  469. object lblPAS0: TcxLabel
  470. Left = 413
  471. Top = 284
  472. Caption = #46041#51089
  473. Transparent = True
  474. Visible = False
  475. end
  476. object lblPAS1: TcxLabel
  477. Left = 413
  478. Top = 300
  479. Caption = #51221#51648
  480. Transparent = True
  481. Visible = False
  482. end
  483. object lblHTS0: TcxLabel
  484. Left = 413
  485. Top = 316
  486. Caption = #44032#46041
  487. Transparent = True
  488. Visible = False
  489. end
  490. object lblHTS1: TcxLabel
  491. Left = 413
  492. Top = 333
  493. Caption = #51473#51648
  494. Transparent = True
  495. Visible = False
  496. end
  497. object ADOQry: TADOQuery
  498. Parameters = <>
  499. Left = 240
  500. Top = 148
  501. end
  502. object TmrShow: TTimer
  503. Enabled = False
  504. Interval = 300
  505. OnTimer = TmrShowTimer
  506. Left = 320
  507. Top = 156
  508. end
  509. end