VMS0400MF.dfm 30 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992993994995996997998999100010011002100310041005100610071008100910101011101210131014101510161017101810191020
  1. object VMS0400M: TVMS0400M
  2. Left = 0
  3. Top = 0
  4. HorzScrollBar.Visible = False
  5. VertScrollBar.Visible = False
  6. Caption = 'VMS '#54268' '#44288#47532
  7. ClientHeight = 780
  8. ClientWidth = 1130
  9. Color = clBtnFace
  10. Constraints.MinHeight = 600
  11. Constraints.MinWidth = 900
  12. DoubleBuffered = True
  13. Font.Charset = DEFAULT_CHARSET
  14. Font.Color = clWindowText
  15. Font.Height = -13
  16. Font.Name = #47569#51008' '#44256#46357
  17. Font.Style = []
  18. KeyPreview = True
  19. OldCreateOrder = False
  20. Position = poDesktopCenter
  21. ShowHint = True
  22. DesignSize = (
  23. 1130
  24. 780)
  25. PixelsPerInch = 96
  26. TextHeight = 17
  27. object ShpTitle: TShape
  28. Left = 4
  29. Top = 4
  30. Width = 1122
  31. Height = 40
  32. Anchors = [akLeft, akTop, akRight]
  33. Brush.Color = 14671839
  34. Pen.Color = 10849679
  35. Pen.Width = 2
  36. ExplicitWidth = 1269
  37. end
  38. object LblCaption: TLabel
  39. Left = 16
  40. Top = 10
  41. Width = 267
  42. Height = 23
  43. Caption = #53440#51060#53952' '
  44. Font.Charset = DEFAULT_CHARSET
  45. Font.Color = 4740964
  46. Font.Height = -17
  47. Font.Name = #47569#51008' '#44256#46357
  48. Font.Style = [fsBold]
  49. ParentFont = False
  50. ParentShowHint = False
  51. ShowHint = True
  52. end
  53. object ShpList: TShape
  54. Left = 4
  55. Top = 50
  56. Width = 1122
  57. Height = 377
  58. Anchors = [akLeft, akTop, akRight, akBottom]
  59. Pen.Color = 10849679
  60. Pen.Width = 2
  61. ExplicitWidth = 1313
  62. ExplicitHeight = 359
  63. end
  64. object ShpInfo: TShape
  65. Left = 4
  66. Top = 433
  67. Width = 1122
  68. Height = 305
  69. Anchors = [akLeft, akRight, akBottom]
  70. Brush.Color = 14671839
  71. Pen.Color = 10849679
  72. Pen.Width = 2
  73. ExplicitTop = 415
  74. ExplicitWidth = 1313
  75. end
  76. object BtnSearch: TcxButton
  77. Left = 952
  78. Top = 11
  79. Width = 75
  80. Height = 25
  81. Cursor = crHandPoint
  82. Hint = #51312#54924
  83. Anchors = [akTop, akRight]
  84. Caption = #51312#54924
  85. Colors.Default = 10737865
  86. LookAndFeel.NativeStyle = False
  87. TabOrder = 0
  88. Font.Charset = DEFAULT_CHARSET
  89. Font.Color = clBlack
  90. Font.Height = -13
  91. Font.Name = #47569#51008' '#44256#46357
  92. Font.Style = [fsBold]
  93. ParentFont = False
  94. ExplicitLeft = 906
  95. end
  96. object BtnClose: TcxButton
  97. Left = 1041
  98. Top = 11
  99. Width = 75
  100. Height = 25
  101. Cursor = crHandPoint
  102. Hint = #45803#44592
  103. Anchors = [akTop, akRight]
  104. Caption = #45803#44592
  105. Colors.Default = 10737865
  106. LookAndFeel.NativeStyle = False
  107. TabOrder = 1
  108. Font.Charset = DEFAULT_CHARSET
  109. Font.Color = clBlack
  110. Font.Height = -13
  111. Font.Name = #47569#51008' '#44256#46357
  112. Font.Style = [fsBold]
  113. ParentFont = False
  114. OnClick = BtnCloseClick
  115. ExplicitLeft = 995
  116. end
  117. object BtnSave: TcxButton
  118. Tag = 1
  119. Left = 687
  120. Top = 747
  121. Width = 75
  122. Height = 25
  123. Cursor = crHandPoint
  124. Hint = #51200#51109
  125. Anchors = [akRight, akBottom]
  126. Caption = #51200#51109
  127. Colors.Default = 10737865
  128. LookAndFeel.NativeStyle = False
  129. TabOrder = 2
  130. Font.Charset = DEFAULT_CHARSET
  131. Font.Color = clBlack
  132. Font.Height = -13
  133. Font.Name = #47569#51008' '#44256#46357
  134. Font.Style = [fsBold]
  135. ParentFont = False
  136. ExplicitLeft = 641
  137. ExplicitTop = 739
  138. end
  139. object BtnInsert: TcxButton
  140. Tag = 2
  141. Left = 865
  142. Top = 747
  143. Width = 75
  144. Height = 25
  145. Cursor = crHandPoint
  146. Hint = #46321#47197
  147. Anchors = [akRight, akBottom]
  148. Caption = #46321#47197
  149. Colors.Default = 10737865
  150. LookAndFeel.NativeStyle = False
  151. TabOrder = 3
  152. Font.Charset = DEFAULT_CHARSET
  153. Font.Color = clBlack
  154. Font.Height = -13
  155. Font.Name = #47569#51008' '#44256#46357
  156. Font.Style = [fsBold]
  157. ParentFont = False
  158. ExplicitLeft = 819
  159. ExplicitTop = 739
  160. end
  161. object BtnDelete: TcxButton
  162. Tag = 4
  163. Left = 1041
  164. Top = 747
  165. Width = 75
  166. Height = 25
  167. Cursor = crHandPoint
  168. Hint = #49325#51228
  169. Anchors = [akRight, akBottom]
  170. Caption = #49325#51228
  171. Colors.Default = 10737865
  172. LookAndFeel.NativeStyle = False
  173. TabOrder = 4
  174. Font.Charset = DEFAULT_CHARSET
  175. Font.Color = clBlack
  176. Font.Height = -13
  177. Font.Name = #47569#51008' '#44256#46357
  178. Font.Style = [fsBold]
  179. ParentFont = False
  180. ExplicitLeft = 995
  181. ExplicitTop = 739
  182. end
  183. object BtnEdit: TcxButton
  184. Tag = 3
  185. Left = 952
  186. Top = 747
  187. Width = 75
  188. Height = 25
  189. Cursor = crHandPoint
  190. Hint = #49688#51221
  191. Anchors = [akRight, akBottom]
  192. Caption = #49688#51221
  193. Colors.Default = 10737865
  194. LookAndFeel.NativeStyle = False
  195. TabOrder = 5
  196. Font.Charset = DEFAULT_CHARSET
  197. Font.Color = clBlack
  198. Font.Height = -13
  199. Font.Name = #47569#51008' '#44256#46357
  200. Font.Style = [fsBold]
  201. ParentFont = False
  202. ExplicitLeft = 906
  203. ExplicitTop = 739
  204. end
  205. object BtnCancel: TcxButton
  206. Tag = 5
  207. Left = 777
  208. Top = 747
  209. Width = 75
  210. Height = 25
  211. Cursor = crHandPoint
  212. Hint = #52712#49548
  213. Anchors = [akRight, akBottom]
  214. Caption = #52712#49548
  215. Colors.Default = 10737865
  216. LookAndFeel.NativeStyle = False
  217. TabOrder = 6
  218. Font.Charset = DEFAULT_CHARSET
  219. Font.Color = clBlack
  220. Font.Height = -13
  221. Font.Name = #47569#51008' '#44256#46357
  222. Font.Style = [fsBold]
  223. ParentFont = False
  224. ExplicitLeft = 731
  225. ExplicitTop = 739
  226. end
  227. object PnlInfo: TPanel
  228. Left = 8
  229. Top = 441
  230. Width = 1113
  231. Height = 291
  232. Anchors = [akLeft, akRight, akBottom]
  233. BevelOuter = bvNone
  234. Color = clGradientActiveCaption
  235. ParentBackground = False
  236. TabOrder = 7
  237. ExplicitTop = 433
  238. ExplicitWidth = 1067
  239. DesignSize = (
  240. 1113
  241. 291)
  242. object cxGroupBox1: TcxGroupBox
  243. Left = 5
  244. Top = 7
  245. Anchors = [akLeft, akTop, akRight, akBottom]
  246. Caption = #54268' '#44592#48376#51221#48372
  247. ParentFont = False
  248. Style.BorderColor = clCaptionText
  249. Style.Font.Charset = DEFAULT_CHARSET
  250. Style.Font.Color = clWindowText
  251. Style.Font.Height = -13
  252. Style.Font.Name = #47569#51008' '#44256#46357
  253. Style.Font.Style = []
  254. Style.LookAndFeel.Kind = lfUltraFlat
  255. Style.LookAndFeel.NativeStyle = False
  256. Style.Shadow = False
  257. Style.TextColor = clRed
  258. Style.TextStyle = [fsBold]
  259. Style.IsFontAssigned = True
  260. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  261. StyleDisabled.LookAndFeel.NativeStyle = False
  262. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  263. StyleFocused.LookAndFeel.NativeStyle = False
  264. StyleHot.LookAndFeel.Kind = lfUltraFlat
  265. StyleHot.LookAndFeel.NativeStyle = False
  266. TabOrder = 0
  267. ExplicitWidth = 1057
  268. DesignSize = (
  269. 1103
  270. 279)
  271. Height = 279
  272. Width = 1103
  273. object ImgDesc01: TImage
  274. Left = 10
  275. Top = 27
  276. Width = 9
  277. Height = 9
  278. Transparent = True
  279. end
  280. object Label1: TLabel
  281. Left = 27
  282. Top = 23
  283. Width = 58
  284. Height = 17
  285. Caption = 'VMS '#53356#44592
  286. end
  287. object Label3: TLabel
  288. Left = 27
  289. Top = 55
  290. Width = 31
  291. Height = 17
  292. Caption = #54268' ID'
  293. Color = clWindowText
  294. ParentColor = False
  295. Transparent = True
  296. end
  297. object ImgDesc03: TImage
  298. Left = 10
  299. Top = 59
  300. Width = 9
  301. Height = 9
  302. Transparent = True
  303. end
  304. object ImgDesc06: TImage
  305. Left = 10
  306. Top = 123
  307. Width = 9
  308. Height = 9
  309. Transparent = True
  310. end
  311. object Label35: TLabel
  312. Left = 27
  313. Top = 119
  314. Width = 44
  315. Height = 17
  316. Caption = #54268' '#47749#52845
  317. Transparent = True
  318. end
  319. object ImgDesc04: TImage
  320. Left = 10
  321. Top = 91
  322. Width = 9
  323. Height = 9
  324. Transparent = True
  325. end
  326. object Label2: TLabel
  327. Left = 27
  328. Top = 87
  329. Width = 44
  330. Height = 17
  331. Caption = #54268' '#50976#54805
  332. Transparent = True
  333. end
  334. object Label4: TLabel
  335. Left = 27
  336. Top = 151
  337. Width = 73
  338. Height = 17
  339. Caption = #54364#52636#49884#44036'('#52488')'
  340. Transparent = True
  341. end
  342. object ImgDesc05: TImage
  343. Left = 10
  344. Top = 155
  345. Width = 9
  346. Height = 9
  347. Transparent = True
  348. end
  349. object ImgDesc07: TImage
  350. Left = 10
  351. Top = 187
  352. Width = 9
  353. Height = 9
  354. Transparent = True
  355. end
  356. object Label5: TLabel
  357. Left = 27
  358. Top = 183
  359. Width = 52
  360. Height = 17
  361. Caption = #54364#52636#47784#46300
  362. Color = clWindowText
  363. ParentColor = False
  364. Transparent = True
  365. end
  366. object Label7: TLabel
  367. Left = 27
  368. Top = 213
  369. Width = 52
  370. Height = 17
  371. Caption = #54364#52636#48169#54693
  372. Color = clWindowText
  373. ParentColor = False
  374. Transparent = True
  375. end
  376. object ImgDesc08: TImage
  377. Left = 10
  378. Top = 217
  379. Width = 9
  380. Height = 9
  381. Transparent = True
  382. end
  383. object ImgDesc09: TImage
  384. Left = 10
  385. Top = 247
  386. Width = 9
  387. Height = 9
  388. Transparent = True
  389. end
  390. object Label8: TLabel
  391. Left = 27
  392. Top = 243
  393. Width = 44
  394. Height = 17
  395. Caption = #54268' '#49444#47749
  396. Color = clWindowText
  397. ParentColor = False
  398. Transparent = True
  399. end
  400. object ImgDesc10: TImage
  401. Left = 230
  402. Top = 155
  403. Width = 9
  404. Height = 9
  405. Transparent = True
  406. end
  407. object Label9: TLabel
  408. Left = 247
  409. Top = 151
  410. Width = 52
  411. Height = 17
  412. Caption = #48176#44221#49353#49345
  413. Color = clWindowText
  414. ParentColor = False
  415. Transparent = True
  416. end
  417. object Label10: TLabel
  418. Left = 505
  419. Top = 23
  420. Width = 70
  421. Height = 17
  422. Caption = #54268' '#48120#47532#48372#44592
  423. Color = clWindowText
  424. ParentColor = False
  425. Transparent = True
  426. end
  427. object ImgDesc11: TImage
  428. Left = 488
  429. Top = 27
  430. Width = 9
  431. Height = 9
  432. Transparent = True
  433. end
  434. object Label11: TLabel
  435. Left = 301
  436. Top = 23
  437. Width = 26
  438. Height = 17
  439. Caption = #45331#51060
  440. end
  441. object Label12: TLabel
  442. Left = 388
  443. Top = 23
  444. Width = 26
  445. Height = 17
  446. Caption = #45458#51060
  447. end
  448. object EdID: TcxTextEdit
  449. Left = 118
  450. Top = 53
  451. ImeMode = imSAlpha
  452. Properties.Alignment.Horz = taCenter
  453. Properties.Alignment.Vert = taVCenter
  454. Properties.ImeMode = imSAlpha
  455. Properties.MaxLength = 10
  456. Properties.ReadOnly = False
  457. Style.LookAndFeel.Kind = lfUltraFlat
  458. Style.LookAndFeel.NativeStyle = False
  459. Style.Shadow = False
  460. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  461. StyleDisabled.LookAndFeel.NativeStyle = False
  462. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  463. StyleFocused.LookAndFeel.NativeStyle = False
  464. StyleHot.LookAndFeel.Kind = lfUltraFlat
  465. StyleHot.LookAndFeel.NativeStyle = False
  466. TabOrder = 0
  467. Text = 'L17U123456'
  468. Width = 114
  469. end
  470. object EdFormName: TcxTextEdit
  471. Left = 118
  472. Top = 115
  473. Properties.Alignment.Vert = taVCenter
  474. Properties.MaxLength = 0
  475. Properties.ReadOnly = False
  476. Style.LookAndFeel.Kind = lfUltraFlat
  477. Style.LookAndFeel.NativeStyle = False
  478. Style.Shadow = False
  479. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  480. StyleDisabled.LookAndFeel.NativeStyle = False
  481. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  482. StyleFocused.LookAndFeel.NativeStyle = False
  483. StyleFocused.TextStyle = [fsBold]
  484. StyleHot.LookAndFeel.Kind = lfUltraFlat
  485. StyleHot.LookAndFeel.NativeStyle = False
  486. TabOrder = 1
  487. Width = 350
  488. end
  489. object EdFormDesc: TcxTextEdit
  490. Left = 118
  491. Top = 241
  492. Properties.Alignment.Vert = taVCenter
  493. Properties.MaxLength = 0
  494. Properties.ReadOnly = False
  495. Style.LookAndFeel.Kind = lfUltraFlat
  496. Style.LookAndFeel.NativeStyle = False
  497. Style.Shadow = False
  498. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  499. StyleDisabled.LookAndFeel.NativeStyle = False
  500. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  501. StyleFocused.LookAndFeel.NativeStyle = False
  502. StyleFocused.TextStyle = [fsBold]
  503. StyleHot.LookAndFeel.Kind = lfUltraFlat
  504. StyleHot.LookAndFeel.NativeStyle = False
  505. TabOrder = 2
  506. Width = 350
  507. end
  508. object PnlPreview: TPanel
  509. Left = 488
  510. Top = 46
  511. Width = 605
  512. Height = 224
  513. Anchors = [akLeft, akRight, akBottom]
  514. BevelOuter = bvNone
  515. Color = clMenuHighlight
  516. ParentBackground = False
  517. TabOrder = 3
  518. ExplicitWidth = 559
  519. object PnlBack: TPanel
  520. Left = 5
  521. Top = 5
  522. Width = 271
  523. Height = 73
  524. BevelInner = bvLowered
  525. Caption = 'PnlForm'
  526. Color = clSilver
  527. ParentBackground = False
  528. TabOrder = 0
  529. object PnlForm: TPanel
  530. Left = 2
  531. Top = 2
  532. Width = 267
  533. Height = 69
  534. Align = alClient
  535. BevelOuter = bvNone
  536. Caption = 'PnlForm'
  537. Color = clBlack
  538. ParentBackground = False
  539. TabOrder = 0
  540. end
  541. end
  542. end
  543. object EdWidth: TcxTextEdit
  544. Left = 331
  545. Top = 22
  546. Enabled = False
  547. Properties.Alignment.Horz = taRightJustify
  548. Properties.Alignment.Vert = taVCenter
  549. Properties.MaxLength = 30
  550. Properties.ReadOnly = True
  551. Style.LookAndFeel.Kind = lfUltraFlat
  552. Style.LookAndFeel.NativeStyle = False
  553. Style.Shadow = False
  554. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  555. StyleDisabled.LookAndFeel.NativeStyle = False
  556. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  557. StyleFocused.LookAndFeel.NativeStyle = False
  558. StyleHot.LookAndFeel.Kind = lfUltraFlat
  559. StyleHot.LookAndFeel.NativeStyle = False
  560. TabOrder = 4
  561. Text = '384'
  562. Width = 50
  563. end
  564. object EdHeight: TcxTextEdit
  565. Left = 418
  566. Top = 22
  567. Enabled = False
  568. Properties.Alignment.Horz = taRightJustify
  569. Properties.Alignment.Vert = taVCenter
  570. Properties.MaxLength = 30
  571. Properties.ReadOnly = True
  572. Style.LookAndFeel.Kind = lfUltraFlat
  573. Style.LookAndFeel.NativeStyle = False
  574. Style.Shadow = False
  575. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  576. StyleDisabled.LookAndFeel.NativeStyle = False
  577. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  578. StyleFocused.LookAndFeel.NativeStyle = False
  579. StyleHot.LookAndFeel.Kind = lfUltraFlat
  580. StyleHot.LookAndFeel.NativeStyle = False
  581. TabOrder = 5
  582. Text = '64'
  583. Width = 50
  584. end
  585. object EdSizeType: TcxTextEdit
  586. Left = 118
  587. Top = 22
  588. Enabled = False
  589. ImeMode = imSAlpha
  590. Properties.Alignment.Horz = taLeftJustify
  591. Properties.Alignment.Vert = taVCenter
  592. Properties.ImeMode = imSAlpha
  593. Properties.MaxLength = 10
  594. Properties.ReadOnly = False
  595. Style.LookAndFeel.Kind = lfUltraFlat
  596. Style.LookAndFeel.NativeStyle = False
  597. Style.Shadow = False
  598. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  599. StyleDisabled.LookAndFeel.NativeStyle = False
  600. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  601. StyleFocused.LookAndFeel.NativeStyle = False
  602. StyleHot.LookAndFeel.Kind = lfUltraFlat
  603. StyleHot.LookAndFeel.NativeStyle = False
  604. TabOrder = 6
  605. Text = '0'
  606. Width = 171
  607. end
  608. object SeDispTime: TcxSpinEdit
  609. Left = 118
  610. Top = 146
  611. Properties.Alignment.Horz = taCenter
  612. Properties.Alignment.Vert = taVCenter
  613. Properties.MaxValue = 60.000000000000000000
  614. Properties.MinValue = 1.000000000000000000
  615. Style.BorderColor = clBtnShadow
  616. Style.BorderStyle = ebsUltraFlat
  617. Style.LookAndFeel.Kind = lfUltraFlat
  618. Style.LookAndFeel.NativeStyle = False
  619. Style.ButtonStyle = btsUltraFlat
  620. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  621. StyleDisabled.LookAndFeel.NativeStyle = False
  622. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  623. StyleFocused.LookAndFeel.NativeStyle = False
  624. StyleFocused.TextStyle = [fsBold]
  625. StyleHot.LookAndFeel.Kind = lfUltraFlat
  626. StyleHot.LookAndFeel.NativeStyle = False
  627. TabOrder = 7
  628. Value = 5
  629. Width = 67
  630. end
  631. object CbFormKind: TcxComboBox
  632. Left = 118
  633. Top = 84
  634. Properties.Alignment.Vert = taVCenter
  635. Properties.DropDownListStyle = lsFixedList
  636. Properties.HideSelection = False
  637. Properties.Items.Strings = (
  638. #51068#48152#51060#48120#51648
  639. #46020#54805#49885' '#48176#44221#51060#48120#51648)
  640. Style.BorderStyle = ebsUltraFlat
  641. Style.LookAndFeel.Kind = lfUltraFlat
  642. Style.LookAndFeel.NativeStyle = False
  643. Style.ButtonStyle = btsUltraFlat
  644. Style.PopupBorderStyle = epbsFlat
  645. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  646. StyleDisabled.LookAndFeel.NativeStyle = False
  647. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  648. StyleFocused.LookAndFeel.NativeStyle = False
  649. StyleFocused.TextStyle = [fsBold]
  650. StyleHot.LookAndFeel.Kind = lfUltraFlat
  651. StyleHot.LookAndFeel.NativeStyle = False
  652. TabOrder = 8
  653. Width = 171
  654. end
  655. object CbFormColor: TcxComboBox
  656. Left = 306
  657. Top = 146
  658. Properties.Alignment.Vert = taVCenter
  659. Properties.DropDownListStyle = lsFixedList
  660. Properties.HideSelection = False
  661. Properties.Items.Strings = (
  662. #51068#48152#51060#48120#51648
  663. #46020#54805#49885' '#48176#44221#51060#48120#51648)
  664. Style.BorderStyle = ebsUltraFlat
  665. Style.LookAndFeel.Kind = lfUltraFlat
  666. Style.LookAndFeel.NativeStyle = False
  667. Style.ButtonStyle = btsUltraFlat
  668. Style.PopupBorderStyle = epbsFlat
  669. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  670. StyleDisabled.LookAndFeel.NativeStyle = False
  671. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  672. StyleFocused.LookAndFeel.NativeStyle = False
  673. StyleFocused.TextStyle = [fsBold]
  674. StyleHot.LookAndFeel.Kind = lfUltraFlat
  675. StyleHot.LookAndFeel.NativeStyle = False
  676. TabOrder = 9
  677. Width = 162
  678. end
  679. object CbFormDispMode: TcxComboBox
  680. Left = 118
  681. Top = 179
  682. Properties.Alignment.Vert = taVCenter
  683. Properties.DropDownListStyle = lsFixedList
  684. Properties.HideSelection = False
  685. Properties.Items.Strings = (
  686. #51068#48152#51060#48120#51648
  687. #46020#54805#49885' '#48176#44221#51060#48120#51648)
  688. Style.BorderStyle = ebsUltraFlat
  689. Style.LookAndFeel.Kind = lfUltraFlat
  690. Style.LookAndFeel.NativeStyle = False
  691. Style.ButtonStyle = btsUltraFlat
  692. Style.PopupBorderStyle = epbsFlat
  693. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  694. StyleDisabled.LookAndFeel.NativeStyle = False
  695. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  696. StyleFocused.LookAndFeel.NativeStyle = False
  697. StyleFocused.TextStyle = [fsBold]
  698. StyleHot.LookAndFeel.Kind = lfUltraFlat
  699. StyleHot.LookAndFeel.NativeStyle = False
  700. TabOrder = 10
  701. Width = 194
  702. end
  703. object CbFormDispDir: TcxComboBox
  704. Left = 118
  705. Top = 210
  706. Properties.Alignment.Vert = taVCenter
  707. Properties.DropDownListStyle = lsFixedList
  708. Properties.HideSelection = False
  709. Properties.Items.Strings = (
  710. #51068#48152#51060#48120#51648
  711. #46020#54805#49885' '#48176#44221#51060#48120#51648)
  712. Style.BorderStyle = ebsUltraFlat
  713. Style.LookAndFeel.Kind = lfUltraFlat
  714. Style.LookAndFeel.NativeStyle = False
  715. Style.ButtonStyle = btsUltraFlat
  716. Style.PopupBorderStyle = epbsFlat
  717. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  718. StyleDisabled.LookAndFeel.NativeStyle = False
  719. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  720. StyleFocused.LookAndFeel.NativeStyle = False
  721. StyleFocused.TextStyle = [fsBold]
  722. StyleHot.LookAndFeel.Kind = lfUltraFlat
  723. StyleHot.LookAndFeel.NativeStyle = False
  724. TabOrder = 11
  725. Width = 194
  726. end
  727. object EdSizeTypeCode: TcxTextEdit
  728. Left = 750
  729. Top = 15
  730. Enabled = False
  731. ImeMode = imSAlpha
  732. Properties.Alignment.Horz = taLeftJustify
  733. Properties.Alignment.Vert = taVCenter
  734. Properties.ImeMode = imSAlpha
  735. Properties.MaxLength = 10
  736. Properties.ReadOnly = False
  737. Style.LookAndFeel.Kind = lfUltraFlat
  738. Style.LookAndFeel.NativeStyle = False
  739. Style.Shadow = False
  740. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  741. StyleDisabled.LookAndFeel.NativeStyle = False
  742. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  743. StyleFocused.LookAndFeel.NativeStyle = False
  744. StyleHot.LookAndFeel.Kind = lfUltraFlat
  745. StyleHot.LookAndFeel.NativeStyle = False
  746. TabOrder = 12
  747. Text = '0'
  748. Visible = False
  749. Width = 83
  750. end
  751. end
  752. end
  753. object EdFocus: TEdit
  754. Left = -10
  755. Top = -10
  756. Width = 2
  757. Height = 25
  758. ImeName = 'Microsoft Office IME 2007'
  759. TabOrder = 8
  760. Text = 'EdFocus'
  761. end
  762. object cxGroupBox2: TcxGroupBox
  763. Left = 13
  764. Top = 55
  765. Anchors = [akLeft, akTop, akRight, akBottom]
  766. Caption = 'VMS '#54268' '#47785#47197
  767. ParentFont = False
  768. Style.BorderColor = clCaptionText
  769. Style.Font.Charset = DEFAULT_CHARSET
  770. Style.Font.Color = clWindowText
  771. Style.Font.Height = -13
  772. Style.Font.Name = #47569#51008' '#44256#46357
  773. Style.Font.Style = []
  774. Style.LookAndFeel.Kind = lfUltraFlat
  775. Style.LookAndFeel.NativeStyle = False
  776. Style.Shadow = False
  777. Style.TextColor = clBlack
  778. Style.TextStyle = [fsBold]
  779. Style.IsFontAssigned = True
  780. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  781. StyleDisabled.LookAndFeel.NativeStyle = False
  782. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  783. StyleFocused.LookAndFeel.NativeStyle = False
  784. StyleHot.LookAndFeel.Kind = lfUltraFlat
  785. StyleHot.LookAndFeel.NativeStyle = False
  786. TabOrder = 9
  787. ExplicitWidth = 1057
  788. ExplicitHeight = 356
  789. DesignSize = (
  790. 1103
  791. 364)
  792. Height = 364
  793. Width = 1103
  794. object Label6: TLabel
  795. Left = 36
  796. Top = 28
  797. Width = 89
  798. Height = 17
  799. Caption = 'VMS '#53356#44592' '#50976#54805
  800. Color = clWindowText
  801. ParentColor = False
  802. Transparent = True
  803. end
  804. object ImgDesc02: TImage
  805. Left = 20
  806. Top = 32
  807. Width = 9
  808. Height = 9
  809. Transparent = True
  810. end
  811. object CxList: TcxGrid
  812. Left = 10
  813. Top = 56
  814. Width = 1083
  815. Height = 297
  816. Anchors = [akLeft, akTop, akRight, akBottom]
  817. TabOrder = 0
  818. LookAndFeel.Kind = lfUltraFlat
  819. LookAndFeel.NativeStyle = False
  820. ExplicitWidth = 1037
  821. ExplicitHeight = 289
  822. object TvList: TcxGridDBTableView
  823. FilterBox.CustomizeDialog = False
  824. DataController.Summary.DefaultGroupSummaryItems = <>
  825. DataController.Summary.FooterSummaryItems = <>
  826. DataController.Summary.SummaryGroups = <>
  827. FilterRow.InfoText = #44160#49353#50612#47484' '#51077#47141#54616#49464#50836'.'
  828. OptionsBehavior.CellHints = True
  829. OptionsCustomize.ColumnHidingOnGrouping = False
  830. OptionsData.CancelOnExit = False
  831. OptionsData.Deleting = False
  832. OptionsData.DeletingConfirmation = False
  833. OptionsData.Editing = False
  834. OptionsData.Inserting = False
  835. OptionsSelection.CellSelect = False
  836. OptionsSelection.HideFocusRectOnExit = False
  837. OptionsView.CellAutoHeight = True
  838. OptionsView.GroupByBox = False
  839. object ColId: TcxGridDBColumn
  840. Caption = #54268' ID'
  841. DataBinding.FieldName = 'FORMID'
  842. PropertiesClassName = 'TcxTextEditProperties'
  843. Properties.Alignment.Horz = taCenter
  844. Properties.Alignment.Vert = taVCenter
  845. HeaderAlignmentHorz = taCenter
  846. HeaderAlignmentVert = vaCenter
  847. Options.Editing = False
  848. Options.Filtering = False
  849. Width = 145
  850. end
  851. object ColSize: TcxGridDBColumn
  852. Caption = 'VMS '#53356#44592
  853. DataBinding.FieldName = 'sizetypename'
  854. PropertiesClassName = 'TcxTextEditProperties'
  855. Properties.Alignment.Horz = taCenter
  856. Properties.Alignment.Vert = taVCenter
  857. HeaderAlignmentHorz = taCenter
  858. HeaderAlignmentVert = vaCenter
  859. Options.Editing = False
  860. Options.Filtering = False
  861. Width = 172
  862. end
  863. object ColKind: TcxGridDBColumn
  864. Caption = #54268' '#50976#54805
  865. DataBinding.FieldName = 'formkindname'
  866. PropertiesClassName = 'TcxTextEditProperties'
  867. Properties.Alignment.Horz = taLeftJustify
  868. Properties.Alignment.Vert = taVCenter
  869. HeaderAlignmentHorz = taCenter
  870. HeaderAlignmentVert = vaCenter
  871. HeaderGlyphAlignmentHorz = taCenter
  872. Options.Editing = False
  873. Options.Filtering = False
  874. Width = 220
  875. end
  876. object ColName: TcxGridDBColumn
  877. Caption = #54268' '#47749#52845
  878. DataBinding.FieldName = 'FORMNAME'
  879. PropertiesClassName = 'TcxTextEditProperties'
  880. Properties.Alignment.Horz = taLeftJustify
  881. Properties.Alignment.Vert = taVCenter
  882. HeaderAlignmentHorz = taCenter
  883. HeaderAlignmentVert = vaCenter
  884. HeaderGlyphAlignmentHorz = taCenter
  885. Options.Editing = False
  886. Options.Filtering = False
  887. Width = 238
  888. end
  889. object ColDispTime: TcxGridDBColumn
  890. Caption = #54364#52636#49884#44036'('#52488')'
  891. DataBinding.FieldName = 'DISPLAYTIME'
  892. PropertiesClassName = 'TcxTextEditProperties'
  893. Properties.Alignment.Horz = taCenter
  894. Properties.Alignment.Vert = taVCenter
  895. HeaderAlignmentHorz = taCenter
  896. HeaderAlignmentVert = vaCenter
  897. Options.Editing = False
  898. Options.Filtering = False
  899. Width = 78
  900. end
  901. object ColColor: TcxGridDBColumn
  902. Caption = #48176#44221#49353#49345
  903. DataBinding.FieldName = 'BKCOLOR'
  904. PropertiesClassName = 'TcxTextEditProperties'
  905. Properties.Alignment.Horz = taCenter
  906. Properties.Alignment.Vert = taVCenter
  907. Visible = False
  908. HeaderAlignmentHorz = taCenter
  909. HeaderAlignmentVert = vaCenter
  910. Options.Editing = False
  911. Options.Filtering = False
  912. end
  913. object ColDispMode: TcxGridDBColumn
  914. Caption = #54364#52636#47784#46300
  915. DataBinding.FieldName = 'DISPLAYMODENAME'
  916. PropertiesClassName = 'TcxTextEditProperties'
  917. Properties.Alignment.Horz = taLeftJustify
  918. Properties.Alignment.Vert = taVCenter
  919. Visible = False
  920. HeaderAlignmentHorz = taCenter
  921. HeaderAlignmentVert = vaCenter
  922. Options.Editing = False
  923. Options.Filtering = False
  924. end
  925. object ColDispDir: TcxGridDBColumn
  926. Caption = #54364#52636#48169#54693
  927. DataBinding.FieldName = 'DISPLAYDIRNAME'
  928. PropertiesClassName = 'TcxTextEditProperties'
  929. Properties.Alignment.Horz = taLeftJustify
  930. Properties.Alignment.Vert = taVCenter
  931. Visible = False
  932. HeaderAlignmentHorz = taCenter
  933. HeaderAlignmentVert = vaCenter
  934. Options.Editing = False
  935. Options.Filtering = False
  936. end
  937. object ColDesc: TcxGridDBColumn
  938. Caption = #54268' '#49444#47749
  939. DataBinding.FieldName = 'FORMDESC'
  940. PropertiesClassName = 'TcxTextEditProperties'
  941. Properties.Alignment.Horz = taLeftJustify
  942. Properties.Alignment.Vert = taVCenter
  943. HeaderAlignmentHorz = taCenter
  944. HeaderAlignmentVert = vaCenter
  945. Options.Editing = False
  946. Options.Filtering = False
  947. Width = 175
  948. end
  949. end
  950. object GlList: TcxGridLevel
  951. GridView = TvList
  952. end
  953. end
  954. object CbSizeType: TcxComboBox
  955. Left = 136
  956. Top = 24
  957. Properties.Alignment.Vert = taVCenter
  958. Properties.DropDownListStyle = lsFixedList
  959. Properties.HideSelection = False
  960. Properties.Items.Strings = (
  961. '1'#45800'8'#50676
  962. '2'#45800'12'#50676
  963. '10'#45800'18'#50676)
  964. Style.BorderStyle = ebsUltraFlat
  965. Style.LookAndFeel.Kind = lfUltraFlat
  966. Style.LookAndFeel.NativeStyle = False
  967. Style.ButtonStyle = btsUltraFlat
  968. Style.PopupBorderStyle = epbsFlat
  969. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  970. StyleDisabled.LookAndFeel.NativeStyle = False
  971. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  972. StyleFocused.LookAndFeel.NativeStyle = False
  973. StyleFocused.TextStyle = [fsBold]
  974. StyleHot.LookAndFeel.Kind = lfUltraFlat
  975. StyleHot.LookAndFeel.NativeStyle = False
  976. TabOrder = 1
  977. Text = '1'#45800'8'#50676
  978. Width = 176
  979. end
  980. end
  981. object BtnFormEdit: TcxButton
  982. Tag = 1
  983. Left = 543
  984. Top = 747
  985. Width = 117
  986. Height = 25
  987. Cursor = crHandPoint
  988. Hint = #54268' '#44061#52404' '#54200#51665
  989. Anchors = [akRight, akBottom]
  990. Caption = #54268' '#44061#52404' '#54200#51665
  991. Colors.Default = 10737865
  992. LookAndFeel.NativeStyle = False
  993. TabOrder = 10
  994. Visible = False
  995. Font.Charset = DEFAULT_CHARSET
  996. Font.Color = clBlack
  997. Font.Height = -13
  998. Font.Name = #47569#51008' '#44256#46357
  999. Font.Style = [fsBold]
  1000. ParentFont = False
  1001. ExplicitLeft = 497
  1002. ExplicitTop = 739
  1003. end
  1004. object TmrShow: TTimer
  1005. Enabled = False
  1006. Interval = 500
  1007. Left = 876
  1008. Top = 8
  1009. end
  1010. object ADO: TADOQuery
  1011. Parameters = <>
  1012. Left = 240
  1013. Top = 148
  1014. end
  1015. object DS: TDataSource
  1016. DataSet = ADO
  1017. Left = 280
  1018. Top = 148
  1019. end
  1020. end