TAS0070MF.dfm 15 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594
  1. object TAS0070M: TTAS0070M
  2. Left = 0
  3. Top = 0
  4. HorzScrollBar.Visible = False
  5. VertScrollBar.Visible = False
  6. Caption = #44036#49440#46020#47196#48324' '#48516#49437
  7. ClientHeight = 824
  8. ClientWidth = 1576
  9. Color = clBtnFace
  10. DoubleBuffered = True
  11. Font.Charset = DEFAULT_CHARSET
  12. Font.Color = clWindowText
  13. Font.Height = -13
  14. Font.Name = #47569#51008' '#44256#46357
  15. Font.Style = []
  16. KeyPreview = True
  17. OldCreateOrder = False
  18. Position = poOwnerFormCenter
  19. ShowHint = True
  20. OnClose = FormClose
  21. OnShow = FormShow
  22. DesignSize = (
  23. 1576
  24. 824)
  25. PixelsPerInch = 96
  26. TextHeight = 17
  27. object ShpTitle: TShape
  28. Left = 4
  29. Top = 4
  30. Width = 1568
  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 = 1568
  57. Height = 768
  58. Anchors = [akLeft, akTop, akRight, akBottom]
  59. Pen.Color = 10849679
  60. Pen.Width = 2
  61. ExplicitWidth = 1436
  62. ExplicitHeight = 766
  63. end
  64. object BtnClose: TcxButton
  65. Left = 1482
  66. Top = 11
  67. Width = 80
  68. Height = 25
  69. Cursor = crHandPoint
  70. Hint = #45803#44592
  71. Anchors = [akTop, akRight]
  72. Caption = #45803#44592
  73. Colors.Default = 10737865
  74. TabOrder = 0
  75. Font.Charset = DEFAULT_CHARSET
  76. Font.Color = clBlack
  77. Font.Height = -13
  78. Font.Name = #47569#51008' '#44256#46357
  79. Font.Style = [fsBold]
  80. ParentFont = False
  81. OnClick = BtnCloseClick
  82. end
  83. object EdFocus: TEdit
  84. Left = -10
  85. Top = -10
  86. Width = 2
  87. Height = 25
  88. ImeName = 'Microsoft Office IME 2007'
  89. TabOrder = 1
  90. Text = 'EdFocus'
  91. end
  92. object PnlBack: TPanel
  93. Left = 12
  94. Top = 56
  95. Width = 1550
  96. Height = 755
  97. Anchors = [akLeft, akTop, akRight, akBottom]
  98. BevelOuter = bvNone
  99. ParentBackground = False
  100. ParentColor = True
  101. TabOrder = 2
  102. object cxGroupBox2: TcxGroupBox
  103. Left = 0
  104. Top = 0
  105. Align = alTop
  106. Caption = #9654' '#44160#49353' '#51312#44148
  107. Style.BorderColor = clCaptionText
  108. Style.Shadow = False
  109. Style.TextColor = clWindowText
  110. Style.TextStyle = [fsBold]
  111. TabOrder = 0
  112. Height = 99
  113. Width = 1550
  114. object Label1: TLabel
  115. Left = 31
  116. Top = 26
  117. Width = 26
  118. Height = 17
  119. Alignment = taRightJustify
  120. Caption = #51068#51088
  121. Font.Charset = DEFAULT_CHARSET
  122. Font.Color = clWindowText
  123. Font.Height = -13
  124. Font.Name = #47569#51008' '#44256#46357
  125. Font.Style = [fsBold]
  126. ParentFont = False
  127. Transparent = True
  128. end
  129. object ImgDesc03: TImage
  130. Left = 12
  131. Top = 30
  132. Width = 9
  133. Height = 9
  134. Transparent = True
  135. end
  136. object Label2: TLabel
  137. Left = 31
  138. Top = 59
  139. Width = 26
  140. Height = 17
  141. Alignment = taRightJustify
  142. Caption = #46020#47196
  143. Font.Charset = DEFAULT_CHARSET
  144. Font.Color = clWindowText
  145. Font.Height = -13
  146. Font.Name = #47569#51008' '#44256#46357
  147. Font.Style = [fsBold]
  148. ParentFont = False
  149. Transparent = True
  150. end
  151. object ImgDesc02: TImage
  152. Left = 12
  153. Top = 63
  154. Width = 9
  155. Height = 9
  156. Transparent = True
  157. end
  158. object Label3: TLabel
  159. Left = 407
  160. Top = 26
  161. Width = 26
  162. Height = 17
  163. Alignment = taRightJustify
  164. Caption = #50836#51068
  165. Font.Charset = DEFAULT_CHARSET
  166. Font.Color = clWindowText
  167. Font.Height = -13
  168. Font.Name = #47569#51008' '#44256#46357
  169. Font.Style = [fsBold]
  170. ParentFont = False
  171. Transparent = True
  172. end
  173. object ImgDesc01: TImage
  174. Left = 388
  175. Top = 30
  176. Width = 9
  177. Height = 9
  178. Transparent = True
  179. end
  180. object Label4: TLabel
  181. Left = 767
  182. Top = 26
  183. Width = 26
  184. Height = 17
  185. Alignment = taRightJustify
  186. Caption = #49884#44036
  187. Font.Charset = DEFAULT_CHARSET
  188. Font.Color = clWindowText
  189. Font.Height = -13
  190. Font.Name = #47569#51008' '#44256#46357
  191. Font.Style = [fsBold]
  192. ParentFont = False
  193. Transparent = True
  194. Visible = False
  195. end
  196. object ImgDesc04: TImage
  197. Left = 748
  198. Top = 30
  199. Width = 9
  200. Height = 9
  201. Transparent = True
  202. Visible = False
  203. end
  204. object Label5: TLabel
  205. Left = 407
  206. Top = 59
  207. Width = 26
  208. Height = 17
  209. Alignment = taRightJustify
  210. Caption = #48169#54693
  211. Font.Charset = DEFAULT_CHARSET
  212. Font.Color = clWindowText
  213. Font.Height = -13
  214. Font.Name = #47569#51008' '#44256#46357
  215. Font.Style = [fsBold]
  216. ParentFont = False
  217. Transparent = True
  218. end
  219. object ImgDesc05: TImage
  220. Left = 388
  221. Top = 63
  222. Width = 9
  223. Height = 9
  224. Transparent = True
  225. end
  226. object Label6: TLabel
  227. Left = 620
  228. Top = 59
  229. Width = 52
  230. Height = 17
  231. Alignment = taRightJustify
  232. Caption = #51312#54924#44592#51456
  233. Font.Charset = DEFAULT_CHARSET
  234. Font.Color = clWindowText
  235. Font.Height = -13
  236. Font.Name = #47569#51008' '#44256#46357
  237. Font.Style = [fsBold]
  238. ParentFont = False
  239. Transparent = True
  240. end
  241. object ImgDesc06: TImage
  242. Left = 606
  243. Top = 63
  244. Width = 9
  245. Height = 9
  246. Transparent = True
  247. end
  248. object BtnSearch: TcxButton
  249. Left = 876
  250. Top = 57
  251. Width = 80
  252. Height = 25
  253. Cursor = crHandPoint
  254. Hint = #51312#54924
  255. Caption = #51312#54924
  256. Colors.Default = 10737865
  257. TabOrder = 2
  258. Font.Charset = DEFAULT_CHARSET
  259. Font.Color = clBlack
  260. Font.Height = -13
  261. Font.Name = #47569#51008' '#44256#46357
  262. Font.Style = [fsBold]
  263. ParentFont = False
  264. OnClick = BtnSearchClick
  265. end
  266. object CbTable: TcxComboBox
  267. Left = 1003
  268. Top = 26
  269. Cursor = crHandPoint
  270. Properties.Alignment.Horz = taCenter
  271. Properties.Alignment.Vert = taVCenter
  272. Properties.DropDownListStyle = lsFixedList
  273. Properties.DropDownSizeable = True
  274. Properties.HideSelection = False
  275. Properties.Items.Strings = (
  276. #54364#51456#47553#53356
  277. #51221#48372#51228#44277#44396#44036'('#49436#48708#49828#47553#53356')')
  278. Properties.ReadOnly = False
  279. Style.BorderColor = clWindowFrame
  280. Style.BorderStyle = ebsUltraFlat
  281. Style.LookAndFeel.Kind = lfUltraFlat
  282. Style.LookAndFeel.NativeStyle = False
  283. Style.ButtonStyle = btsUltraFlat
  284. Style.PopupBorderStyle = epbsFlat
  285. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  286. StyleDisabled.LookAndFeel.NativeStyle = False
  287. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  288. StyleFocused.LookAndFeel.NativeStyle = False
  289. StyleFocused.TextColor = clBlack
  290. StyleFocused.TextStyle = [fsBold]
  291. StyleHot.LookAndFeel.Kind = lfUltraFlat
  292. StyleHot.LookAndFeel.NativeStyle = False
  293. TabOrder = 1
  294. Text = #51221#48372#51228#44277#44396#44036'('#49436#48708#49828#47553#53356')'
  295. Visible = False
  296. Width = 214
  297. end
  298. object DtStDay: TDateTimePicker
  299. Left = 65
  300. Top = 23
  301. Width = 149
  302. Height = 25
  303. BevelInner = bvNone
  304. BevelOuter = bvNone
  305. BevelKind = bkFlat
  306. Date = 39924.557697118050000000
  307. Format = ' yyyy'#45380' MM'#50900' dd'#51068
  308. Time = 39924.557697118050000000
  309. DoubleBuffered = True
  310. ImeName = 'Microsoft Office IME 2007'
  311. ParentDoubleBuffered = False
  312. ParentShowHint = False
  313. ShowHint = True
  314. TabOrder = 0
  315. end
  316. object DtEdDay: TDateTimePicker
  317. Left = 220
  318. Top = 23
  319. Width = 149
  320. Height = 25
  321. BevelInner = bvNone
  322. BevelOuter = bvNone
  323. BevelKind = bkFlat
  324. Date = 39924.557697118050000000
  325. Format = ' yyyy'#45380' MM'#50900' dd'#51068
  326. Time = 39924.557697118050000000
  327. DoubleBuffered = True
  328. ImeName = 'Microsoft Office IME 2007'
  329. ParentDoubleBuffered = False
  330. ParentShowHint = False
  331. ShowHint = True
  332. TabOrder = 3
  333. end
  334. object ChkWeek7: TcxCheckBox
  335. Left = 444
  336. Top = 24
  337. Cursor = crHandPoint
  338. Caption = #51068
  339. TabOrder = 4
  340. Transparent = True
  341. Width = 42
  342. end
  343. object ChkWeek1: TcxCheckBox
  344. Left = 484
  345. Top = 24
  346. Cursor = crHandPoint
  347. Caption = #50900
  348. TabOrder = 5
  349. Transparent = True
  350. Width = 42
  351. end
  352. object ChkWeek2: TcxCheckBox
  353. Left = 524
  354. Top = 24
  355. Cursor = crHandPoint
  356. Caption = #54868
  357. TabOrder = 6
  358. Transparent = True
  359. Width = 42
  360. end
  361. object ChkWeek3: TcxCheckBox
  362. Left = 564
  363. Top = 24
  364. Cursor = crHandPoint
  365. Caption = #49688
  366. TabOrder = 7
  367. Transparent = True
  368. Width = 42
  369. end
  370. object ChkWeek4: TcxCheckBox
  371. Left = 604
  372. Top = 24
  373. Cursor = crHandPoint
  374. Caption = #47785
  375. TabOrder = 8
  376. Transparent = True
  377. Width = 42
  378. end
  379. object ChkWeek5: TcxCheckBox
  380. Left = 644
  381. Top = 24
  382. Cursor = crHandPoint
  383. Caption = #44552
  384. TabOrder = 9
  385. Transparent = True
  386. Width = 42
  387. end
  388. object ChkWeek6: TcxCheckBox
  389. Left = 684
  390. Top = 24
  391. Cursor = crHandPoint
  392. Caption = #53664
  393. TabOrder = 10
  394. Transparent = True
  395. Width = 42
  396. end
  397. object CbStHour: TcxComboBox
  398. Left = 799
  399. Top = 23
  400. Cursor = crHandPoint
  401. Properties.Alignment.Horz = taCenter
  402. Properties.Alignment.Vert = taVCenter
  403. Properties.DropDownListStyle = lsFixedList
  404. Properties.DropDownRows = 23
  405. Properties.HideSelection = False
  406. Properties.Items.Strings = (
  407. ' 00'#49884
  408. ' 01'#49884
  409. ' 02'#49884
  410. ' 03'#49884
  411. ' 04'#49884
  412. ' 05'#49884
  413. ' 06'#49884
  414. ' 07'#49884
  415. ' 08'#49884
  416. ' 09'#49884
  417. ' 10'#49884
  418. ' 11'#49884
  419. ' 12'#49884
  420. ' 13'#49884
  421. ' 14'#49884
  422. ' 15'#49884
  423. ' 16'#49884
  424. ' 17'#49884
  425. ' 18'#49884
  426. ' 19'#49884
  427. ' 20'#49884
  428. ' 21'#49884
  429. ' 22'#49884
  430. ' 23'#49884)
  431. Properties.ReadOnly = False
  432. Properties.OnChange = CbStHourPropertiesChange
  433. Style.BorderColor = clWindowFrame
  434. Style.BorderStyle = ebsUltraFlat
  435. Style.LookAndFeel.Kind = lfUltraFlat
  436. Style.LookAndFeel.NativeStyle = False
  437. Style.ButtonStyle = btsUltraFlat
  438. Style.PopupBorderStyle = epbsFlat
  439. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  440. StyleDisabled.LookAndFeel.NativeStyle = False
  441. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  442. StyleFocused.LookAndFeel.NativeStyle = False
  443. StyleFocused.TextColor = clBlack
  444. StyleFocused.TextStyle = [fsBold]
  445. StyleHot.LookAndFeel.Kind = lfUltraFlat
  446. StyleHot.LookAndFeel.NativeStyle = False
  447. TabOrder = 11
  448. Text = ' 00'#49884
  449. Width = 75
  450. end
  451. object CbEdHour: TcxComboBox
  452. Left = 877
  453. Top = 23
  454. Cursor = crHandPoint
  455. Properties.Alignment.Horz = taCenter
  456. Properties.Alignment.Vert = taVCenter
  457. Properties.DropDownListStyle = lsFixedList
  458. Properties.DropDownRows = 23
  459. Properties.HideSelection = False
  460. Properties.Items.Strings = (
  461. ' 00'#49884
  462. ' 01'#49884
  463. ' 02'#49884
  464. ' 03'#49884
  465. ' 04'#49884
  466. ' 05'#49884
  467. ' 06'#49884
  468. ' 07'#49884
  469. ' 08'#49884
  470. ' 09'#49884
  471. ' 10'#49884
  472. ' 11'#49884
  473. ' 12'#49884
  474. ' 13'#49884
  475. ' 14'#49884
  476. ' 15'#49884
  477. ' 16'#49884
  478. ' 17'#49884
  479. ' 18'#49884
  480. ' 19'#49884
  481. ' 20'#49884
  482. ' 21'#49884
  483. ' 22'#49884
  484. ' 23'#49884)
  485. Properties.ReadOnly = False
  486. Style.BorderColor = clWindowFrame
  487. Style.BorderStyle = ebsUltraFlat
  488. Style.LookAndFeel.Kind = lfUltraFlat
  489. Style.LookAndFeel.NativeStyle = False
  490. Style.ButtonStyle = btsUltraFlat
  491. Style.PopupBorderStyle = epbsFlat
  492. StyleDisabled.LookAndFeel.Kind = lfUltraFlat
  493. StyleDisabled.LookAndFeel.NativeStyle = False
  494. StyleFocused.LookAndFeel.Kind = lfUltraFlat
  495. StyleFocused.LookAndFeel.NativeStyle = False
  496. StyleFocused.TextColor = clBlack
  497. StyleFocused.TextStyle = [fsBold]
  498. StyleHot.LookAndFeel.Kind = lfUltraFlat
  499. StyleHot.LookAndFeel.NativeStyle = False
  500. TabOrder = 12
  501. Text = ' 00'#49884
  502. Width = 75
  503. end
  504. object EdAtrd: TcxButtonEdit
  505. Left = 65
  506. Top = 57
  507. Cursor = crHandPoint
  508. Properties.Buttons = <
  509. item
  510. Caption = #49440#53469
  511. Default = True
  512. Kind = bkEllipsis
  513. end>
  514. Properties.ReadOnly = True
  515. Properties.OnButtonClick = EdAtrdPropertiesButtonClick
  516. TabOrder = 13
  517. Text = '['#51204#52404']'
  518. Width = 304
  519. end
  520. object ChkDn: TcxCheckBox
  521. Left = 499
  522. Top = 59
  523. Cursor = crHandPoint
  524. Caption = #54616#54665
  525. TabOrder = 14
  526. Transparent = True
  527. Width = 54
  528. end
  529. object ChkUp: TcxCheckBox
  530. Left = 445
  531. Top = 59
  532. Cursor = crHandPoint
  533. Caption = #49345#54665
  534. TabOrder = 15
  535. Transparent = True
  536. Width = 54
  537. end
  538. object rdoHour: TcxRadioButton
  539. Left = 693
  540. Top = 59
  541. Width = 51
  542. Height = 17
  543. Cursor = crHandPoint
  544. Caption = #49884#44036
  545. Checked = True
  546. TabOrder = 16
  547. TabStop = True
  548. Transparent = True
  549. end
  550. object rdoWeek: TcxRadioButton
  551. Left = 751
  552. Top = 59
  553. Width = 57
  554. Height = 17
  555. Cursor = crHandPoint
  556. Caption = #50836#51068
  557. TabOrder = 17
  558. Transparent = True
  559. end
  560. end
  561. object PgTab: TcxPageControl
  562. Left = 0
  563. Top = 99
  564. Width = 1550
  565. Height = 656
  566. Align = alClient
  567. Focusable = False
  568. TabOrder = 1
  569. Properties.ActivePage = TsList01
  570. Properties.CloseButtonMode = cbmEveryTab
  571. Properties.HotTrack = True
  572. Properties.TabPosition = tpBottom
  573. Properties.TabSlants.Positions = [spRight]
  574. TabSlants.Positions = [spRight]
  575. OnCanCloseEx = PgTabCanCloseEx
  576. OnDblClick = PgTabDblClick
  577. ClientRectBottom = 625
  578. ClientRectLeft = 2
  579. ClientRectRight = 1545
  580. ClientRectTop = 2
  581. object TsList01: TcxTabSheet
  582. Caption = #44160#49353#44208#44284
  583. ImageIndex = 2
  584. end
  585. end
  586. end
  587. object TmrShow: TTimer
  588. Enabled = False
  589. Interval = 300
  590. OnTimer = TmrShowTimer
  591. Left = 708
  592. Top = 8
  593. end
  594. end