stgGclResultFrm.dfm 10 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355
  1. object stgGclResultForm: TstgGclResultForm
  2. Left = 192
  3. Top = 123
  4. Width = 1305
  5. Height = 675
  6. ActiveControl = zgGatherGcl
  7. BorderIcons = [biSystemMenu, biMaximize]
  8. Caption = #20998#21253#27719#24635
  9. Color = clBtnFace
  10. Font.Charset = DEFAULT_CHARSET
  11. Font.Color = clWindowText
  12. Font.Height = -11
  13. Font.Name = 'MS Sans Serif'
  14. Font.Style = []
  15. OldCreateOrder = False
  16. Position = poMainFormCenter
  17. PixelsPerInch = 96
  18. TextHeight = 13
  19. object jpsResult: TJimPages
  20. Left = 0
  21. Top = 22
  22. Width = 1297
  23. Height = 594
  24. ActivePage = jpsResultBillsDetail
  25. ActivePageIndex = 0
  26. Align = alClient
  27. Caption = 'jpsResult'
  28. object jpsResultBillsDetail: TJimPage
  29. Left = 0
  30. Top = 0
  31. Width = 1297
  32. Height = 594
  33. TabName = 'BillsDetail'
  34. Caption = 'Tree'
  35. object Splitter1: TSplitter
  36. Left = 924
  37. Top = 0
  38. Height = 594
  39. Align = alRight
  40. end
  41. object pnlGatherTree: TPanel
  42. Left = 0
  43. Top = 0
  44. Width = 924
  45. Height = 594
  46. Align = alClient
  47. BevelOuter = bvNone
  48. TabOrder = 0
  49. object zgGatherGcl: TZJGrid
  50. Left = 0
  51. Top = 0
  52. Width = 924
  53. Height = 594
  54. Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection, goShowTreeLine]
  55. OptionsEx = []
  56. ColCount = 7
  57. ShowGridLine = False
  58. DefaultColWidth = 73
  59. DefaultFixedColWidth = 25
  60. Selection.AlphaBlend = False
  61. Selection.TransparentColor = False
  62. FrozenCol = 0
  63. FrozenRow = 0
  64. OnMouseDown = zgGatherGclMouseDown
  65. Align = alClient
  66. end
  67. end
  68. object pnlDetail: TPanel
  69. Left = 927
  70. Top = 0
  71. Width = 370
  72. Height = 594
  73. Align = alRight
  74. BevelOuter = bvNone
  75. TabOrder = 1
  76. object zgBillsDetail: TZJGrid
  77. Left = 0
  78. Top = 0
  79. Width = 370
  80. Height = 594
  81. Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection]
  82. OptionsEx = []
  83. ShowGridLine = False
  84. DefaultColWidth = 73
  85. DefaultFixedColWidth = 25
  86. Selection.AlphaBlend = False
  87. Selection.TransparentColor = False
  88. FrozenCol = 0
  89. FrozenRow = 0
  90. Align = alClient
  91. end
  92. end
  93. end
  94. end
  95. object jtsGatherData: TJimTabSet
  96. Left = 0
  97. Top = 0
  98. Width = 1297
  99. Height = 22
  100. Align = alTop
  101. BackgroundColor = clGradientInactiveCaption
  102. Font.Charset = DEFAULT_CHARSET
  103. Font.Color = clWindowText
  104. Font.Height = -12
  105. Font.Name = 'smartSimSun'
  106. Font.Style = []
  107. SelectedColor = clWhite
  108. XPSelectedColor = clWhite
  109. XPUnSelectedColor = 15200496
  110. Tabs.Strings = (
  111. #27719#24635#32467#26524)
  112. TabPosition = jtpTop
  113. TabStyle = tdsNew
  114. UnselectedColor = 15200496
  115. end
  116. object pnlResult: TPanel
  117. Left = 0
  118. Top = 616
  119. Width = 1297
  120. Height = 28
  121. Align = alBottom
  122. BevelOuter = bvNone
  123. TabOrder = 2
  124. Visible = False
  125. object lblResult: TLabel
  126. Left = 4
  127. Top = 8
  128. Width = 692
  129. Height = 13
  130. Caption = #20849#27719#24635'3'#20010#26631#27573#25968#25454#65292#20849#27719#24635#24037#31243#37327#28165#21333'X'#26465#65292#20854#20013'Y'#26465#27491#30830#27719#24635#65292#35813#37096#20998#21487#27491#30830#23548#20837#24635#21253#65292#26410#27491#30830#27719#24635#28165#21333#21487#35265#28165#21333#26126#32454#20013#28784#33394#37096#20998
  131. end
  132. end
  133. object sdBillsDetail: TsdGridDBA
  134. Columns = <
  135. item
  136. Title.Caption = #26631#27573
  137. Title.CaptionAcrossCols = '1'
  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. Font.Charset = GB2312_CHARSET
  145. Font.Color = clWindowText
  146. Font.Height = -12
  147. Font.Name = #23435#20307
  148. Font.Style = []
  149. FieldName = 'TenderName'
  150. ReadOnly = False
  151. end
  152. item
  153. Title.Caption = #20301#32622
  154. Title.CaptionAcrossCols = '1'
  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 = taCenter
  161. Font.Charset = GB2312_CHARSET
  162. Font.Color = clWindowText
  163. Font.Height = -12
  164. Font.Name = #23435#20307
  165. Font.Style = []
  166. FieldName = 'SerialNo'
  167. Width = 50
  168. ReadOnly = False
  169. end
  170. item
  171. Title.Caption = #21512#21516#35745#37327
  172. Title.CaptionAcrossCols = '1'
  173. Title.Font.Charset = GB2312_CHARSET
  174. Title.Font.Color = clWindowText
  175. Title.Font.Height = -12
  176. Title.Font.Name = #23435#20307
  177. Title.Font.Style = []
  178. Alignment = taRightJustify
  179. Font.Charset = GB2312_CHARSET
  180. Font.Color = clWindowText
  181. Font.Height = -12
  182. Font.Name = #23435#20307
  183. Font.Style = []
  184. FieldName = 'DealQuantity'
  185. Width = 85
  186. ReadOnly = False
  187. end
  188. item
  189. Title.Caption = #25968#37327#21464#26356#35745#37327
  190. Title.CaptionAcrossCols = '1'
  191. Title.Font.Charset = GB2312_CHARSET
  192. Title.Font.Color = clWindowText
  193. Title.Font.Height = -12
  194. Title.Font.Name = #23435#20307
  195. Title.Font.Style = []
  196. Alignment = taRightJustify
  197. Font.Charset = GB2312_CHARSET
  198. Font.Color = clWindowText
  199. Font.Height = -12
  200. Font.Name = #23435#20307
  201. Font.Style = []
  202. FieldName = 'QcQuantity'
  203. Width = 85
  204. ReadOnly = False
  205. end>
  206. Grid = zgBillsDetail
  207. ExtendRowCount = 0
  208. Options = []
  209. Left = 157
  210. Top = 110
  211. end
  212. object dxpmGatherTree: TdxBarPopupMenu
  213. BarManager = MainForm.dxBarManager
  214. ItemLinks = <
  215. item
  216. Item = MainForm.dxbtnExportStgResult
  217. Visible = True
  218. end
  219. item
  220. Item = MainForm.dxbtnExportStgResultExcel
  221. Visible = True
  222. end>
  223. UseOwnFont = False
  224. OnPopup = dxpmGatherTreePopup
  225. Left = 104
  226. Top = 148
  227. end
  228. object alStgResult: TActionList
  229. Images = MainForm.Images
  230. Left = 256
  231. Top = 110
  232. object actnExportStgResultExcel: TAction
  233. Caption = #23548#20986#20998#21253#27719#24635'Excel'#26684#24335
  234. ImageIndex = 13
  235. OnExecute = actnExportStgResultExcelExecute
  236. end
  237. object actnExportStgResult: TAction
  238. Caption = #23548#20986#20998#21253#27719#24635#36719#20214#26684#24335
  239. ImageIndex = 28
  240. OnExecute = actnExportStgResultExecute
  241. end
  242. end
  243. object saGatherGcl: TsdGridDBA
  244. Columns = <
  245. item
  246. Title.Caption = #28165#21333#32534#21495
  247. Title.CaptionAcrossCols = '1'
  248. Title.Font.Charset = GB2312_CHARSET
  249. Title.Font.Color = clWindowText
  250. Title.Font.Height = -12
  251. Title.Font.Name = #23435#20307
  252. Title.Font.Style = []
  253. Alignment = taLeftJustify
  254. Font.Charset = GB2312_CHARSET
  255. Font.Color = clWindowText
  256. Font.Height = -12
  257. Font.Name = #23435#20307
  258. Font.Style = []
  259. FieldName = 'B_Code'
  260. Width = 120
  261. ReadOnly = False
  262. end
  263. item
  264. Title.Caption = #21517#31216
  265. Title.CaptionAcrossCols = '1'
  266. Title.Font.Charset = GB2312_CHARSET
  267. Title.Font.Color = clWindowText
  268. Title.Font.Height = -12
  269. Title.Font.Name = #23435#20307
  270. Title.Font.Style = []
  271. Alignment = taLeftJustify
  272. Font.Charset = GB2312_CHARSET
  273. Font.Color = clWindowText
  274. Font.Height = -12
  275. Font.Name = #23435#20307
  276. Font.Style = []
  277. FieldName = 'Name'
  278. Width = 250
  279. ReadOnly = False
  280. end
  281. item
  282. Title.Caption = #21333#20301
  283. Title.CaptionAcrossCols = '1'
  284. Title.Font.Charset = GB2312_CHARSET
  285. Title.Font.Color = clWindowText
  286. Title.Font.Height = -12
  287. Title.Font.Name = #23435#20307
  288. Title.Font.Style = []
  289. Alignment = taCenter
  290. Font.Charset = GB2312_CHARSET
  291. Font.Color = clWindowText
  292. Font.Height = -12
  293. Font.Name = #23435#20307
  294. Font.Style = []
  295. FieldName = 'Units'
  296. Width = 60
  297. ReadOnly = False
  298. end
  299. item
  300. Title.Caption = #21333#20215
  301. Title.CaptionAcrossCols = '1'
  302. Title.Font.Charset = GB2312_CHARSET
  303. Title.Font.Color = clWindowText
  304. Title.Font.Height = -12
  305. Title.Font.Name = #23435#20307
  306. Title.Font.Style = []
  307. Alignment = taRightJustify
  308. Font.Charset = GB2312_CHARSET
  309. Font.Color = clWindowText
  310. Font.Height = -12
  311. Font.Name = #23435#20307
  312. Font.Style = []
  313. FieldName = 'Price'
  314. Width = 80
  315. ReadOnly = False
  316. end
  317. item
  318. Title.Caption = #21512#21516#35745#37327
  319. Title.CaptionAcrossCols = '1'
  320. Title.Font.Charset = GB2312_CHARSET
  321. Title.Font.Color = clWindowText
  322. Title.Font.Height = -12
  323. Title.Font.Name = #23435#20307
  324. Title.Font.Style = []
  325. Alignment = taRightJustify
  326. Font.Charset = GB2312_CHARSET
  327. Font.Color = clWindowText
  328. Font.Height = -12
  329. Font.Name = #23435#20307
  330. Font.Style = []
  331. FieldName = 'DealQuantity'
  332. ReadOnly = False
  333. end
  334. item
  335. Title.Caption = #25968#37327#21464#26356#35745#37327
  336. Title.CaptionAcrossCols = '1'
  337. Title.Font.Charset = GB2312_CHARSET
  338. Title.Font.Color = clWindowText
  339. Title.Font.Height = -12
  340. Title.Font.Name = #23435#20307
  341. Title.Font.Style = []
  342. Alignment = taRightJustify
  343. Font.Charset = GB2312_CHARSET
  344. Font.Color = clWindowText
  345. Font.Height = -12
  346. Font.Name = #23435#20307
  347. Font.Style = []
  348. FieldName = 'QcQuantity'
  349. ReadOnly = False
  350. end>
  351. Grid = zgGatherGcl
  352. Left = 104
  353. Top = 110
  354. end
  355. end