tpSelectTendersFrm.dfm 5.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236
  1. object SelectTendersForm: TSelectTendersForm
  2. Left = 634
  3. Top = 239
  4. BorderIcons = [biSystemMenu]
  5. BorderStyle = bsSingle
  6. Caption = #26631#27573#21010#20998'-'#35774#32622
  7. ClientHeight = 391
  8. ClientWidth = 598
  9. Color = clBtnFace
  10. Font.Charset = ANSI_CHARSET
  11. Font.Color = clWindowText
  12. Font.Height = -12
  13. Font.Name = #23435#20307
  14. Font.Style = []
  15. OldCreateOrder = False
  16. DesignSize = (
  17. 598
  18. 391)
  19. PixelsPerInch = 96
  20. TextHeight = 12
  21. object lblTenderResult: TLabel
  22. Left = 8
  23. Top = 355
  24. Width = 6
  25. Height = 12
  26. end
  27. object btnOk: TButton
  28. Left = 455
  29. Top = 362
  30. Width = 65
  31. Height = 21
  32. Anchors = [akRight, akBottom]
  33. Caption = #30830#23450
  34. TabOrder = 0
  35. OnClick = btnOkClick
  36. end
  37. object btnCancel: TButton
  38. Left = 528
  39. Top = 362
  40. Width = 65
  41. Height = 21
  42. Anchors = [akRight, akBottom]
  43. Caption = #21462#28040
  44. ModalResult = 2
  45. TabOrder = 1
  46. end
  47. object Panel1: TPanel
  48. Left = 4
  49. Top = 0
  50. Width = 590
  51. Height = 348
  52. BevelOuter = bvNone
  53. Caption = 'pnlTenderSelect'
  54. TabOrder = 2
  55. object pnlTenderSelectTitle: TPanel
  56. Left = 0
  57. Top = 0
  58. Width = 590
  59. Height = 25
  60. Align = alTop
  61. BevelOuter = bvNone
  62. TabOrder = 0
  63. object lblTenderSelect: TLabel
  64. Left = 2
  65. Top = 8
  66. Width = 132
  67. Height = 12
  68. Caption = #35831#21246#36873#38656#32479#19968#21010#20998#30340#26631#27573
  69. end
  70. end
  71. object pnlSelect: TPanel
  72. Left = 0
  73. Top = 25
  74. Width = 308
  75. Height = 323
  76. Align = alLeft
  77. BevelOuter = bvNone
  78. TabOrder = 1
  79. object zgTenderSelect: TZJGrid
  80. Left = 0
  81. Top = 19
  82. Width = 308
  83. Height = 304
  84. Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection, goShowTreeLine]
  85. OptionsEx = []
  86. ColCount = 3
  87. RowCount = 1
  88. ShowGridLine = False
  89. DefaultColWidth = 35
  90. DefaultFixedColWidth = 25
  91. DefaultFixedRowHeight = 22
  92. Selection.AlphaBlend = False
  93. Selection.TransparentColor = False
  94. FrozenCol = 0
  95. FrozenRow = 0
  96. OnGetCellText = zgTenderSelectGetCellText
  97. OnSetCellText = zgTenderSelectSetCellText
  98. OnCellTextChanged = zgTenderSelectCellTextChanged
  99. OnDrawCellText = zgTenderSelectDrawCellText
  100. OnShowHint = zgTenderSelectShowHint
  101. Align = alClient
  102. end
  103. object pnlSelectTitle: TPanel
  104. Left = 0
  105. Top = 0
  106. Width = 308
  107. Height = 19
  108. Align = alTop
  109. BevelOuter = bvNone
  110. TabOrder = 1
  111. object lblTenderList: TLabel
  112. Left = 3
  113. Top = 2
  114. Width = 72
  115. Height = 12
  116. Caption = #21487#36873#39033#30446#21015#34920
  117. Font.Charset = ANSI_CHARSET
  118. Font.Color = clBlue
  119. Font.Height = -12
  120. Font.Name = #23435#20307
  121. Font.Style = []
  122. ParentFont = False
  123. end
  124. end
  125. end
  126. object pnlResult: TPanel
  127. Left = 311
  128. Top = 25
  129. Width = 279
  130. Height = 323
  131. Align = alClient
  132. BevelOuter = bvNone
  133. TabOrder = 2
  134. object zgResult: TZJGrid
  135. Left = 0
  136. Top = 19
  137. Width = 279
  138. Height = 304
  139. OptionsEx = []
  140. ColCount = 2
  141. RowCount = 2
  142. ShowGridLine = False
  143. DefaultColWidth = 225
  144. DefaultFixedColWidth = 25
  145. DefaultFixedRowHeight = 22
  146. Selection.AlphaBlend = False
  147. Selection.TransparentColor = False
  148. FrozenCol = 0
  149. FrozenRow = 0
  150. Align = alClient
  151. end
  152. object pnlResultTitle: TPanel
  153. Left = 0
  154. Top = 0
  155. Width = 279
  156. Height = 19
  157. Align = alTop
  158. BevelOuter = bvNone
  159. TabOrder = 1
  160. object lblResultList: TLabel
  161. Left = 3
  162. Top = 2
  163. Width = 72
  164. Height = 12
  165. Caption = #25152#36873#39033#30446#21015#34920
  166. Font.Charset = ANSI_CHARSET
  167. Font.Color = clBlue
  168. Font.Height = -12
  169. Font.Name = #23435#20307
  170. Font.Style = []
  171. ParentFont = False
  172. end
  173. end
  174. end
  175. object pnlDivision: TPanel
  176. Left = 308
  177. Top = 25
  178. Width = 3
  179. Height = 323
  180. Align = alLeft
  181. BevelOuter = bvNone
  182. TabOrder = 3
  183. end
  184. end
  185. object stdTenderSelect: TsdGridTreeDBA
  186. Columns = <
  187. item
  188. Title.Caption = #36873#25321
  189. Title.CaptionAcrossCols = '1'
  190. Title.Font.Charset = GB2312_CHARSET
  191. Title.Font.Color = clWindowText
  192. Title.Font.Height = -12
  193. Title.Font.Name = #23435#20307
  194. Title.Font.Style = []
  195. Alignment = taCenter
  196. EditType = sgeCheckBox
  197. Font.Charset = GB2312_CHARSET
  198. Font.Color = clWindowText
  199. Font.Height = -12
  200. Font.Name = #23435#20307
  201. Font.Style = []
  202. Width = 30
  203. ReadOnly = False
  204. end
  205. item
  206. Title.Caption = #21517#31216
  207. Title.CaptionAcrossCols = '1'
  208. Title.Font.Charset = GB2312_CHARSET
  209. Title.Font.Color = clWindowText
  210. Title.Font.Height = -12
  211. Title.Font.Name = #23435#20307
  212. Title.Font.Style = []
  213. Alignment = taLeftJustify
  214. Font.Charset = GB2312_CHARSET
  215. Font.Color = clWindowText
  216. Font.Height = -12
  217. Font.Name = #23435#20307
  218. Font.Style = []
  219. FieldName = 'Name'
  220. Width = 225
  221. ReadOnly = True
  222. end>
  223. Grid = zgTenderSelect
  224. ExtendRowCount = 0
  225. Options = [aoAllowEdit]
  226. AutoExpand = False
  227. TreeCellCol = 2
  228. KeyFieldName = 'ID'
  229. ParentFieldName = 'ParentID'
  230. NextSiblingFieldName = 'NextSiblingID'
  231. TreeOptions = []
  232. TopLevelBold = True
  233. Left = 100
  234. Top = 177
  235. end
  236. end