BillsMeasureFme.dfm 33 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105
  1. object BillsMeasureFrame: TBillsMeasureFrame
  2. Left = 0
  3. Top = 0
  4. Width = 921
  5. Height = 359
  6. TabOrder = 0
  7. object pnlExprs: TPanel
  8. Left = 0
  9. Top = 0
  10. Width = 921
  11. Height = 21
  12. Align = alTop
  13. BevelOuter = bvNone
  14. Font.Charset = ANSI_CHARSET
  15. Font.Color = clWindowText
  16. Font.Height = -12
  17. Font.Name = #23435#20307
  18. Font.Style = []
  19. ParentFont = False
  20. TabOrder = 1
  21. DesignSize = (
  22. 921
  23. 21)
  24. object laEdtExprs: TLabeledEdit
  25. Left = 56
  26. Top = 1
  27. Width = 864
  28. Height = 20
  29. Anchors = [akLeft, akTop, akRight]
  30. Ctl3D = True
  31. EditLabel.Width = 48
  32. EditLabel.Height = 12
  33. EditLabel.Caption = #34920#36798#24335#65306
  34. LabelPosition = lpLeft
  35. ParentCtl3D = False
  36. TabOrder = 0
  37. OnExit = laEdtExprsExit
  38. OnKeyDown = laEdtExprsKeyDown
  39. end
  40. end
  41. object pnlBills: TPanel
  42. Left = 0
  43. Top = 21
  44. Width = 921
  45. Height = 269
  46. Align = alClient
  47. BevelOuter = bvNone
  48. TabOrder = 0
  49. object zgBillsMeasure: TZJGrid
  50. Left = 0
  51. Top = 0
  52. Width = 921
  53. Height = 269
  54. Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection, goShowTreeLine]
  55. OptionsEx = []
  56. ColCount = 35
  57. RowCount = 6
  58. FixedRowCount = 2
  59. ShowGridLine = False
  60. DefaultColWidth = 73
  61. DefaultFixedColWidth = 30
  62. Selection.AlphaBlend = False
  63. Selection.TransparentColor = False
  64. FrozenCol = 0
  65. FrozenRow = 0
  66. OnCurrentChanged = zgBillsMeasureCurrentChanged
  67. OnCellButtonClick = zgBillsMeasureCellButtonClick
  68. OnCustomPaste = zgBillsMeasureCustomPaste
  69. OnCellGetColor = zgBillsMeasureCellGetColor
  70. OnMouseDown = zgBillsMeasureMouseDown
  71. OnKeyDown = zgBillsMeasureKeyDown
  72. Align = alClient
  73. end
  74. end
  75. object pnlNodeDetail: TPanel
  76. Left = 0
  77. Top = 290
  78. Width = 921
  79. Height = 69
  80. Align = alBottom
  81. BevelOuter = bvNone
  82. TabOrder = 2
  83. object pnlDealProperty: TPanel
  84. Left = 0
  85. Top = 0
  86. Width = 921
  87. Height = 69
  88. Align = alClient
  89. BevelOuter = bvNone
  90. TabOrder = 0
  91. object labDealPropertyTitle: TJimGradLabel
  92. Left = 0
  93. Top = 0
  94. Width = 921
  95. Height = 20
  96. Align = alTop
  97. AutoSize = False
  98. ColorBegin = clGradientInactiveCaption
  99. ColorEnd = clGradientInactiveCaption
  100. Caption = ' '#21512#21516#23646#24615
  101. Font.Charset = GB2312_CHARSET
  102. Font.Color = clWindowText
  103. Font.Height = -12
  104. Font.Name = #23435#20307
  105. Font.Style = [fsBold]
  106. ParentFont = False
  107. Layout = tlCenter
  108. end
  109. object zgDealProperty: TZJGrid
  110. Left = 0
  111. Top = 20
  112. Width = 921
  113. Height = 49
  114. OptionsEx = []
  115. RowCount = 2
  116. FixedColCount = 0
  117. ShowGridLine = False
  118. DefaultColWidth = 73
  119. Selection.AlphaBlend = False
  120. Selection.TransparentColor = False
  121. FrozenCol = 0
  122. FrozenRow = 0
  123. OnCellTextChanged = zgDealPropertyCellTextChanged
  124. OnCellCanEdit = zgDealPropertyCellCanEdit
  125. OnCellGetFont = zgDealPropertyCellGetFont
  126. Align = alClient
  127. end
  128. end
  129. end
  130. object stdBillsMeasure: TsdGridTreeDBA
  131. Columns = <
  132. item
  133. Title.Caption = #39033#30446#33410#32534#21495
  134. Title.CaptionAcrossCols = '1'
  135. Title.CaptionAcrossRows = 2
  136. Title.Font.Charset = GB2312_CHARSET
  137. Title.Font.Color = clWindowText
  138. Title.Font.Height = -12
  139. Title.Font.Name = #23435#20307
  140. Title.Font.Style = []
  141. Alignment = taLeftJustify
  142. Font.Charset = GB2312_CHARSET
  143. Font.Color = clWindowText
  144. Font.Height = -12
  145. Font.Name = #23435#20307
  146. Font.Style = []
  147. FieldName = 'Code'
  148. Width = 150
  149. ReadOnly = False
  150. end
  151. item
  152. Title.Caption = #28165#21333#32534#21495
  153. Title.CaptionAcrossCols = '1'
  154. Title.CaptionAcrossRows = 2
  155. Title.Font.Charset = GB2312_CHARSET
  156. Title.Font.Color = clWindowText
  157. Title.Font.Height = -12
  158. Title.Font.Name = #23435#20307
  159. Title.Font.Style = []
  160. Alignment = taLeftJustify
  161. Font.Charset = GB2312_CHARSET
  162. Font.Color = clWindowText
  163. Font.Height = -12
  164. Font.Name = #23435#20307
  165. Font.Style = []
  166. FieldName = 'B_Code'
  167. Width = 60
  168. ReadOnly = False
  169. end
  170. item
  171. Title.Caption = #21517#31216
  172. Title.CaptionAcrossCols = '1'
  173. Title.CaptionAcrossRows = 2
  174. Title.Font.Charset = GB2312_CHARSET
  175. Title.Font.Color = clWindowText
  176. Title.Font.Height = -12
  177. Title.Font.Name = #23435#20307
  178. Title.Font.Style = []
  179. Alignment = taLeftJustify
  180. Font.Charset = GB2312_CHARSET
  181. Font.Color = clWindowText
  182. Font.Height = -12
  183. Font.Name = #23435#20307
  184. Font.Style = []
  185. FieldName = 'Name'
  186. Width = 180
  187. ReadOnly = False
  188. end
  189. item
  190. Title.Caption = #21035#21517
  191. Title.CaptionAcrossCols = '1'
  192. Title.CaptionAcrossRows = 2
  193. Title.Font.Charset = GB2312_CHARSET
  194. Title.Font.Color = clWindowText
  195. Title.Font.Height = -12
  196. Title.Font.Name = #23435#20307
  197. Title.Font.Style = []
  198. Alignment = taLeftJustify
  199. Font.Charset = GB2312_CHARSET
  200. Font.Color = clWindowText
  201. Font.Height = -12
  202. Font.Name = #23435#20307
  203. Font.Style = []
  204. FieldName = 'Alias'
  205. Visible = False
  206. ReadOnly = False
  207. end
  208. item
  209. Title.Caption = #21333#20301
  210. Title.CaptionAcrossCols = '1'
  211. Title.CaptionAcrossRows = 2
  212. Title.Font.Charset = GB2312_CHARSET
  213. Title.Font.Color = clWindowText
  214. Title.Font.Height = -12
  215. Title.Font.Name = #23435#20307
  216. Title.Font.Style = []
  217. Alignment = taCenter
  218. Font.Charset = GB2312_CHARSET
  219. Font.Color = clWindowText
  220. Font.Height = -12
  221. Font.Name = 'smartSimSun'
  222. Font.Style = []
  223. FieldName = 'Units'
  224. Width = 55
  225. ReadOnly = False
  226. end
  227. item
  228. Title.Caption = #21333#20215
  229. Title.CaptionAcrossCols = '1'
  230. Title.CaptionAcrossRows = 2
  231. Title.Font.Charset = GB2312_CHARSET
  232. Title.Font.Color = clWindowText
  233. Title.Font.Height = -12
  234. Title.Font.Name = #23435#20307
  235. Title.Font.Style = []
  236. Alignment = taRightJustify
  237. Font.Charset = GB2312_CHARSET
  238. Font.Color = clWindowText
  239. Font.Height = -12
  240. Font.Name = #23435#20307
  241. Font.Style = []
  242. FieldName = 'Price'
  243. Width = 60
  244. ReadOnly = False
  245. end
  246. item
  247. Title.Caption = #21464#26356#21333#20215
  248. Title.CaptionAcrossCols = '1'
  249. Title.CaptionAcrossRows = 2
  250. Title.Font.Charset = GB2312_CHARSET
  251. Title.Font.Color = clWindowText
  252. Title.Font.Height = -12
  253. Title.Font.Name = #23435#20307
  254. Title.Font.Style = []
  255. Alignment = taRightJustify
  256. Font.Charset = GB2312_CHARSET
  257. Font.Color = clWindowText
  258. Font.Height = -12
  259. Font.Name = #23435#20307
  260. Font.Style = []
  261. FieldName = 'NewPrice'
  262. Width = 60
  263. ReadOnly = False
  264. end
  265. item
  266. Title.Caption = '0'#21495#21488#36134#21512#21516'|'#25968#37327
  267. Title.CaptionAcrossCols = '2'
  268. Title.Font.Charset = GB2312_CHARSET
  269. Title.Font.Color = clWindowText
  270. Title.Font.Height = -12
  271. Title.Font.Name = #23435#20307
  272. Title.Font.Style = []
  273. Alignment = taRightJustify
  274. Font.Charset = GB2312_CHARSET
  275. Font.Color = clWindowText
  276. Font.Height = -12
  277. Font.Name = #23435#20307
  278. Font.Style = []
  279. FieldName = 'Quantity'
  280. Width = 60
  281. ReadOnly = True
  282. end
  283. item
  284. Title.Caption = '|'#37329#39069
  285. Title.CaptionAcrossCols = '1'
  286. Title.CaptionAcrossRows = 2
  287. Title.Font.Charset = GB2312_CHARSET
  288. Title.Font.Color = clWindowText
  289. Title.Font.Height = -12
  290. Title.Font.Name = #23435#20307
  291. Title.Font.Style = []
  292. Alignment = taRightJustify
  293. Font.Charset = GB2312_CHARSET
  294. Font.Color = clWindowText
  295. Font.Height = -12
  296. Font.Name = #23435#20307
  297. Font.Style = []
  298. FieldName = 'TotalPrice'
  299. Width = 60
  300. ReadOnly = True
  301. end
  302. item
  303. Title.Caption = #26412#26399#21512#21516#35745#37327'|'#25968#37327
  304. Title.CaptionAcrossCols = '2'
  305. Title.Font.Charset = GB2312_CHARSET
  306. Title.Font.Color = clWindowText
  307. Title.Font.Height = -12
  308. Title.Font.Name = #23435#20307
  309. Title.Font.Style = []
  310. Alignment = taRightJustify
  311. Font.Charset = GB2312_CHARSET
  312. Font.Color = clWindowText
  313. Font.Height = -12
  314. Font.Name = #23435#20307
  315. Font.Style = []
  316. FieldName = 'CurDealQuantity'
  317. Width = 60
  318. ReadOnly = False
  319. end
  320. item
  321. Title.Caption = '|'#37329#39069
  322. Title.CaptionAcrossCols = '1'
  323. Title.Font.Charset = GB2312_CHARSET
  324. Title.Font.Color = clWindowText
  325. Title.Font.Height = -12
  326. Title.Font.Name = #23435#20307
  327. Title.Font.Style = []
  328. Alignment = taRightJustify
  329. Font.Charset = GB2312_CHARSET
  330. Font.Color = clWindowText
  331. Font.Height = -12
  332. Font.Name = #23435#20307
  333. Font.Style = []
  334. FieldName = 'CurDealTotalPrice'
  335. Width = 60
  336. ReadOnly = False
  337. end
  338. item
  339. Title.Caption = #26412#26399#25968#37327#21464#26356#35745#37327'|'#25968#37327
  340. Title.CaptionAcrossCols = '3'
  341. Title.Font.Charset = GB2312_CHARSET
  342. Title.Font.Color = clWindowText
  343. Title.Font.Height = -12
  344. Title.Font.Name = #23435#20307
  345. Title.Font.Style = []
  346. Alignment = taRightJustify
  347. EditType = sgeEllipsisBtn
  348. Font.Charset = GB2312_CHARSET
  349. Font.Color = clWindowText
  350. Font.Height = -12
  351. Font.Name = #23435#20307
  352. Font.Style = []
  353. FieldName = 'CurQcQuantity'
  354. Width = 60
  355. ReadOnly = False
  356. end
  357. item
  358. Title.Caption = '|'#37329#39069
  359. Title.CaptionAcrossCols = '1'
  360. Title.Font.Charset = GB2312_CHARSET
  361. Title.Font.Color = clWindowText
  362. Title.Font.Height = -12
  363. Title.Font.Name = #23435#20307
  364. Title.Font.Style = []
  365. Alignment = taRightJustify
  366. Font.Charset = GB2312_CHARSET
  367. Font.Color = clWindowText
  368. Font.Height = -12
  369. Font.Name = #23435#20307
  370. Font.Style = []
  371. FieldName = 'CurQcTotalPrice'
  372. Width = 60
  373. ReadOnly = True
  374. end
  375. item
  376. Title.Caption = '|'#21464#26356#20196
  377. Title.CaptionAcrossCols = '1'
  378. Title.Font.Charset = GB2312_CHARSET
  379. Title.Font.Color = clWindowText
  380. Title.Font.Height = -12
  381. Title.Font.Name = #23435#20307
  382. Title.Font.Style = []
  383. Alignment = taRightJustify
  384. Font.Charset = GB2312_CHARSET
  385. Font.Color = clWindowText
  386. Font.Height = -12
  387. Font.Name = #23435#20307
  388. Font.Style = []
  389. FieldName = 'CurQcBGLCode'
  390. Width = 60
  391. ReadOnly = True
  392. end
  393. item
  394. Title.Caption = #26412#26399#21333#20215#21464#26356#35745#37327'|'#25968#37327
  395. Title.CaptionAcrossCols = '3'
  396. Title.Font.Charset = GB2312_CHARSET
  397. Title.Font.Color = clWindowText
  398. Title.Font.Height = -12
  399. Title.Font.Name = #23435#20307
  400. Title.Font.Style = []
  401. Alignment = taRightJustify
  402. EditType = sgeEllipsisBtn
  403. Font.Charset = GB2312_CHARSET
  404. Font.Color = clWindowText
  405. Font.Height = -12
  406. Font.Name = #23435#20307
  407. Font.Style = []
  408. FieldName = 'CurPcQuantity'
  409. Width = 60
  410. ReadOnly = False
  411. end
  412. item
  413. Title.Caption = '|'#37329#39069
  414. Title.CaptionAcrossCols = '2'
  415. Title.Font.Charset = GB2312_CHARSET
  416. Title.Font.Color = clWindowText
  417. Title.Font.Height = -12
  418. Title.Font.Name = #23435#20307
  419. Title.Font.Style = []
  420. Alignment = taRightJustify
  421. Font.Charset = GB2312_CHARSET
  422. Font.Color = clWindowText
  423. Font.Height = -12
  424. Font.Name = #23435#20307
  425. Font.Style = []
  426. FieldName = 'CurPcTotalPrice'
  427. Width = 60
  428. ReadOnly = True
  429. end
  430. item
  431. Title.Caption = '|'#21464#26356#20196
  432. Title.CaptionAcrossCols = '1'
  433. Title.Font.Charset = GB2312_CHARSET
  434. Title.Font.Color = clWindowText
  435. Title.Font.Height = -12
  436. Title.Font.Name = #23435#20307
  437. Title.Font.Style = []
  438. Alignment = taRightJustify
  439. Font.Charset = GB2312_CHARSET
  440. Font.Color = clWindowText
  441. Font.Height = -12
  442. Font.Name = #23435#20307
  443. Font.Style = []
  444. FieldName = 'CurPcBGLCode'
  445. Width = 60
  446. ReadOnly = True
  447. end
  448. item
  449. Title.Caption = #26412#26399#23436#25104#35745#37327'|'#25968#37327
  450. Title.CaptionAcrossCols = '2'
  451. Title.Font.Charset = GB2312_CHARSET
  452. Title.Font.Color = clWindowText
  453. Title.Font.Height = -12
  454. Title.Font.Name = #23435#20307
  455. Title.Font.Style = []
  456. Alignment = taRightJustify
  457. Font.Charset = GB2312_CHARSET
  458. Font.Color = clWindowText
  459. Font.Height = -12
  460. Font.Name = #23435#20307
  461. Font.Style = []
  462. FieldName = 'CurGatherQuantity'
  463. Width = 60
  464. ReadOnly = True
  465. end
  466. item
  467. Title.Caption = '|'#37329#39069
  468. Title.CaptionAcrossCols = '1'
  469. Title.Font.Charset = GB2312_CHARSET
  470. Title.Font.Color = clWindowText
  471. Title.Font.Height = -12
  472. Title.Font.Name = #23435#20307
  473. Title.Font.Style = []
  474. Alignment = taRightJustify
  475. Font.Charset = GB2312_CHARSET
  476. Font.Color = clWindowText
  477. Font.Height = -12
  478. Font.Name = #23435#20307
  479. Font.Style = []
  480. FieldName = 'CurGatherTotalPrice'
  481. Width = 60
  482. ReadOnly = True
  483. end
  484. item
  485. Title.Caption = #25130#27490#26412#26399#21512#21516#35745#37327'|'#25968#37327
  486. Title.CaptionAcrossCols = '2'
  487. Title.Font.Charset = GB2312_CHARSET
  488. Title.Font.Color = clWindowText
  489. Title.Font.Height = -12
  490. Title.Font.Name = #23435#20307
  491. Title.Font.Style = []
  492. Alignment = taRightJustify
  493. Font.Charset = GB2312_CHARSET
  494. Font.Color = clWindowText
  495. Font.Height = -12
  496. Font.Name = #23435#20307
  497. Font.Style = []
  498. FieldName = 'EndDealQuantity'
  499. Width = 60
  500. ReadOnly = True
  501. end
  502. item
  503. Title.Caption = '|'#37329#39069
  504. Title.CaptionAcrossCols = '1'
  505. Title.Font.Charset = GB2312_CHARSET
  506. Title.Font.Color = clWindowText
  507. Title.Font.Height = -12
  508. Title.Font.Name = #23435#20307
  509. Title.Font.Style = []
  510. Alignment = taRightJustify
  511. Font.Charset = GB2312_CHARSET
  512. Font.Color = clWindowText
  513. Font.Height = -12
  514. Font.Name = #23435#20307
  515. Font.Style = []
  516. FieldName = 'EndDealTotalPrice'
  517. Width = 60
  518. ReadOnly = True
  519. end
  520. item
  521. Title.Caption = #25130#27490#26412#26399#25968#37327#21464#26356'|'#25968#37327
  522. Title.CaptionAcrossCols = '2'
  523. Title.Font.Charset = GB2312_CHARSET
  524. Title.Font.Color = clWindowText
  525. Title.Font.Height = -12
  526. Title.Font.Name = #23435#20307
  527. Title.Font.Style = []
  528. Alignment = taRightJustify
  529. Font.Charset = GB2312_CHARSET
  530. Font.Color = clWindowText
  531. Font.Height = -12
  532. Font.Name = #23435#20307
  533. Font.Style = []
  534. FieldName = 'EndQcQuantity'
  535. Width = 60
  536. ReadOnly = True
  537. end
  538. item
  539. Title.Caption = '|'#37329#39069
  540. Title.CaptionAcrossCols = '1'
  541. Title.Font.Charset = GB2312_CHARSET
  542. Title.Font.Color = clWindowText
  543. Title.Font.Height = -12
  544. Title.Font.Name = #23435#20307
  545. Title.Font.Style = []
  546. Alignment = taRightJustify
  547. Font.Charset = GB2312_CHARSET
  548. Font.Color = clWindowText
  549. Font.Height = -12
  550. Font.Name = #23435#20307
  551. Font.Style = []
  552. FieldName = 'EndQcTotalPrice'
  553. Width = 60
  554. ReadOnly = True
  555. end
  556. item
  557. Title.Caption = #25130#27490#26412#26399#21333#20215#21464#26356'|'#25968#37327
  558. Title.CaptionAcrossCols = '2'
  559. Title.Font.Charset = GB2312_CHARSET
  560. Title.Font.Color = clWindowText
  561. Title.Font.Height = -12
  562. Title.Font.Name = #23435#20307
  563. Title.Font.Style = []
  564. Alignment = taLeftJustify
  565. Font.Charset = GB2312_CHARSET
  566. Font.Color = clWindowText
  567. Font.Height = -12
  568. Font.Name = #23435#20307
  569. Font.Style = []
  570. FieldName = 'EndPcQuantity'
  571. Width = 60
  572. ReadOnly = True
  573. end
  574. item
  575. Title.Caption = '|'#37329#39069
  576. Title.CaptionAcrossCols = '1'
  577. Title.Font.Charset = GB2312_CHARSET
  578. Title.Font.Color = clWindowText
  579. Title.Font.Height = -12
  580. Title.Font.Name = #23435#20307
  581. Title.Font.Style = []
  582. Alignment = taRightJustify
  583. Font.Charset = GB2312_CHARSET
  584. Font.Color = clWindowText
  585. Font.Height = -12
  586. Font.Name = #23435#20307
  587. Font.Style = []
  588. FieldName = 'EndPcTotalPrice'
  589. Width = 60
  590. ReadOnly = True
  591. end
  592. item
  593. Title.Caption = #25130#27490#26412#26399#23436#25104#35745#37327'|'#25968#37327
  594. Title.CaptionAcrossCols = '2'
  595. Title.Font.Charset = GB2312_CHARSET
  596. Title.Font.Color = clWindowText
  597. Title.Font.Height = -12
  598. Title.Font.Name = #23435#20307
  599. Title.Font.Style = []
  600. Alignment = taRightJustify
  601. Font.Charset = GB2312_CHARSET
  602. Font.Color = clWindowText
  603. Font.Height = -12
  604. Font.Name = #23435#20307
  605. Font.Style = []
  606. FieldName = 'EndGatherQuantity'
  607. Width = 60
  608. ReadOnly = True
  609. end
  610. item
  611. Title.Caption = '|'#37329#39069
  612. Title.CaptionAcrossCols = '1'
  613. Title.Font.Charset = GB2312_CHARSET
  614. Title.Font.Color = clWindowText
  615. Title.Font.Height = -12
  616. Title.Font.Name = #23435#20307
  617. Title.Font.Style = []
  618. Alignment = taRightJustify
  619. Font.Charset = GB2312_CHARSET
  620. Font.Color = clWindowText
  621. Font.Height = -12
  622. Font.Name = #23435#20307
  623. Font.Style = []
  624. FieldName = 'EndGatherTotalPrice'
  625. Width = 60
  626. ReadOnly = True
  627. end
  628. item
  629. Title.Caption = #32047#35745#21512#21516#35745#37327'|'#25968#37327
  630. Title.CaptionAcrossCols = '2'
  631. Title.Font.Charset = GB2312_CHARSET
  632. Title.Font.Color = clWindowText
  633. Title.Font.Height = -12
  634. Title.Font.Name = #23435#20307
  635. Title.Font.Style = []
  636. Alignment = taRightJustify
  637. Font.Charset = GB2312_CHARSET
  638. Font.Color = clWindowText
  639. Font.Height = -12
  640. Font.Name = #23435#20307
  641. Font.Style = []
  642. FieldName = 'AddDealQuantity'
  643. Width = 60
  644. Visible = False
  645. ReadOnly = True
  646. end
  647. item
  648. Title.Caption = '|'#37329#39069
  649. Title.CaptionAcrossCols = '1'
  650. Title.Font.Charset = GB2312_CHARSET
  651. Title.Font.Color = clWindowText
  652. Title.Font.Height = -12
  653. Title.Font.Name = #23435#20307
  654. Title.Font.Style = []
  655. Alignment = taRightJustify
  656. Font.Charset = GB2312_CHARSET
  657. Font.Color = clWindowText
  658. Font.Height = -12
  659. Font.Name = #23435#20307
  660. Font.Style = []
  661. FieldName = 'AddDealTotalPrice'
  662. Width = 60
  663. Visible = False
  664. ReadOnly = True
  665. end
  666. item
  667. Title.Caption = #32047#35745#25968#37327#21464#26356#35745#37327'|'#25968#37327
  668. Title.CaptionAcrossCols = '2'
  669. Title.Font.Charset = GB2312_CHARSET
  670. Title.Font.Color = clWindowText
  671. Title.Font.Height = -12
  672. Title.Font.Name = #23435#20307
  673. Title.Font.Style = []
  674. Alignment = taRightJustify
  675. Font.Charset = GB2312_CHARSET
  676. Font.Color = clWindowText
  677. Font.Height = -12
  678. Font.Name = #23435#20307
  679. Font.Style = []
  680. FieldName = 'AddQcQuantity'
  681. Width = 60
  682. Visible = False
  683. ReadOnly = True
  684. end
  685. item
  686. Title.Caption = '|'#37329#39069
  687. Title.CaptionAcrossCols = '1'
  688. Title.Font.Charset = GB2312_CHARSET
  689. Title.Font.Color = clWindowText
  690. Title.Font.Height = -12
  691. Title.Font.Name = #23435#20307
  692. Title.Font.Style = []
  693. Alignment = taRightJustify
  694. Font.Charset = GB2312_CHARSET
  695. Font.Color = clWindowText
  696. Font.Height = -12
  697. Font.Name = #23435#20307
  698. Font.Style = []
  699. FieldName = 'AddQcTotalPrice'
  700. Width = 60
  701. Visible = False
  702. ReadOnly = True
  703. end
  704. item
  705. Title.Caption = #32047#35745#21333#20215#21464#26356#35745#37327'|'#25968#37327
  706. Title.CaptionAcrossCols = '2'
  707. Title.Font.Charset = GB2312_CHARSET
  708. Title.Font.Color = clWindowText
  709. Title.Font.Height = -12
  710. Title.Font.Name = #23435#20307
  711. Title.Font.Style = []
  712. Alignment = taRightJustify
  713. Font.Charset = GB2312_CHARSET
  714. Font.Color = clWindowText
  715. Font.Height = -12
  716. Font.Name = #23435#20307
  717. Font.Style = []
  718. FieldName = 'AddPcQuantity'
  719. Width = 60
  720. Visible = False
  721. ReadOnly = True
  722. end
  723. item
  724. Title.Caption = '|'#37329#39069
  725. Title.CaptionAcrossCols = '1'
  726. Title.Font.Charset = GB2312_CHARSET
  727. Title.Font.Color = clWindowText
  728. Title.Font.Height = -12
  729. Title.Font.Name = #23435#20307
  730. Title.Font.Style = []
  731. Alignment = taRightJustify
  732. Font.Charset = GB2312_CHARSET
  733. Font.Color = clWindowText
  734. Font.Height = -12
  735. Font.Name = #23435#20307
  736. Font.Style = []
  737. FieldName = 'AddPcTotalPrice'
  738. Width = 60
  739. Visible = False
  740. ReadOnly = True
  741. end
  742. item
  743. Title.Caption = #32047#35745#23436#25104#35745#37327'|'#25968#37327
  744. Title.CaptionAcrossCols = '2'
  745. Title.Font.Charset = GB2312_CHARSET
  746. Title.Font.Color = clWindowText
  747. Title.Font.Height = -12
  748. Title.Font.Name = #23435#20307
  749. Title.Font.Style = []
  750. Alignment = taRightJustify
  751. Font.Charset = GB2312_CHARSET
  752. Font.Color = clWindowText
  753. Font.Height = -12
  754. Font.Name = #23435#20307
  755. Font.Style = []
  756. FieldName = 'AddGatherQuantity'
  757. Width = 60
  758. Visible = False
  759. ReadOnly = True
  760. end
  761. item
  762. Title.Caption = '|'#37329#39069
  763. Title.CaptionAcrossCols = '1'
  764. Title.Font.Charset = GB2312_CHARSET
  765. Title.Font.Color = clWindowText
  766. Title.Font.Height = -12
  767. Title.Font.Name = #23435#20307
  768. Title.Font.Style = []
  769. Alignment = taRightJustify
  770. Font.Charset = GB2312_CHARSET
  771. Font.Color = clWindowText
  772. Font.Height = -12
  773. Font.Name = #23435#20307
  774. Font.Style = []
  775. FieldName = 'AddGatherTotalPrice'
  776. Width = 60
  777. Visible = False
  778. ReadOnly = True
  779. end
  780. item
  781. Title.Caption = 'ParentID'
  782. Title.CaptionAcrossCols = '1'
  783. Title.Font.Charset = GB2312_CHARSET
  784. Title.Font.Color = clWindowText
  785. Title.Font.Height = -12
  786. Title.Font.Name = #23435#20307
  787. Title.Font.Style = []
  788. Alignment = taLeftJustify
  789. Font.Charset = GB2312_CHARSET
  790. Font.Color = clWindowText
  791. Font.Height = -12
  792. Font.Name = #23435#20307
  793. Font.Style = []
  794. FieldName = 'ParentID'
  795. Visible = False
  796. ReadOnly = True
  797. end
  798. item
  799. Title.Caption = 'NextSiblingID'
  800. Title.CaptionAcrossCols = '1'
  801. Title.Font.Charset = GB2312_CHARSET
  802. Title.Font.Color = clWindowText
  803. Title.Font.Height = -12
  804. Title.Font.Name = #23435#20307
  805. Title.Font.Style = []
  806. Alignment = taLeftJustify
  807. Font.Charset = GB2312_CHARSET
  808. Font.Color = clWindowText
  809. Font.Height = -12
  810. Font.Name = #23435#20307
  811. Font.Style = []
  812. FieldName = 'NextSiblingID'
  813. Visible = False
  814. ReadOnly = True
  815. end
  816. item
  817. Title.Caption = #21512#21516'|'#35774#35745#25968#37327'1'
  818. Title.CaptionAcrossCols = '2'
  819. Title.Font.Charset = GB2312_CHARSET
  820. Title.Font.Color = clWindowText
  821. Title.Font.Height = -12
  822. Title.Font.Name = #23435#20307
  823. Title.Font.Style = []
  824. Alignment = taRightJustify
  825. Font.Charset = GB2312_CHARSET
  826. Font.Color = clWindowText
  827. Font.Height = -12
  828. Font.Name = #23435#20307
  829. Font.Style = []
  830. FieldName = 'DealDgnQuantity1'
  831. Width = 60
  832. ReadOnly = False
  833. end
  834. item
  835. Title.Caption = '|'#35774#35745#25968#37327'2'
  836. Title.CaptionAcrossCols = '1'
  837. Title.Font.Charset = GB2312_CHARSET
  838. Title.Font.Color = clWindowText
  839. Title.Font.Height = -12
  840. Title.Font.Name = #23435#20307
  841. Title.Font.Style = []
  842. Alignment = taRightJustify
  843. Font.Charset = GB2312_CHARSET
  844. Font.Color = clWindowText
  845. Font.Height = -12
  846. Font.Name = #23435#20307
  847. Font.Style = []
  848. FieldName = 'DealDgnQuantity2'
  849. Width = 60
  850. ReadOnly = False
  851. end
  852. item
  853. Title.Caption = #21464#26356'|'#35774#35745#25968#37327'1'
  854. Title.CaptionAcrossCols = '2'
  855. Title.Font.Charset = GB2312_CHARSET
  856. Title.Font.Color = clWindowText
  857. Title.Font.Height = -12
  858. Title.Font.Name = #23435#20307
  859. Title.Font.Style = []
  860. Alignment = taRightJustify
  861. Font.Charset = GB2312_CHARSET
  862. Font.Color = clWindowText
  863. Font.Height = -12
  864. Font.Name = #23435#20307
  865. Font.Style = []
  866. FieldName = 'CDgnQuantity1'
  867. Width = 60
  868. ReadOnly = False
  869. end
  870. item
  871. Title.Caption = '|'#35774#35745#25968#37327'2'
  872. Title.CaptionAcrossCols = '1'
  873. Title.Font.Charset = GB2312_CHARSET
  874. Title.Font.Color = clWindowText
  875. Title.Font.Height = -12
  876. Title.Font.Name = #23435#20307
  877. Title.Font.Style = []
  878. Alignment = taRightJustify
  879. Font.Charset = GB2312_CHARSET
  880. Font.Color = clWindowText
  881. Font.Height = -12
  882. Font.Name = #23435#20307
  883. Font.Style = []
  884. FieldName = 'CDgnQuantity2'
  885. Width = 60
  886. ReadOnly = False
  887. end
  888. item
  889. Title.Caption = #32463#27982#25351#26631
  890. Title.CaptionAcrossCols = '1'
  891. Title.CaptionAcrossRows = 2
  892. Title.Font.Charset = GB2312_CHARSET
  893. Title.Font.Color = clWindowText
  894. Title.Font.Height = -12
  895. Title.Font.Name = #23435#20307
  896. Title.Font.Style = []
  897. Alignment = taRightJustify
  898. Font.Charset = GB2312_CHARSET
  899. Font.Color = clWindowText
  900. Font.Height = -12
  901. Font.Name = #23435#20307
  902. Font.Style = []
  903. FieldName = 'AddDgnPrice'
  904. Width = 60
  905. ReadOnly = True
  906. end
  907. item
  908. Title.Caption = #22270'('#20876')'#21495
  909. Title.CaptionAcrossCols = '1'
  910. Title.CaptionAcrossRows = 2
  911. Title.Font.Charset = GB2312_CHARSET
  912. Title.Font.Color = clWindowText
  913. Title.Font.Height = -12
  914. Title.Font.Name = #23435#20307
  915. Title.Font.Style = []
  916. Alignment = taLeftJustify
  917. Font.Charset = GB2312_CHARSET
  918. Font.Color = clWindowText
  919. Font.Height = -12
  920. Font.Name = #23435#20307
  921. Font.Style = []
  922. FieldName = 'DrawingCode'
  923. Width = 60
  924. ReadOnly = False
  925. end
  926. item
  927. Title.Caption = #32047#35745#23436#25104#29575'(%)'
  928. Title.CaptionAcrossCols = '1'
  929. Title.CaptionAcrossRows = 2
  930. Title.Font.Charset = GB2312_CHARSET
  931. Title.Font.Color = clWindowText
  932. Title.Font.Height = -12
  933. Title.Font.Name = #23435#20307
  934. Title.Font.Style = []
  935. Alignment = taRightJustify
  936. Font.Charset = GB2312_CHARSET
  937. Font.Color = clWindowText
  938. Font.Height = -12
  939. Font.Name = #23435#20307
  940. Font.Style = []
  941. FieldName = 'AddCompleteRate'
  942. Width = 60
  943. ReadOnly = True
  944. end
  945. item
  946. Title.Caption = #22791#27880
  947. Title.CaptionAcrossCols = '1'
  948. Title.CaptionAcrossRows = 2
  949. Title.Font.Charset = GB2312_CHARSET
  950. Title.Font.Color = clWindowText
  951. Title.Font.Height = -12
  952. Title.Font.Name = #23435#20307
  953. Title.Font.Style = []
  954. Alignment = taLeftJustify
  955. Font.Charset = GB2312_CHARSET
  956. Font.Color = clWindowText
  957. Font.Height = -12
  958. Font.Name = #23435#20307
  959. Font.Style = []
  960. FieldName = 'MemoStr'
  961. ReadOnly = False
  962. end
  963. item
  964. Title.Caption = #26448#26009#35843#24046'|'#25130#27490#19978#26399
  965. Title.CaptionAcrossCols = '3'
  966. Title.Font.Charset = GB2312_CHARSET
  967. Title.Font.Color = clWindowText
  968. Title.Font.Height = -12
  969. Title.Font.Name = #23435#20307
  970. Title.Font.Style = []
  971. Alignment = taRightJustify
  972. Font.Charset = GB2312_CHARSET
  973. Font.Color = clWindowText
  974. Font.Height = -12
  975. Font.Name = #23435#20307
  976. Font.Style = []
  977. FieldName = 'PM_PreTotalPrice'
  978. Width = 60
  979. Visible = False
  980. ReadOnly = True
  981. end
  982. item
  983. Title.Caption = '|'#26412#26399
  984. Title.CaptionAcrossCols = '1'
  985. Title.Font.Charset = GB2312_CHARSET
  986. Title.Font.Color = clWindowText
  987. Title.Font.Height = -12
  988. Title.Font.Name = #23435#20307
  989. Title.Font.Style = []
  990. Alignment = taRightJustify
  991. Font.Charset = GB2312_CHARSET
  992. Font.Color = clWindowText
  993. Font.Height = -12
  994. Font.Name = #23435#20307
  995. Font.Style = []
  996. FieldName = 'PM_TotalPrice'
  997. Width = 60
  998. Visible = False
  999. ReadOnly = True
  1000. end
  1001. item
  1002. Title.Caption = '|'#32047#35745
  1003. Title.CaptionAcrossCols = '1'
  1004. Title.Font.Charset = GB2312_CHARSET
  1005. Title.Font.Color = clWindowText
  1006. Title.Font.Height = -12
  1007. Title.Font.Name = #23435#20307
  1008. Title.Font.Style = []
  1009. Alignment = taRightJustify
  1010. Font.Charset = GB2312_CHARSET
  1011. Font.Color = clWindowText
  1012. Font.Height = -12
  1013. Font.Name = #23435#20307
  1014. Font.Style = []
  1015. FieldName = 'PM_AddTotalPrice'
  1016. Width = 60
  1017. Visible = False
  1018. ReadOnly = True
  1019. end>
  1020. Grid = zgBillsMeasure
  1021. ExtendRowCount = 3
  1022. AutoExpand = False
  1023. KeyFieldName = 'ID'
  1024. ParentFieldName = 'ParentID'
  1025. NextSiblingFieldName = 'NextSiblingID'
  1026. TopLevelBold = True
  1027. Left = 72
  1028. Top = 120
  1029. end
  1030. object dxpmBills: TdxBarPopupMenu
  1031. BarManager = MainForm.dxBarManager
  1032. ItemLinks = <
  1033. item
  1034. Item = MainForm.dxbtnCalculateAll
  1035. Visible = True
  1036. end
  1037. item
  1038. BeginGroup = True
  1039. Item = MainForm.dxbtnNewPhase
  1040. Visible = True
  1041. end
  1042. item
  1043. BeginGroup = True
  1044. Item = MainForm.dxbtnCopy
  1045. Visible = True
  1046. end
  1047. item
  1048. Item = MainForm.dxbtnPaste
  1049. Visible = True
  1050. end
  1051. item
  1052. Item = MainForm.dxbtnCut
  1053. Visible = True
  1054. end
  1055. item
  1056. BeginGroup = True
  1057. Item = MainForm.dxbtnRemapedPaste
  1058. Visible = True
  1059. end
  1060. item
  1061. BeginGroup = True
  1062. Item = MainForm.dxbtnSetBookmark
  1063. Visible = True
  1064. end
  1065. item
  1066. BeginGroup = True
  1067. Item = MainForm.dxbtnInsert
  1068. Visible = True
  1069. end
  1070. item
  1071. Item = MainForm.dxbtnDelete
  1072. Visible = True
  1073. end
  1074. item
  1075. BeginGroup = True
  1076. Item = MainForm.dxbtnExportGridToExcel
  1077. Visible = True
  1078. end>
  1079. UseOwnFont = False
  1080. OnPopup = dxpmBillsPopup
  1081. Left = 120
  1082. Top = 120
  1083. end
  1084. object alBills: TActionList
  1085. Images = MainForm.Images
  1086. Left = 176
  1087. Top = 120
  1088. object actnCalculateAll: TAction
  1089. Caption = #20840#37096#35745#31639
  1090. ImageIndex = 15
  1091. Visible = False
  1092. OnExecute = actnCalculateAllExecute
  1093. end
  1094. object actnExportGridToExcel: TAction
  1095. Caption = #23548#20986#34920#26684#25968#25454
  1096. ImageIndex = 13
  1097. OnExecute = actnExportGridToExcelExecute
  1098. end
  1099. object actnSetStageBookmark: TAction
  1100. Caption = #35774#32622'/'#21462#28040#20070#31614
  1101. OnExecute = actnSetStageBookmarkExecute
  1102. OnUpdate = actnSetStageBookmarkUpdate
  1103. end
  1104. end
  1105. end