TAS0060MF.dfm 15 KB

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