TestFormF.dfm 29 KB

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