BillsMeasureFme.dfm 35 KB

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