ProjGatherSelectFme.dfm 6.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253
  1. object ProjGatherSelectFrame: TProjGatherSelectFrame
  2. Left = 0
  3. Top = 0
  4. Width = 816
  5. Height = 483
  6. TabOrder = 0
  7. object pnlProjects: TPanel
  8. Left = 0
  9. Top = 0
  10. Width = 449
  11. Height = 483
  12. Align = alLeft
  13. BevelOuter = bvNone
  14. TabOrder = 0
  15. object pnlProjectsTitle: TPanel
  16. Left = 0
  17. Top = 0
  18. Width = 449
  19. Height = 24
  20. Align = alTop
  21. BevelOuter = bvNone
  22. TabOrder = 0
  23. object lblProjectList: TLabel
  24. Left = 8
  25. Top = 8
  26. Width = 72
  27. Height = 12
  28. Caption = #21487#36873#39033#30446#21015#34920
  29. Font.Charset = ANSI_CHARSET
  30. Font.Color = clBlue
  31. Font.Height = -12
  32. Font.Name = #23435#20307
  33. Font.Style = []
  34. ParentFont = False
  35. end
  36. end
  37. object zgSelectProject: TZJGrid
  38. Left = 5
  39. Top = 24
  40. Width = 441
  41. Height = 456
  42. Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection, goShowTreeLine]
  43. OptionsEx = []
  44. RowCount = 1
  45. ShowGridLine = False
  46. DefaultColWidth = 35
  47. DefaultFixedColWidth = 25
  48. DefaultFixedRowHeight = 32
  49. Selection.AlphaBlend = False
  50. Selection.TransparentColor = False
  51. FrozenCol = 0
  52. FrozenRow = 0
  53. OnGetCellText = zgSelectProjectGetCellText
  54. OnSetCellText = zgSelectProjectSetCellText
  55. OnCellTextChanged = zgSelectProjectCellTextChanged
  56. OnDrawCellText = zgSelectProjectDrawCellText
  57. OnCellGetColor = zgSelectProjectCellGetColor
  58. Align = alClient
  59. end
  60. object pnlProjLeft: TPanel
  61. Left = 0
  62. Top = 24
  63. Width = 5
  64. Height = 456
  65. Align = alLeft
  66. BevelOuter = bvNone
  67. TabOrder = 2
  68. end
  69. object pnlProjRight: TPanel
  70. Left = 446
  71. Top = 24
  72. Width = 3
  73. Height = 456
  74. Align = alRight
  75. BevelOuter = bvNone
  76. TabOrder = 3
  77. end
  78. object pnlProjBottom: TPanel
  79. Left = 0
  80. Top = 480
  81. Width = 449
  82. Height = 3
  83. Align = alBottom
  84. BevelOuter = bvNone
  85. TabOrder = 4
  86. end
  87. end
  88. object pnlResults: TPanel
  89. Left = 449
  90. Top = 0
  91. Width = 367
  92. Height = 483
  93. Align = alClient
  94. BevelOuter = bvNone
  95. TabOrder = 1
  96. object pnlResultTitle: TPanel
  97. Left = 0
  98. Top = 0
  99. Width = 367
  100. Height = 24
  101. Align = alTop
  102. BevelOuter = bvNone
  103. TabOrder = 0
  104. object lblResult: TLabel
  105. Left = 8
  106. Top = 8
  107. Width = 48
  108. Height = 12
  109. Caption = #25152#36873#32467#26524
  110. Font.Charset = ANSI_CHARSET
  111. Font.Color = clBlue
  112. Font.Height = -12
  113. Font.Name = #23435#20307
  114. Font.Style = []
  115. ParentFont = False
  116. end
  117. end
  118. object zgResult: TZJGrid
  119. Left = 3
  120. Top = 24
  121. Width = 359
  122. Height = 456
  123. OptionsEx = []
  124. ColCount = 2
  125. RowCount = 1
  126. ShowGridLine = False
  127. DefaultColWidth = 308
  128. DefaultFixedColWidth = 25
  129. DefaultFixedRowHeight = 32
  130. Selection.AlphaBlend = False
  131. Selection.TransparentColor = False
  132. FrozenCol = 0
  133. FrozenRow = 0
  134. OnGetCellText = zgResultGetCellText
  135. OnSetCellText = zgResultSetCellText
  136. Align = alClient
  137. end
  138. object pnlResultLeft: TPanel
  139. Left = 0
  140. Top = 24
  141. Width = 3
  142. Height = 456
  143. Align = alLeft
  144. BevelOuter = bvNone
  145. TabOrder = 2
  146. end
  147. object pnlResultBottom: TPanel
  148. Left = 0
  149. Top = 480
  150. Width = 367
  151. Height = 3
  152. Align = alBottom
  153. BevelOuter = bvNone
  154. TabOrder = 3
  155. end
  156. object pnlResultRight: TPanel
  157. Left = 362
  158. Top = 24
  159. Width = 5
  160. Height = 456
  161. Align = alRight
  162. BevelOuter = bvNone
  163. TabOrder = 4
  164. end
  165. end
  166. object stdSelectProject: TsdGridTreeDBA
  167. Columns = <
  168. item
  169. Title.Caption = #36873#25321
  170. Title.CaptionAcrossCols = '1'
  171. Title.Font.Charset = GB2312_CHARSET
  172. Title.Font.Color = clWindowText
  173. Title.Font.Height = -12
  174. Title.Font.Name = #23435#20307
  175. Title.Font.Style = []
  176. Alignment = taLeftJustify
  177. EditType = sgeCheckBox
  178. Font.Charset = GB2312_CHARSET
  179. Font.Color = clWindowText
  180. Font.Height = -12
  181. Font.Name = #23435#20307
  182. Font.Style = []
  183. Width = 35
  184. ReadOnly = False
  185. end
  186. item
  187. Title.Caption = #21517#31216
  188. Title.CaptionAcrossCols = '1'
  189. Title.Font.Charset = GB2312_CHARSET
  190. Title.Font.Color = clWindowText
  191. Title.Font.Height = -12
  192. Title.Font.Name = #23435#20307
  193. Title.Font.Style = []
  194. Alignment = taLeftJustify
  195. Font.Charset = GB2312_CHARSET
  196. Font.Color = clWindowText
  197. Font.Height = -12
  198. Font.Name = #23435#20307
  199. Font.Style = []
  200. FieldName = 'Name'
  201. Width = 280
  202. ReadOnly = True
  203. end
  204. item
  205. Title.Caption = #35745#37327#26399#25968
  206. Title.CaptionAcrossCols = '1'
  207. Title.Font.Charset = GB2312_CHARSET
  208. Title.Font.Color = clWindowText
  209. Title.Font.Height = -12
  210. Title.Font.Name = #23435#20307
  211. Title.Font.Style = []
  212. Alignment = taLeftJustify
  213. Font.Charset = GB2312_CHARSET
  214. Font.Color = clWindowText
  215. Font.Height = -12
  216. Font.Name = #23435#20307
  217. Font.Style = []
  218. FieldName = 'PhaseCount'
  219. Width = 35
  220. ReadOnly = True
  221. end
  222. item
  223. Title.Caption = #23457#25209#29366#24577
  224. Title.CaptionAcrossCols = '1'
  225. Title.Font.Charset = GB2312_CHARSET
  226. Title.Font.Color = clWindowText
  227. Title.Font.Height = -12
  228. Title.Font.Name = #23435#20307
  229. Title.Font.Style = []
  230. Alignment = taLeftJustify
  231. Font.Charset = GB2312_CHARSET
  232. Font.Color = clWindowText
  233. Font.Height = -12
  234. Font.Name = #23435#20307
  235. Font.Style = []
  236. FieldName = 'AuditStatus'
  237. Width = 35
  238. ReadOnly = True
  239. end>
  240. Grid = zgSelectProject
  241. ExtendRowCount = 0
  242. Options = [aoAllowEdit]
  243. AutoExpand = True
  244. TreeCellCol = 2
  245. KeyFieldName = 'ID'
  246. ParentFieldName = 'ParentID'
  247. NextSiblingFieldName = 'NextSiblingID'
  248. TreeOptions = []
  249. TopLevelBold = True
  250. Left = 120
  251. Top = 160
  252. end
  253. end