bysj.dfm

高校教师工作量计算管理系统的设计与开发

      Left = 504
      Top = 16
      Width = 273
      Height = 161
      Caption = '查询筛选'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      object Label9: TLabel
        Left = 93
        Top = 56
        Width = 36
        Height = 16
        Caption = '内容：'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        Transparent = True
      end
      object Label13: TLabel
        Left = 14
        Top = 113
        Width = 491
        Height = 40
        AutoSize = False
        Caption = 
          '注意:文字，年度用单引号标注 '#13#10' 例如：’张三‘，‘2006'#39'  可使用%,' +
          '$通配符'#13#10'数值直接标注。'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        Transparent = True
      end
      object CB_ZD: TComboBox
        Left = 16
        Top = 24
        Width = 129
        Height = 28
        Style = csDropDownList
        ItemHeight = 20
        TabOrder = 0
        Items.Strings = (
          '显示全部'
          '姓名'
          '年度'
          '人数'
          '毕业设计')
      end
      object Edit_SQL: TEdit
        Left = 18
        Top = 80
        Width = 231
        Height = 28
        TabOrder = 1
      end
      object BitBtn1: TBitBtn
        Left = 160
        Top = 24
        Width = 89
        Height = 25
        TabOrder = 2
        OnClick = BitBtn1Click
        Kind = bkOK
      end
      object CB_JJ: TComboBox
        Left = 18
        Top = 55
        Width = 65
        Height = 21
        Style = csDropDownList
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ItemHeight = 13
        ParentFont = False
        TabOrder = 3
        Items.Strings = (
          '= '
          '>='
          '<='
          '<>'
          'LIKE')
      end
    end
    object RxS_RS: TRxSpinEdit
      Left = 248
      Top = 51
      Width = 89
      Height = 24
      Enabled = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 6
    end
    object Edit_KSL: TCurrencyEdit
      Left = 358
      Top = 110
      Width = 107
      Height = 24
      AutoSize = False
      BorderStyle = bsNone
      Color = 16043963
      DisplayFormat = '0.00;-0.00'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -17
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 7
    end
  end
  object GroupBox2: TGroupBox
    Left = 0
    Top = 225
    Width = 839
    Height = 228
    Align = alClient
    TabOrder = 2
    object DBGridEh1: TDBGridEh
      Left = 2
      Top = 15
      Width = 835
      Height = 211
      Align = alClient
      DataSource = DataSource1
      Flat = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      FooterColor = clYellow
      FooterFont.Charset = DEFAULT_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -11
      FooterFont.Name = 'MS Sans Serif'
      FooterFont.Style = []
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
      OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghFitRowHeightToText, dghAutoSortMarking, dghMultiSortMarking, dghIncSearch]
      ParentFont = False
      ReadOnly = True
      RowHeight = 2
      RowLines = 1
      SortLocal = True
      SumList.Active = True
      SumList.VirtualRecords = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -16
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      TitleHeight = 25
      OnCellClick = DBGridEh1CellClick
      OnSortMarkingChanged = DBGridEh1SortMarkingChanged
      Columns = <
        item
          Alignment = taCenter
          AutoFitColWidth = False
          Checkboxes = False
          DropDownBox.ListSource = DataSource1
          EditButtons = <>
          FieldName = 'XM'
          Footer.FieldName = 'XM'
          Footers = <>
          PickList.Strings = (
            '')
          Title.Alignment = taCenter
          Title.Caption = '姓名'
          Title.SortIndex = 1
          Title.SortMarker = smDownEh
          Title.TitleButton = True
          Width = 74
        end
        item
          Alignment = taCenter
          AutoFitColWidth = False
          DropDownBox.ListSource = DataSource1
          EditButtons = <>
          FieldName = 'ND'
          Footer.FieldName = 'ND'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = '年度'
          Title.TitleButton = True
          Width = 66
        end
        item
          Alignment = taCenter
          AutoFitColWidth = False
          DropDownBox.ListSource = DataSource1
          EditButtons = <>
          FieldName = 'BYSJ'
          Footer.FieldName = 'KCMC'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = '毕业设计'
          Title.TitleButton = True
          Width = 89
        end
        item
          Alignment = taCenter
          AutoFitColWidth = False
          DropDownBox.ListSource = DataSource1
          EditButtons = <>
          FieldName = 'RS'
          Footer.FieldName = 'RS'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = '人数'
          Title.TitleButton = True
          Width = 87
        end
        item
          Alignment = taCenter
          AutoFitColWidth = False
          DropDownBox.ListSource = DataSource1
          EditButtons = <>
          FieldName = 'CS1'
          Footer.FieldName = 'CS1'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = '参数一'
          Title.TitleButton = True
          Width = 74
        end
        item
          Alignment = taCenter
          AutoFitColWidth = False
          DropDownBox.ListSource = DataSource1
          EditButtons = <>
          FieldName = 'CS2'
          Footer.FieldName = 'CS2'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = '参数二'
          Title.TitleButton = True
          Width = 83
        end
        item
          Alignment = taCenter
          AutoFitColWidth = False
          DropDownBox.ListSource = DataSource1
          EditButtons = <>
          FieldName = 'KSL'
          Footer.FieldName = 'KSL'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = '工作量'
          Title.TitleButton = True
          Width = 93
        end>
    end
  end
  object ADO_BKS: TADOQuery
    Connection = MainForm.ADOC
    BeforeScroll = ADO_BKSBeforeScroll
    Parameters = <>
    Left = 608
    Top = 16
  end
  object DataSource1: TDataSource
    DataSet = ADO_BKS
    Left = 576
    Top = 16
  end
  object ADO_TEST: TADOQuery
    Connection = MainForm.ADOC
    Parameters = <>
    Left = 544
    Top = 16
  end
  object PrintDBGridEh1: TPrintDBGridEh
    DBGridEh = DBGridEh1
    Options = []
    Page.BottomMargin = 2
    Page.LeftMargin = 2
    Page.RightMargin = 2
    Page.TopMargin = 2
    PageFooter.CenterText.Strings = (
      '')
    PageFooter.Font.Charset = DEFAULT_CHARSET
    PageFooter.Font.Color = clWindowText
    PageFooter.Font.Height = -13
    PageFooter.Font.Name = 'MS Sans Serif'
    PageFooter.Font.Style = []
    PageHeader.CenterText.Strings = (
      '毕业设计一览表')
    PageHeader.Font.Charset = DEFAULT_CHARSET
    PageHeader.Font.Color = clWindowText
    PageHeader.Font.Height = -19
    PageHeader.Font.Name = 'MS Sans Serif'
    PageHeader.Font.Style = []
    PrintFontName = '宋体'
    Title.Strings = (
      '')
    Units = MM
    Left = 440
    Top = 16
  end
end