uprintzwb.~dfm

学生信息管理系统

      OnChange = ComboBox2Change
    end
    object Button1: TButton
      Left = 112
      Top = 173
      Width = 86
      Height = 25
      Caption = #25171'  '#21360
      TabOrder = 1
      OnClick = Button1Click
    end
    object Button3: TButton
      Left = 46
      Top = 172
      Width = 57
      Height = 25
      Caption = #26597'   '#35810
      TabOrder = 2
      OnClick = Button3Click
    end
    object ComboBox1: TComboBox
      Left = 102
      Top = 271
      Width = 105
      Height = 21
      ItemHeight = 13
      TabOrder = 3
      OnChange = ComboBox1Change
    end
    object Button2: TButton
      Left = 112
      Top = 297
      Width = 86
      Height = 25
      Caption = #25171'  '#21360
      TabOrder = 4
      OnClick = Button2Click
    end
    object Button4: TButton
      Left = 52
      Top = 296
      Width = 44
      Height = 25
      Caption = #26597'   '#35810
      TabOrder = 5
      OnClick = Button4Click
    end
    object ComboBox3: TComboBox
      Left = 94
      Top = 373
      Width = 91
      Height = 21
      ItemHeight = 13
      TabOrder = 6
      OnChange = ComboBox3Change
    end
    object Button5: TButton
      Left = 112
      Top = 403
      Width = 68
      Height = 25
      Caption = #25171#21360#39044#35272
      TabOrder = 7
      OnClick = Button5Click
    end
    object Button6: TButton
      Left = 56
      Top = 402
      Width = 44
      Height = 25
      Caption = #26597'   '#35810
      TabOrder = 8
      OnClick = Button6Click
    end
    object Button7: TButton
      Left = 112
      Top = 72
      Width = 86
      Height = 25
      Caption = #25171'  '#21360
      TabOrder = 9
      OnClick = Button7Click
    end
    object ComboBox4: TComboBox
      Left = 102
      Top = 39
      Width = 105
      Height = 21
      ItemHeight = 13
      TabOrder = 10
      OnChange = ComboBox4Change
    end
    object Button8: TButton
      Left = 52
      Top = 72
      Width = 44
      Height = 25
      Caption = #26597'   '#35810
      TabOrder = 11
      OnClick = Button8Click
    end
    object Button9: TButton
      Left = 80
      Top = 475
      Width = 68
      Height = 25
      Caption = #25171#21360#39044#35272
      TabOrder = 12
      OnClick = Button9Click
    end
  end
  object Panel2: TPanel
    Left = 240
    Top = 43
    Width = 618
    Height = 510
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 3
    object DBGridEh: TDBGridEh
      Left = 0
      Top = 0
      Width = 618
      Height = 510
      Align = alClient
      DataSource = DataSource
      Flat = True
      FooterColor = clWindow
      FooterFont.Charset = DEFAULT_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -11
      FooterFont.Name = 'MS Sans Serif'
      FooterFont.Style = []
      Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete]
      OptionsEh = [dghFixed3D, dghHighlightFocus, dghClearSelection, dghTraceColSizing, dghDialogFind]
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Alignment = taCenter
          EditButtons = <>
          FieldName = 'vxh'
          Footers = <>
          Title.Alignment = taCenter
          Width = 40
        end
        item
          Alignment = taCenter
          EditButtons = <>
          FieldName = #29677#32423
          Footers = <>
          Title.Alignment = taCenter
          Width = 56
        end
        item
          Alignment = taCenter
          EditButtons = <>
          FieldName = #22995#21517
          Footers = <>
          Title.Alignment = taCenter
          Width = 49
        end
        item
          Alignment = taCenter
          EditButtons = <>
          FieldName = #35797#23460#21517#31216
          Footers = <>
          Title.Alignment = taCenter
          Width = 81
        end
        item
          Alignment = taCenter
          EditButtons = <>
          FieldName = #24231#20301#21495
          Footers = <>
          Title.Alignment = taCenter
          Width = 41
        end>
    end
  end
  object ActionList: TActionList
    Images = FMain.ImageList
    Left = 384
    Top = 104
    object A_add: TAction
      Caption = #22686'  '#21152
      ImageIndex = 15
      ShortCut = 16449
    end
    object A_modify: TAction
      Caption = #20462' '#25913
      ImageIndex = 13
      ShortCut = 16453
    end
    object A_save: TAction
      Caption = #20445'  '#23384
      ImageIndex = 0
      ShortCut = 16467
    end
    object A_delete: TAction
      Caption = #21024'  '#38500
      ImageIndex = 10
      ShortCut = 16452
    end
    object A_cancel: TAction
      Caption = #25764'  '#28040
      ImageIndex = 2
      ShortCut = 27
    end
    object A_preview: TAction
      Caption = #25171'  '#21360
      ImageIndex = 3
      OnExecute = A_previewExecute
    end
    object A_pr: TAction
      Caption = #19978#19968#26465
      ImageIndex = 7
    end
    object A_next: TAction
      Caption = #19979#19968#26465
      ImageIndex = 12
    end
    object A_find: TAction
      Caption = #26597' '#35810
      ImageIndex = 17
      OnExecute = A_findExecute
    end
    object A_refresh: TAction
      Caption = #21047' '#26032
      ImageIndex = 22
    end
    object A_tx: TAction
      Caption = #36864' '#23398
      ImageIndex = 6
    end
  end
  object ADOQuery: TADOQuery
    Connection = FMain.ADOConnection
    CursorType = ctStatic
    AfterOpen = ADOQueryAfterOpen
    OnCalcFields = ADOQueryCalcFields
    Parameters = <>
    SQL.Strings = (
      'select * from STU_info where not('#35797#23460#21517#31216' is null) order by '#35797#23460#21517#31216','#27969#27700#21495)
    Left = 280
    Top = 56
    object ADOQueryvxh: TIntegerField
      DisplayLabel = #24207#21495
      FieldKind = fkCalculated
      FieldName = 'vxh'
      Calculated = True
    end
    object ADOQueryID: TAutoIncField
      FieldName = 'ID'
      ReadOnly = True
    end
    object ADOQueryDSDesigner: TWideStringField
      FieldName = #35797#23460#21517#31216
      Size = 16
    end
    object ADOQueryDSDesigner2: TWideStringField
      FieldName = #24231#20301#21495
      Size = 3
    end
    object ADOQueryDSDesigner3: TSmallintField
      FieldName = #24207#21495
    end
    object ADOQueryDSDesigner4: TWideStringField
      FieldName = #22995#21517
      Size = 12
    end
    object ADOQueryDSDesigner5: TWideStringField
      FieldName = #32423#21035
      Size = 4
    end
    object ADOQueryDSDesigner6: TWideStringField
      FieldName = #29677#32423
      Size = 12
    end
    object ADOQueryDSDesigner18: TWideStringField
      FieldName = #36864#23398#21542
      Size = 2
    end
    object ADOQueryDSDesigner19: TWideStringField
      FieldName = #23398#29983#31867#22411
      Size = 4
    end
    object ADOQueryDSDesigner20: TWideStringField
      FieldName = #31867#22411
      Size = 2
    end
  end
  object DataSource: TDataSource
    DataSet = ADOQuery
    Left = 260
    Top = 55
  end
  object PrintDBGridEh: TPrintDBGridEh
    Options = []
    PageFooter.Font.Charset = DEFAULT_CHARSET
    PageFooter.Font.Color = clWindowText
    PageFooter.Font.Height = -11
    PageFooter.Font.Name = 'MS Sans Serif'
    PageFooter.Font.Style = []
    PageHeader.Font.Charset = DEFAULT_CHARSET
    PageHeader.Font.Color = clWindowText
    PageHeader.Font.Height = -11
    PageHeader.Font.Name = 'MS Sans Serif'
    PageHeader.Font.Style = []
    Units = MM
    Left = 348
    Top = 103
  end
end