tpPegGclGatherFme.dfm 7.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262
  1. object tpPegGclGatherFrame: TtpPegGclGatherFrame
  2. Left = 0
  3. Top = 0
  4. Width = 685
  5. Height = 513
  6. TabOrder = 0
  7. object sprPeg_Gcl: TSplitter
  8. Left = 0
  9. Top = 310
  10. Width = 685
  11. Height = 3
  12. Cursor = crVSplit
  13. Align = alBottom
  14. end
  15. object zgGclGather: TZJGrid
  16. Left = 0
  17. Top = 0
  18. Width = 685
  19. Height = 310
  20. Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection]
  21. OptionsEx = []
  22. ColCount = 7
  23. ShowGridLine = False
  24. DefaultColWidth = 73
  25. DefaultFixedColWidth = 25
  26. Selection.AlphaBlend = False
  27. Selection.TransparentColor = False
  28. FrozenCol = 0
  29. FrozenRow = 0
  30. Align = alClient
  31. end
  32. object zgGclRela: TZJGrid
  33. Left = 0
  34. Top = 313
  35. Width = 685
  36. Height = 200
  37. Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection]
  38. OptionsEx = []
  39. ColCount = 6
  40. ShowGridLine = False
  41. DefaultColWidth = 73
  42. DefaultFixedColWidth = 25
  43. Selection.AlphaBlend = False
  44. Selection.TransparentColor = False
  45. FrozenCol = 0
  46. FrozenRow = 0
  47. Align = alBottom
  48. end
  49. object saGclGather: TsdGridDBA
  50. Columns = <
  51. item
  52. Title.Caption = #28165#21333#32534#21495
  53. Title.CaptionAcrossCols = '1'
  54. Title.Font.Charset = GB2312_CHARSET
  55. Title.Font.Color = clWindowText
  56. Title.Font.Height = -12
  57. Title.Font.Name = #23435#20307
  58. Title.Font.Style = []
  59. Alignment = taLeftJustify
  60. Font.Charset = GB2312_CHARSET
  61. Font.Color = clWindowText
  62. Font.Height = -12
  63. Font.Name = #23435#20307
  64. Font.Style = []
  65. FieldName = 'B_Code'
  66. ReadOnly = False
  67. end
  68. item
  69. Title.Caption = #21517#31216
  70. Title.CaptionAcrossCols = '1'
  71. Title.Font.Charset = GB2312_CHARSET
  72. Title.Font.Color = clWindowText
  73. Title.Font.Height = -12
  74. Title.Font.Name = #23435#20307
  75. Title.Font.Style = []
  76. Alignment = taLeftJustify
  77. Font.Charset = GB2312_CHARSET
  78. Font.Color = clWindowText
  79. Font.Height = -12
  80. Font.Name = #23435#20307
  81. Font.Style = []
  82. FieldName = 'Name'
  83. Width = 200
  84. ReadOnly = True
  85. end
  86. item
  87. Title.Caption = #21333#20301
  88. Title.CaptionAcrossCols = '1'
  89. Title.Font.Charset = GB2312_CHARSET
  90. Title.Font.Color = clWindowText
  91. Title.Font.Height = -12
  92. Title.Font.Name = #23435#20307
  93. Title.Font.Style = []
  94. Alignment = taCenter
  95. Font.Charset = GB2312_CHARSET
  96. Font.Color = clWindowText
  97. Font.Height = -12
  98. Font.Name = #23435#20307
  99. Font.Style = []
  100. FieldName = 'Units'
  101. Width = 45
  102. ReadOnly = True
  103. end
  104. item
  105. Title.Caption = #21333#20215
  106. Title.CaptionAcrossCols = '1'
  107. Title.Font.Charset = GB2312_CHARSET
  108. Title.Font.Color = clWindowText
  109. Title.Font.Height = -12
  110. Title.Font.Name = #23435#20307
  111. Title.Font.Style = []
  112. Alignment = taRightJustify
  113. Font.Charset = GB2312_CHARSET
  114. Font.Color = clWindowText
  115. Font.Height = -12
  116. Font.Name = #23435#20307
  117. Font.Style = []
  118. FieldName = 'Price'
  119. Width = 80
  120. ReadOnly = True
  121. end
  122. item
  123. Title.Caption = #25968#37327
  124. Title.CaptionAcrossCols = '1'
  125. Title.Font.Charset = GB2312_CHARSET
  126. Title.Font.Color = clWindowText
  127. Title.Font.Height = -12
  128. Title.Font.Name = #23435#20307
  129. Title.Font.Style = []
  130. Alignment = taRightJustify
  131. Font.Charset = GB2312_CHARSET
  132. Font.Color = clWindowText
  133. Font.Height = -12
  134. Font.Name = #23435#20307
  135. Font.Style = []
  136. FieldName = 'Quantity'
  137. Width = 80
  138. ReadOnly = True
  139. end
  140. item
  141. Title.Caption = #37329#39069
  142. Title.CaptionAcrossCols = '1'
  143. Title.Font.Charset = GB2312_CHARSET
  144. Title.Font.Color = clWindowText
  145. Title.Font.Height = -12
  146. Title.Font.Name = #23435#20307
  147. Title.Font.Style = []
  148. Alignment = taRightJustify
  149. Font.Charset = GB2312_CHARSET
  150. Font.Color = clWindowText
  151. Font.Height = -12
  152. Font.Name = #23435#20307
  153. Font.Style = []
  154. FieldName = 'TotalPrice'
  155. Width = 80
  156. ReadOnly = True
  157. end>
  158. Grid = zgGclGather
  159. ExtendRowCount = 0
  160. Options = []
  161. Left = 120
  162. Top = 88
  163. end
  164. object saGclRela: TsdGridDBA
  165. Columns = <
  166. item
  167. Title.Caption = #39033#30446#33410#32534#21495
  168. Title.CaptionAcrossCols = '1'
  169. Title.Font.Charset = GB2312_CHARSET
  170. Title.Font.Color = clWindowText
  171. Title.Font.Height = -12
  172. Title.Font.Name = #23435#20307
  173. Title.Font.Style = []
  174. Alignment = taLeftJustify
  175. Font.Charset = GB2312_CHARSET
  176. Font.Color = clWindowText
  177. Font.Height = -12
  178. Font.Name = #23435#20307
  179. Font.Style = []
  180. FieldName = 'PegXmjCode'
  181. Width = 120
  182. ReadOnly = True
  183. end
  184. item
  185. Title.Caption = #21517#31216
  186. Title.CaptionAcrossCols = '1'
  187. Title.Font.Charset = GB2312_CHARSET
  188. Title.Font.Color = clWindowText
  189. Title.Font.Height = -12
  190. Title.Font.Name = #23435#20307
  191. Title.Font.Style = []
  192. Alignment = taLeftJustify
  193. Font.Charset = GB2312_CHARSET
  194. Font.Color = clWindowText
  195. Font.Height = -12
  196. Font.Name = #23435#20307
  197. Font.Style = []
  198. FieldName = 'PegXmjName'
  199. Width = 200
  200. ReadOnly = True
  201. end
  202. item
  203. Title.Caption = #21333#20301
  204. Title.CaptionAcrossCols = '1'
  205. Title.Font.Charset = GB2312_CHARSET
  206. Title.Font.Color = clWindowText
  207. Title.Font.Height = -12
  208. Title.Font.Name = #23435#20307
  209. Title.Font.Style = []
  210. Alignment = taCenter
  211. Font.Charset = GB2312_CHARSET
  212. Font.Color = clWindowText
  213. Font.Height = -12
  214. Font.Name = #23435#20307
  215. Font.Style = []
  216. FieldName = 'PegXmjUnits'
  217. Width = 45
  218. ReadOnly = True
  219. end
  220. item
  221. Title.Caption = #25968#37327
  222. Title.CaptionAcrossCols = '1'
  223. Title.Font.Charset = GB2312_CHARSET
  224. Title.Font.Color = clWindowText
  225. Title.Font.Height = -12
  226. Title.Font.Name = #23435#20307
  227. Title.Font.Style = []
  228. Alignment = taRightJustify
  229. Font.Charset = GB2312_CHARSET
  230. Font.Color = clWindowText
  231. Font.Height = -12
  232. Font.Name = #23435#20307
  233. Font.Style = []
  234. FieldName = 'Quantity'
  235. Width = 80
  236. ReadOnly = True
  237. end
  238. item
  239. Title.Caption = #37329#39069
  240. Title.CaptionAcrossCols = '1'
  241. Title.Font.Charset = GB2312_CHARSET
  242. Title.Font.Color = clWindowText
  243. Title.Font.Height = -12
  244. Title.Font.Name = #23435#20307
  245. Title.Font.Style = []
  246. Alignment = taRightJustify
  247. Font.Charset = GB2312_CHARSET
  248. Font.Color = clWindowText
  249. Font.Height = -12
  250. Font.Name = #23435#20307
  251. Font.Style = []
  252. FieldName = 'TotalPrice'
  253. Width = 80
  254. ReadOnly = True
  255. end>
  256. Grid = zgGclRela
  257. ExtendRowCount = 0
  258. Options = []
  259. Left = 120
  260. Top = 360
  261. end
  262. end