FrmVmsPubrSelTermF.dfm 9.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395
  1. object FrmVmsPubrSelTerm: TFrmVmsPubrSelTerm
  2. Left = 0
  3. Top = 0
  4. HorzScrollBar.Visible = False
  5. VertScrollBar.Visible = False
  6. BorderIcons = [biSystemMenu]
  7. BorderStyle = bsDialog
  8. Caption = 'VMS '#54268' '#54364#52636#44592#44036' '#49444#51221
  9. ClientHeight = 183
  10. ClientWidth = 436
  11. Color = clBtnFace
  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 = poOwnerFormCenter
  21. ShowHint = True
  22. OnClose = FormClose
  23. OnShow = FormShow
  24. DesignSize = (
  25. 436
  26. 183)
  27. PixelsPerInch = 96
  28. TextHeight = 17
  29. object ImgDesc0: TImage
  30. Left = 8
  31. Top = 22
  32. Width = 9
  33. Height = 9
  34. Transparent = True
  35. end
  36. object ImgDesc1: TImage
  37. Left = 8
  38. Top = 63
  39. Width = 9
  40. Height = 9
  41. Transparent = True
  42. end
  43. object ImgDesc2: TImage
  44. Left = 8
  45. Top = 105
  46. Width = 9
  47. Height = 9
  48. Transparent = True
  49. end
  50. object EdFocus: TEdit
  51. Left = -10
  52. Top = -10
  53. Width = 2
  54. Height = 25
  55. ImeName = 'Microsoft Office IME 2007'
  56. TabOrder = 2
  57. Text = 'EdFocus'
  58. end
  59. object BtnSelect: TcxButton
  60. Tag = 4
  61. Left = 328
  62. Top = 149
  63. Width = 100
  64. Height = 25
  65. Cursor = crHandPoint
  66. Hint = #54364#52636#44592#44036#51012' '#49444#51221' '#54633#45768#45796'.'
  67. Anchors = [akRight, akBottom]
  68. Caption = #54869#51064
  69. Colors.Default = 10737865
  70. TabOrder = 3
  71. Font.Charset = DEFAULT_CHARSET
  72. Font.Color = clBlack
  73. Font.Height = -13
  74. Font.Name = #47569#51008' '#44256#46357
  75. Font.Style = [fsBold]
  76. ParentFont = False
  77. OnClick = BtnSelectClick
  78. end
  79. object BtnClose: TcxButton
  80. Left = 221
  81. Top = 149
  82. Width = 100
  83. Height = 25
  84. Cursor = crHandPoint
  85. Hint = #52712#49548
  86. Anchors = [akRight, akBottom]
  87. Caption = #52712#49548
  88. Colors.Default = 10737865
  89. TabOrder = 1
  90. Font.Charset = DEFAULT_CHARSET
  91. Font.Color = clBlack
  92. Font.Height = -13
  93. Font.Name = #47569#51008' '#44256#46357
  94. Font.Style = [fsBold]
  95. ParentFont = False
  96. OnClick = BtnCloseClick
  97. end
  98. object BtnSearch: TcxButton
  99. Left = 78
  100. Top = 150
  101. Width = 75
  102. Height = 25
  103. Cursor = crHandPoint
  104. Hint = #51312#54924
  105. Anchors = [akTop, akRight]
  106. Caption = #51312#54924
  107. Colors.Default = 10737865
  108. TabOrder = 0
  109. Visible = False
  110. Font.Charset = DEFAULT_CHARSET
  111. Font.Color = clBlack
  112. Font.Height = -13
  113. Font.Name = #47569#51008' '#44256#46357
  114. Font.Style = [fsBold]
  115. ParentFont = False
  116. OnClick = BtnSearchClick
  117. end
  118. object cxLabel18: TcxLabel
  119. Left = 29
  120. Top = 18
  121. Caption = #54364#52636#49884#51089' '#49884#44033
  122. Style.TextStyle = [fsBold]
  123. Properties.Alignment.Horz = taRightJustify
  124. Properties.Alignment.Vert = taVCenter
  125. Transparent = True
  126. AnchorX = 116
  127. AnchorY = 29
  128. end
  129. object cxLabel1: TcxLabel
  130. Left = 29
  131. Top = 57
  132. Caption = #54364#52636#51333#47308' '#49884#44033
  133. Style.TextStyle = [fsBold]
  134. Properties.Alignment.Horz = taRightJustify
  135. Properties.Alignment.Vert = taVCenter
  136. Transparent = True
  137. AnchorX = 116
  138. AnchorY = 68
  139. end
  140. object ChkWeek0: TcxCheckBox
  141. Left = 120
  142. Top = 100
  143. Cursor = crHandPoint
  144. Caption = #50900
  145. ParentBackground = False
  146. ParentColor = False
  147. ParentShowHint = False
  148. Properties.Alignment = taLeftJustify
  149. ShowHint = True
  150. State = cbsChecked
  151. Style.BorderColor = 9868950
  152. Style.BorderStyle = ebsThick
  153. Style.Color = 14671839
  154. Style.LookAndFeel.Kind = lfUltraFlat
  155. Style.Shadow = False
  156. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  157. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  158. StyleHot.LookAndFeel.Kind = lfUltraFlat
  159. TabOrder = 6
  160. Transparent = True
  161. Width = 47
  162. end
  163. object ChkWeek1: TcxCheckBox
  164. Left = 163
  165. Top = 100
  166. Cursor = crHandPoint
  167. Caption = #54868
  168. ParentBackground = False
  169. ParentColor = False
  170. ParentShowHint = False
  171. Properties.Alignment = taLeftJustify
  172. ShowHint = True
  173. State = cbsChecked
  174. Style.BorderColor = 9868950
  175. Style.BorderStyle = ebsThick
  176. Style.Color = 14671839
  177. Style.LookAndFeel.Kind = lfUltraFlat
  178. Style.Shadow = False
  179. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  180. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  181. StyleHot.LookAndFeel.Kind = lfUltraFlat
  182. TabOrder = 7
  183. Transparent = True
  184. Width = 47
  185. end
  186. object ChkWeek3: TcxCheckBox
  187. Left = 250
  188. Top = 100
  189. Cursor = crHandPoint
  190. Caption = #47785
  191. ParentBackground = False
  192. ParentColor = False
  193. ParentShowHint = False
  194. Properties.Alignment = taLeftJustify
  195. ShowHint = True
  196. State = cbsChecked
  197. Style.BorderColor = 9868950
  198. Style.BorderStyle = ebsThick
  199. Style.Color = 14671839
  200. Style.LookAndFeel.Kind = lfUltraFlat
  201. Style.Shadow = False
  202. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  203. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  204. StyleHot.LookAndFeel.Kind = lfUltraFlat
  205. TabOrder = 8
  206. Transparent = True
  207. Width = 47
  208. end
  209. object ChkWeek2: TcxCheckBox
  210. Left = 206
  211. Top = 100
  212. Cursor = crHandPoint
  213. Caption = #49688
  214. ParentBackground = False
  215. ParentColor = False
  216. ParentShowHint = False
  217. Properties.Alignment = taLeftJustify
  218. ShowHint = True
  219. State = cbsChecked
  220. Style.BorderColor = 9868950
  221. Style.BorderStyle = ebsThick
  222. Style.Color = 14671839
  223. Style.LookAndFeel.Kind = lfUltraFlat
  224. Style.Shadow = False
  225. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  226. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  227. StyleHot.LookAndFeel.Kind = lfUltraFlat
  228. TabOrder = 9
  229. Transparent = True
  230. Width = 47
  231. end
  232. object ChkWeek6: TcxCheckBox
  233. Left = 382
  234. Top = 100
  235. Cursor = crHandPoint
  236. Caption = #51068
  237. ParentBackground = False
  238. ParentColor = False
  239. ParentShowHint = False
  240. Properties.Alignment = taLeftJustify
  241. ShowHint = True
  242. State = cbsChecked
  243. Style.BorderColor = 9868950
  244. Style.BorderStyle = ebsThick
  245. Style.Color = 14671839
  246. Style.LookAndFeel.Kind = lfUltraFlat
  247. Style.Shadow = False
  248. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  249. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  250. StyleHot.LookAndFeel.Kind = lfUltraFlat
  251. TabOrder = 10
  252. Transparent = True
  253. Width = 47
  254. end
  255. object ChkWeek5: TcxCheckBox
  256. Left = 336
  257. Top = 100
  258. Cursor = crHandPoint
  259. Caption = #53664
  260. ParentBackground = False
  261. ParentColor = False
  262. ParentShowHint = False
  263. Properties.Alignment = taLeftJustify
  264. ShowHint = True
  265. State = cbsChecked
  266. Style.BorderColor = 9868950
  267. Style.BorderStyle = ebsThick
  268. Style.Color = 14671839
  269. Style.LookAndFeel.Kind = lfUltraFlat
  270. Style.Shadow = False
  271. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  272. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  273. StyleHot.LookAndFeel.Kind = lfUltraFlat
  274. TabOrder = 11
  275. Transparent = True
  276. Width = 47
  277. end
  278. object ChkWeek4: TcxCheckBox
  279. Left = 293
  280. Top = 100
  281. Cursor = crHandPoint
  282. Caption = #44552
  283. ParentBackground = False
  284. ParentColor = False
  285. ParentShowHint = False
  286. Properties.Alignment = taLeftJustify
  287. ShowHint = True
  288. State = cbsChecked
  289. Style.BorderColor = 9868950
  290. Style.BorderStyle = ebsThick
  291. Style.Color = 14671839
  292. Style.LookAndFeel.Kind = lfUltraFlat
  293. Style.Shadow = False
  294. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  295. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  296. StyleHot.LookAndFeel.Kind = lfUltraFlat
  297. TabOrder = 12
  298. Transparent = True
  299. Width = 47
  300. end
  301. object cxLabel2: TcxLabel
  302. Left = 61
  303. Top = 100
  304. Caption = #54364#52636#50836#51068
  305. Style.TextStyle = [fsBold]
  306. Properties.Alignment.Horz = taRightJustify
  307. Properties.Alignment.Vert = taVCenter
  308. Transparent = True
  309. AnchorX = 117
  310. AnchorY = 111
  311. end
  312. object DtStrTime: TDateTimePicker
  313. Left = 250
  314. Top = 16
  315. Width = 75
  316. Height = 25
  317. BevelInner = bvNone
  318. BevelOuter = bvNone
  319. BevelKind = bkFlat
  320. Date = 40452.000000000000000000
  321. Format = ' HH:mm'
  322. Time = 40452.000000000000000000
  323. Color = clBtnFace
  324. DateMode = dmUpDown
  325. Font.Charset = DEFAULT_CHARSET
  326. Font.Color = clWindowText
  327. Font.Height = -13
  328. Font.Name = #47569#51008' '#44256#46357
  329. Font.Style = []
  330. ImeName = 'Microsoft Office IME 2007'
  331. Kind = dtkTime
  332. ParentColor = True
  333. ParentFont = False
  334. TabOrder = 14
  335. end
  336. object DtEndTime: TDateTimePicker
  337. Left = 250
  338. Top = 55
  339. Width = 75
  340. Height = 25
  341. BevelInner = bvNone
  342. BevelOuter = bvNone
  343. BevelKind = bkFlat
  344. Date = 40452.000000000000000000
  345. Format = ' HH:mm'
  346. Time = 40452.000000000000000000
  347. Color = clBtnFace
  348. DateMode = dmUpDown
  349. Font.Charset = DEFAULT_CHARSET
  350. Font.Color = clWindowText
  351. Font.Height = -13
  352. Font.Name = #47569#51008' '#44256#46357
  353. Font.Style = []
  354. ImeName = 'Microsoft Office IME 2007'
  355. Kind = dtkTime
  356. ParentColor = True
  357. ParentFont = False
  358. TabOrder = 15
  359. end
  360. object DtStrDate: TDateTimePicker
  361. Left = 126
  362. Top = 16
  363. Width = 115
  364. Height = 25
  365. BevelInner = bvNone
  366. BevelOuter = bvNone
  367. Date = 40452.000000000000000000
  368. Time = 40452.000000000000000000
  369. Color = clBtnFace
  370. ImeName = 'Microsoft Office IME 2007'
  371. ParentColor = True
  372. TabOrder = 16
  373. end
  374. object DtEndDate: TDateTimePicker
  375. Left = 126
  376. Top = 55
  377. Width = 115
  378. Height = 25
  379. BevelInner = bvNone
  380. BevelOuter = bvNone
  381. Date = 40452.000000000000000000
  382. Time = 40452.000000000000000000
  383. Color = clBtnFace
  384. ImeName = 'Microsoft Office IME 2007'
  385. ParentColor = True
  386. TabOrder = 17
  387. end
  388. object TmrShow: TTimer
  389. Enabled = False
  390. Interval = 100
  391. OnTimer = TmrShowTimer
  392. Left = 364
  393. Top = 65535
  394. end
  395. end