ProjectGLFme.dfm 8.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291
  1. object ProjectGLFrame: TProjectGLFrame
  2. Left = 0
  3. Top = 0
  4. Width = 946
  5. Height = 313
  6. TabOrder = 0
  7. object zgProjectGL: TZJGrid
  8. Left = 0
  9. Top = 0
  10. Width = 946
  11. Height = 313
  12. Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection]
  13. OptionsEx = []
  14. ColCount = 13
  15. RowCount = 6
  16. FixedRowCount = 2
  17. ShowGridLine = False
  18. DefaultColWidth = 73
  19. DefaultFixedColWidth = 25
  20. Selection.AlphaBlend = False
  21. Selection.TransparentColor = False
  22. FrozenCol = 0
  23. FrozenRow = 0
  24. OnMouseDown = zgProjectGLMouseDown
  25. Align = alClient
  26. end
  27. object saProjectGL: TsdGridDBA
  28. Columns = <
  29. item
  30. Title.Caption = #32534#21495
  31. Title.CaptionAcrossCols = '1'
  32. Title.CaptionAcrossRows = 2
  33. Title.Font.Charset = GB2312_CHARSET
  34. Title.Font.Color = clWindowText
  35. Title.Font.Height = -12
  36. Title.Font.Name = #23435#20307
  37. Title.Font.Style = []
  38. Alignment = taCenter
  39. Font.Charset = GB2312_CHARSET
  40. Font.Color = clWindowText
  41. Font.Height = -12
  42. Font.Name = #23435#20307
  43. Font.Style = []
  44. FieldName = 'Code'
  45. Width = 60
  46. ReadOnly = False
  47. end
  48. item
  49. Title.Caption = #21517#31216
  50. Title.CaptionAcrossCols = '1'
  51. Title.CaptionAcrossRows = 2
  52. Title.Font.Charset = GB2312_CHARSET
  53. Title.Font.Color = clWindowText
  54. Title.Font.Height = -12
  55. Title.Font.Name = #23435#20307
  56. Title.Font.Style = []
  57. Alignment = taLeftJustify
  58. Font.Charset = GB2312_CHARSET
  59. Font.Color = clWindowText
  60. Font.Height = -12
  61. Font.Name = #23435#20307
  62. Font.Style = []
  63. FieldName = 'Name'
  64. Width = 150
  65. ReadOnly = False
  66. end
  67. item
  68. Title.Caption = #21333#20301
  69. Title.CaptionAcrossCols = '1'
  70. Title.CaptionAcrossRows = 2
  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 = taCenter
  77. Font.Charset = GB2312_CHARSET
  78. Font.Color = clWindowText
  79. Font.Height = -12
  80. Font.Name = 'smartSimSun'
  81. Font.Style = []
  82. FieldName = 'Units'
  83. Width = 45
  84. ReadOnly = False
  85. end
  86. item
  87. Title.Caption = #35268#26684
  88. Title.CaptionAcrossCols = '1'
  89. Title.CaptionAcrossRows = 2
  90. Title.Font.Charset = GB2312_CHARSET
  91. Title.Font.Color = clWindowText
  92. Title.Font.Height = -12
  93. Title.Font.Name = #23435#20307
  94. Title.Font.Style = []
  95. Alignment = taLeftJustify
  96. Font.Charset = GB2312_CHARSET
  97. Font.Color = clWindowText
  98. Font.Height = -12
  99. Font.Name = #23435#20307
  100. Font.Style = []
  101. FieldName = 'Specs'
  102. Width = 60
  103. ReadOnly = False
  104. end
  105. item
  106. Title.Caption = #22522#20934#20215
  107. Title.CaptionAcrossCols = '1'
  108. Title.CaptionAcrossRows = 2
  109. Title.Font.Charset = GB2312_CHARSET
  110. Title.Font.Color = clWindowText
  111. Title.Font.Height = -12
  112. Title.Font.Name = #23435#20307
  113. Title.Font.Style = []
  114. Alignment = taRightJustify
  115. Font.Charset = GB2312_CHARSET
  116. Font.Color = clWindowText
  117. Font.Height = -12
  118. Font.Name = #23435#20307
  119. Font.Style = []
  120. FieldName = 'BasePrice'
  121. Width = 60
  122. ReadOnly = False
  123. end
  124. item
  125. Title.Caption = #39118#38505#24133#24230
  126. Title.CaptionAcrossCols = '1'
  127. Title.CaptionAcrossRows = 2
  128. Title.Font.Charset = GB2312_CHARSET
  129. Title.Font.Color = clWindowText
  130. Title.Font.Height = -12
  131. Title.Font.Name = #23435#20307
  132. Title.Font.Style = []
  133. Alignment = taRightJustify
  134. Font.Charset = GB2312_CHARSET
  135. Font.Color = clWindowText
  136. Font.Height = -12
  137. Font.Name = #23435#20307
  138. Font.Style = []
  139. FieldName = 'RiskRange'
  140. Width = 60
  141. ReadOnly = False
  142. end
  143. item
  144. Title.Caption = #26412#26399#20449#24687#20215'|'#20215#26684
  145. Title.CaptionAcrossCols = '4'
  146. Title.Font.Charset = GB2312_CHARSET
  147. Title.Font.Color = clWindowText
  148. Title.Font.Height = -12
  149. Title.Font.Name = #23435#20307
  150. Title.Font.Style = []
  151. Alignment = taRightJustify
  152. Font.Charset = GB2312_CHARSET
  153. Font.Color = clWindowText
  154. Font.Height = -12
  155. Font.Name = #23435#20307
  156. Font.Style = []
  157. FieldName = 'InfoPrice'
  158. Width = 60
  159. ReadOnly = False
  160. end
  161. item
  162. Title.Caption = '|'#26102#38388
  163. Title.CaptionAcrossCols = '1'
  164. Title.Font.Charset = GB2312_CHARSET
  165. Title.Font.Color = clWindowText
  166. Title.Font.Height = -12
  167. Title.Font.Name = #23435#20307
  168. Title.Font.Style = []
  169. Alignment = taLeftJustify
  170. Font.Charset = GB2312_CHARSET
  171. Font.Color = clWindowText
  172. Font.Height = -12
  173. Font.Name = #23435#20307
  174. Font.Style = []
  175. FieldName = 'InfoDate'
  176. ReadOnly = False
  177. end
  178. item
  179. Title.Caption = '|'#20215#24046
  180. Title.CaptionAcrossCols = '1'
  181. Title.Font.Charset = GB2312_CHARSET
  182. Title.Font.Color = clWindowText
  183. Title.Font.Height = -12
  184. Title.Font.Name = #23435#20307
  185. Title.Font.Style = []
  186. Alignment = taRightJustify
  187. Font.Charset = GB2312_CHARSET
  188. Font.Color = clWindowText
  189. Font.Height = -12
  190. Font.Name = #23435#20307
  191. Font.Style = []
  192. FieldName = 'DeltaPrice'
  193. Width = 60
  194. ReadOnly = True
  195. end
  196. item
  197. Title.Caption = '|'#26377#25928#20215#24046
  198. Title.CaptionAcrossCols = '1'
  199. Title.Font.Charset = GB2312_CHARSET
  200. Title.Font.Color = clWindowText
  201. Title.Font.Height = -12
  202. Title.Font.Name = #23435#20307
  203. Title.Font.Style = []
  204. Alignment = taRightJustify
  205. Font.Charset = GB2312_CHARSET
  206. Font.Color = clWindowText
  207. Font.Height = -12
  208. Font.Name = #23435#20307
  209. Font.Style = []
  210. FieldName = 'ValidDeltaPrice'
  211. Width = 60
  212. ReadOnly = True
  213. end
  214. item
  215. Title.Caption = #26412#26399#20215#24046#35745#31639'|'#25968#37327
  216. Title.CaptionAcrossCols = '2'
  217. Title.Font.Charset = GB2312_CHARSET
  218. Title.Font.Color = clWindowText
  219. Title.Font.Height = -12
  220. Title.Font.Name = #23435#20307
  221. Title.Font.Style = []
  222. Alignment = taRightJustify
  223. Font.Charset = GB2312_CHARSET
  224. Font.Color = clWindowText
  225. Font.Height = -12
  226. Font.Name = #23435#20307
  227. Font.Style = []
  228. FieldName = 'PM_Quantity'
  229. Width = 60
  230. ReadOnly = True
  231. end
  232. item
  233. Title.Caption = '|'#37329#39069
  234. Title.CaptionAcrossCols = '1'
  235. Title.Font.Charset = GB2312_CHARSET
  236. Title.Font.Color = clWindowText
  237. Title.Font.Height = -12
  238. Title.Font.Name = #23435#20307
  239. Title.Font.Style = []
  240. Alignment = taRightJustify
  241. Font.Charset = GB2312_CHARSET
  242. Font.Color = clWindowText
  243. Font.Height = -12
  244. Font.Name = #23435#20307
  245. Font.Style = []
  246. FieldName = 'PM_TotalPrice'
  247. Width = 60
  248. ReadOnly = True
  249. end>
  250. Grid = zgProjectGL
  251. ExtendRowCount = 3
  252. Left = 96
  253. Top = 88
  254. end
  255. object dxpmProjectGL: TdxBarPopupMenu
  256. BarManager = MainForm.dxBarManager
  257. ItemLinks = <
  258. item
  259. Item = MainForm.dxbtnCalculatePriceMargin
  260. Visible = True
  261. end
  262. item
  263. BeginGroup = True
  264. Item = MainForm.dxbtnCopy
  265. Visible = True
  266. end
  267. item
  268. Item = MainForm.dxbtnPaste
  269. Visible = True
  270. end
  271. item
  272. BeginGroup = True
  273. Item = MainForm.dxbtnDelete
  274. Visible = True
  275. end>
  276. UseOwnFont = False
  277. OnPopup = dxpmProjectGLPopup
  278. Left = 152
  279. Top = 88
  280. end
  281. object actnProjectGL: TActionList
  282. Images = MainForm.Images
  283. Left = 208
  284. Top = 88
  285. object actnCalculatePriceMargin: TAction
  286. Caption = #20215#24046#35745#31639
  287. ImageIndex = 15
  288. OnExecute = actnCalculatePriceMarginExecute
  289. end
  290. end
  291. end