Measure/ProjGather/ProjGatherSelectFrm.dfm

object ProjGatherSelectForm: TProjGatherSelectForm
  Left = 454
  Top = 235
  BorderStyle = bsSingle
  Caption = #36873#25321#27719#24635#39033#30446
  ClientHeight = 523
  ClientWidth = 816
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 12
  object lblProjectList: TLabel
    Left = 8
    Top = 8
    Width = 72
    Height = 12
    Caption = #21487#36873#39033#30446#21015#34920
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object lblResult: TLabel
    Left = 451
    Top = 8
    Width = 48
    Height = 12
    Caption = #25152#36873#32467#26524
    Font.Charset = ANSI_CHARSET
    Font.Color = clBlue
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object zgSelectProject: TZJGrid
    Left = 5
    Top = 24
    Width = 441
    Height = 457
    Options = [goRangeSelect, goRowSizing, goColSizing, goCellNotMaintainData, goFixedRowShowNo, goFixedColShowNo, goAlwaysShowSelection, goShowTreeLine]
    OptionsEx = []
    RowCount = 1
    ShowGridLine = False
    DefaultColWidth = 35
    DefaultFixedColWidth = 25
    DefaultFixedRowHeight = 32
    Selection.AlphaBlend = False
    Selection.TransparentColor = False
    FrozenCol = 0
    FrozenRow = 0
    OnGetCellText = zgSelectProjectGetCellText
    OnSetCellText = zgSelectProjectSetCellText
    OnCellTextChanged = zgSelectProjectCellTextChanged
    OnDrawCellText = zgSelectProjectDrawCellText
  end
  object zgResult: TZJGrid
    Left = 451
    Top = 24
    Width = 360
    Height = 457
    OptionsEx = []
    ColCount = 2
    RowCount = 1
    ShowGridLine = False
    DefaultColWidth = 308
    DefaultFixedColWidth = 25
    DefaultFixedRowHeight = 32
    Selection.AlphaBlend = False
    Selection.TransparentColor = False
    FrozenCol = 0
    FrozenRow = 0
    OnGetCellText = zgResultGetCellText
    OnSetCellText = zgResultSetCellText
  end
  object btnOk: TButton
    Left = 649
    Top = 489
    Width = 74
    Height = 25
    Caption = #30830' '#23450
    TabOrder = 2
    OnClick = btnOkClick
  end
  object btnCancel: TButton
    Left = 736
    Top = 489
    Width = 74
    Height = 25
    Caption = #21462' '#28040
    ModalResult = 2
    TabOrder = 3
  end
  object stdSelectProject: TsdGridTreeDBA
    Columns = <
      item
        Title.Caption = #36873#25321
        Title.CaptionAcrossCols = '1'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Alignment = taLeftJustify
        EditType = sgeCheckBox
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        Width = 35
        ReadOnly = False
      end
      item
        Title.Caption = #21517#31216
        Title.CaptionAcrossCols = '1'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Alignment = taLeftJustify
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        FieldName = 'Name'
        Width = 280
        ReadOnly = True
      end
      item
        Title.Caption = #35745#37327#26399#25968
        Title.CaptionAcrossCols = '1'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Alignment = taLeftJustify
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        FieldName = 'PhaseCount'
        Width = 35
        ReadOnly = True
      end
      item
        Title.Caption = #23457#25209#29366#24577
        Title.CaptionAcrossCols = '1'
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Alignment = taLeftJustify
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        FieldName = 'AuditStatus'
        Width = 35
        ReadOnly = False
      end>
    Grid = zgSelectProject
    ExtendRowCount = 0
    Options = [aoAllowEdit]
    AutoExpand = True
    TreeCellCol = 2
    KeyFieldName = 'ID'
    ParentFieldName = 'ParentID'
    NextSiblingFieldName = 'NextSiblingID'
    TreeOptions = []
    TopLevelBold = True
    Left = 120
    Top = 160
  end
end