VMSM530MF.dfm 7.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269
  1. object VMSM530M: TVMSM530M
  2. Left = 0
  3. Top = 0
  4. HorzScrollBar.Visible = False
  5. VertScrollBar.Visible = False
  6. Caption = 'VMS Provide Sect Select'
  7. ClientHeight = 515
  8. ClientWidth = 468
  9. Color = clBtnFace
  10. Font.Charset = DEFAULT_CHARSET
  11. Font.Color = clWindowText
  12. Font.Height = -13
  13. Font.Name = 'Tahoma'
  14. Font.Style = []
  15. KeyPreview = True
  16. OldCreateOrder = False
  17. Position = poOwnerFormCenter
  18. ShowHint = True
  19. OnClose = FormClose
  20. OnCloseQuery = FormCloseQuery
  21. OnShow = FormShow
  22. DesignSize = (
  23. 468
  24. 515)
  25. PixelsPerInch = 96
  26. TextHeight = 16
  27. object ShpTitle: TShape
  28. Left = 4
  29. Top = 4
  30. Width = 460
  31. Height = 40
  32. Anchors = [akLeft, akTop, akRight]
  33. Brush.Color = 14671839
  34. Pen.Color = 10849679
  35. Pen.Width = 2
  36. Visible = False
  37. ExplicitWidth = 1269
  38. end
  39. object LblCaption: TLabel
  40. Left = 16
  41. Top = 10
  42. Width = 267
  43. Height = 23
  44. Caption = #53440#51060#53952' '
  45. Font.Charset = DEFAULT_CHARSET
  46. Font.Color = 4740964
  47. Font.Height = -17
  48. Font.Name = #47569#51008' '#44256#46357
  49. Font.Style = [fsBold]
  50. ParentFont = False
  51. ParentShowHint = False
  52. ShowHint = True
  53. Visible = False
  54. end
  55. object ShpList: TShape
  56. Left = 4
  57. Top = 5
  58. Width = 460
  59. Height = 504
  60. Anchors = [akLeft, akTop, akRight, akBottom]
  61. Pen.Color = 10849679
  62. Pen.Width = 2
  63. ExplicitWidth = 809
  64. ExplicitHeight = 430
  65. end
  66. object BtnClose: TcxButton
  67. Left = 379
  68. Top = 11
  69. Width = 75
  70. Height = 25
  71. Cursor = crHandPoint
  72. Hint = #45803#44592
  73. Anchors = [akTop, akRight]
  74. Caption = #45803#44592
  75. Colors.Default = 10737865
  76. TabOrder = 0
  77. Visible = False
  78. Font.Charset = DEFAULT_CHARSET
  79. Font.Color = clBlack
  80. Font.Height = -13
  81. Font.Name = #47569#51008' '#44256#46357
  82. Font.Style = [fsBold]
  83. ParentFont = False
  84. OnClick = BtnCloseClick
  85. end
  86. object EdFocus: TEdit
  87. Left = -10
  88. Top = -10
  89. Width = 2
  90. Height = 24
  91. ImeName = 'Microsoft Office IME 2007'
  92. TabOrder = 1
  93. Text = 'EdFocus'
  94. end
  95. object PnlBack: TPanel
  96. Left = 12
  97. Top = 9
  98. Width = 442
  99. Height = 494
  100. Anchors = [akLeft, akTop, akRight, akBottom]
  101. BevelOuter = bvNone
  102. ParentBackground = False
  103. ParentColor = True
  104. TabOrder = 2
  105. object PnlLeft: TPanel
  106. Left = 0
  107. Top = 0
  108. Width = 437
  109. Height = 494
  110. Align = alLeft
  111. Anchors = [akLeft, akTop, akRight, akBottom]
  112. BevelOuter = bvNone
  113. TabOrder = 0
  114. object GrpList: TcxGroupBox
  115. Left = 0
  116. Top = 0
  117. Align = alClient
  118. Caption = #9654' VMS Provide Sect List'
  119. Style.BorderColor = clCaptionText
  120. Style.Shadow = False
  121. Style.TextColor = clWindowText
  122. Style.TextStyle = [fsBold]
  123. TabOrder = 0
  124. Height = 494
  125. Width = 437
  126. object PnlMenu: TPanel
  127. Left = 3
  128. Top = 454
  129. Width = 431
  130. Height = 30
  131. Align = alBottom
  132. BevelOuter = bvNone
  133. TabOrder = 0
  134. DesignSize = (
  135. 431
  136. 30)
  137. object BtnSelImage: TcxButton
  138. Tag = 1
  139. Left = 272
  140. Top = 3
  141. Width = 156
  142. Height = 25
  143. Cursor = crHandPoint
  144. Hint = 'Provide Sect Select'
  145. Anchors = [akRight, akBottom]
  146. Caption = 'Provide Sect Select'
  147. Colors.Default = 10737865
  148. LookAndFeel.NativeStyle = False
  149. TabOrder = 0
  150. Font.Charset = DEFAULT_CHARSET
  151. Font.Color = clBlack
  152. Font.Height = -13
  153. Font.Name = #47569#51008' '#44256#46357
  154. Font.Style = [fsBold]
  155. ParentFont = False
  156. OnClick = BtnSelImageClick
  157. end
  158. end
  159. object CxAxis: TcxGrid
  160. Left = 3
  161. Top = 18
  162. Width = 431
  163. Height = 436
  164. Align = alClient
  165. TabOrder = 1
  166. LookAndFeel.Kind = lfUltraFlat
  167. LookAndFeel.NativeStyle = False
  168. ExplicitTop = 19
  169. ExplicitHeight = 435
  170. object TvAxis: TcxGridTableView
  171. FilterBox.CustomizeDialog = False
  172. OnCellClick = TvAxisCellDblClick
  173. DataController.Summary.DefaultGroupSummaryItems = <>
  174. DataController.Summary.FooterSummaryItems = <>
  175. DataController.Summary.SummaryGroups = <>
  176. OptionsCustomize.ColumnSorting = False
  177. OptionsData.Editing = False
  178. OptionsSelection.HideFocusRectOnExit = False
  179. OptionsSelection.HideSelection = True
  180. OptionsView.ColumnAutoWidth = True
  181. OptionsView.GroupByBox = False
  182. OptionsView.Indicator = True
  183. object Col00: TcxGridColumn
  184. Caption = 'VMS ID'
  185. PropertiesClassName = 'TcxTextEditProperties'
  186. Properties.Alignment.Horz = taCenter
  187. Properties.Alignment.Vert = taVCenter
  188. Visible = False
  189. GroupIndex = 0
  190. HeaderAlignmentHorz = taCenter
  191. HeaderAlignmentVert = vaCenter
  192. Width = 99
  193. end
  194. object Col01: TcxGridColumn
  195. Caption = 'Sect ID'
  196. PropertiesClassName = 'TcxTextEditProperties'
  197. Properties.Alignment.Horz = taCenter
  198. Properties.Alignment.Vert = taVCenter
  199. HeaderAlignmentHorz = taCenter
  200. HeaderAlignmentVert = vaCenter
  201. Options.Editing = False
  202. Options.Filtering = False
  203. Width = 61
  204. end
  205. object Col02: TcxGridColumn
  206. Caption = 'Sect Name'
  207. PropertiesClassName = 'TcxTextEditProperties'
  208. Properties.Alignment.Horz = taLeftJustify
  209. Properties.Alignment.Vert = taVCenter
  210. HeaderAlignmentHorz = taCenter
  211. HeaderAlignmentVert = vaCenter
  212. Options.Editing = False
  213. Options.Filtering = False
  214. Width = 109
  215. end
  216. object Col03: TcxGridColumn
  217. Caption = 'Start Name'
  218. PropertiesClassName = 'TcxTextEditProperties'
  219. Properties.Alignment.Horz = taLeftJustify
  220. Properties.Alignment.Vert = taVCenter
  221. HeaderAlignmentHorz = taCenter
  222. HeaderAlignmentVert = vaCenter
  223. Options.Editing = False
  224. Width = 100
  225. end
  226. object Col04: TcxGridColumn
  227. Caption = 'End Name'
  228. PropertiesClassName = 'TcxTextEditProperties'
  229. Properties.Alignment.Horz = taLeftJustify
  230. Properties.Alignment.Vert = taVCenter
  231. HeaderAlignmentHorz = taCenter
  232. HeaderAlignmentVert = vaCenter
  233. Options.Editing = False
  234. Width = 105
  235. end
  236. object Col05: TcxGridColumn
  237. Caption = 'Axis'
  238. PropertiesClassName = 'TcxTextEditProperties'
  239. Properties.Alignment.Horz = taLeftJustify
  240. Properties.Alignment.Vert = taVCenter
  241. HeaderAlignmentHorz = taCenter
  242. HeaderAlignmentVert = vaCenter
  243. Options.Editing = False
  244. Width = 40
  245. end
  246. end
  247. object GlAxis: TcxGridLevel
  248. GridView = TvAxis
  249. end
  250. end
  251. end
  252. end
  253. end
  254. object EdNmbr: TcxTextEdit
  255. Left = 106
  256. Top = 312
  257. Properties.ReadOnly = True
  258. TabOrder = 3
  259. Visible = False
  260. Width = 121
  261. end
  262. object TmrShow: TTimer
  263. Enabled = False
  264. Interval = 300
  265. OnTimer = TmrShowTimer
  266. Left = 876
  267. Top = 8
  268. end
  269. end