unit4.~dfm

第一次尝试开发数据库方面的系统

object frm_bellow: Tfrm_bellow
  Left = 247
  Top = 172
  AutoScroll = False
  BiDiMode = bdLeftToRight
  Caption = #20511#38405#24773#20917
  ClientHeight = 462
  ClientWidth = 689
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  ParentBiDiMode = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object DBGrid1: TDBGrid
    Left = 1
    Top = 160
    Width = 687
    Height = 281
    DataSource = DM.brDataSource3
    ImeName = #32043#20809#25340#38899#36755#20837#27861
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 443
    Width = 689
    Height = 19
    Panels = <
      item
        Width = 100
      end
      item
        Width = 350
      end
      item
        Width = 100
      end>
    SimplePanel = False
  end
  object GroupBox1: TGroupBox
    Left = 1
    Top = 56
    Width = 688
    Height = 97
    Caption = #20511#36824
    TabOrder = 2
    object Label2: TLabel
      Left = 240
      Top = 24
      Width = 60
      Height = 13
      Caption = #22270#20070#32534#21495#65306
    end
    object Label1: TLabel
      Left = 24
      Top = 24
      Width = 48
      Height = 13
      Caption = #35835#32773#21495#65306
    end
    object Label3: TLabel
      Left = 473
      Top = 24
      Width = 60
      Height = 13
      Caption = #24050#20511#25968#37327#65306
    end
    object Label4: TLabel
      Left = 240
      Top = 64
      Width = 60
      Height = 13
      Caption = #32602#27454#37329#39069#65306
    end
    object Label5: TLabel
      Left = 8
      Top = 64
      Width = 60
      Height = 13
      Caption = #35835#32773#22995#21517#65306
    end
    object DBText1: TDBText
      Left = 80
      Top = 64
      Width = 65
      Height = 17
      DataField = #35835#32773#21495
      DataSource = DM.brDataSource3
    end
    object Edit2: TEdit
      Left = 320
      Top = 24
      Width = 121
      Height = 21
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      TabOrder = 0
      OnKeyPress = Edit2KeyPress
    end
    object Edit1: TEdit
      Left = 80
      Top = 24
      Width = 121
      Height = 21
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      TabOrder = 1
      OnKeyPress = Edit1KeyPress
    end
    object DBEdit1: TDBEdit
      Left = 320
      Top = 64
      Width = 121
      Height = 21
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      TabOrder = 2
    end
    object DBEdit2: TDBEdit
      Left = 544
      Top = 24
      Width = 121
      Height = 21
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      TabOrder = 3
    end
    object ComboBox1: TComboBox
      Left = 480
      Top = 64
      Width = 145
      Height = 21
      ItemHeight = 13
      TabOrder = 4
      Text = 'ComboBox1'
    end
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 689
    Height = 57
    ButtonHeight = 21
    ButtonWidth = 50
    Caption = 'ToolBar1'
    EdgeBorders = [ebLeft, ebTop, ebRight, ebBottom]
    Flat = True
    ShowCaptions = True
    TabOrder = 3
    object ToolButton1: TToolButton
      Left = 0
      Top = 0
      Action = DataSetFirst1
    end
    object ToolButton2: TToolButton
      Left = 50
      Top = 0
      Action = DataSetPrior1
    end
    object ToolButton3: TToolButton
      Left = 100
      Top = 0
      Action = DataSetNext1
    end
    object ToolButton4: TToolButton
      Left = 150
      Top = 0
      Action = DataSetLast1
    end
    object ToolButton5: TToolButton
      Left = 200
      Top = 0
      Action = DataSetInsert1
    end
    object ToolButton6: TToolButton
      Left = 250
      Top = 0
      Action = DataSetDelete1
    end
    object ToolButton7: TToolButton
      Left = 300
      Top = 0
      Action = DataSetEdit1
    end
    object ToolButton8: TToolButton
      Left = 350
      Top = 0
      Action = DataSetPost1
    end
    object ToolButton9: TToolButton
      Left = 400
      Top = 0
      Action = DataSetCancel1
    end
    object ToolButton10: TToolButton
      Left = 450
      Top = 0
      Action = DataSetRefresh1
    end
    object ToolButton11: TToolButton
      Left = 500
      Top = 0
      Caption = #24310#26399
      ImageIndex = 10
      OnClick = ToolButton11Click
    end
  end
  object ImageList1: TImageList
    Left = 584
    Top = 40
  end
  object ActionList1: TActionList
    Left = 544
    Top = 40
    object DataSetFirst1: TDataSetFirst
      Category = 'Dataset'
      Caption = '&First'
      Hint = 'First'
      ImageIndex = 0
    end
    object DataSetPrior1: TDataSetPrior
      Category = 'Dataset'
      Caption = '&Prior'
      Hint = 'Prior'
      ImageIndex = 1
    end
    object DataSetNext1: TDataSetNext
      Category = 'Dataset'
      Caption = '&Next'
      Hint = 'Next'
      ImageIndex = 2
    end
    object DataSetLast1: TDataSetLast
      Category = 'Dataset'
      Caption = '&Last'
      Hint = 'Last'
      ImageIndex = 3
    end
    object DataSetInsert1: TDataSetInsert
      Category = 'Dataset'
      Caption = '&Insert'
      Hint = 'Insert'
      ImageIndex = 4
    end
    object DataSetDelete1: TDataSetDelete
      Category = 'Dataset'
      Caption = '&Delete'
      Hint = 'Delete'
      ImageIndex = 5
    end
    object DataSetEdit1: TDataSetEdit
      Category = 'Dataset'
      Caption = '&Edit'
      Hint = 'Edit'
      ImageIndex = 6
    end
    object DataSetPost1: TDataSetPost
      Category = 'Dataset'
      Caption = 'P&ost'
      Hint = 'Post'
      ImageIndex = 7
    end
    object DataSetCancel1: TDataSetCancel
      Category = 'Dataset'
      Caption = '&Cancel'
      Hint = 'Cancel'
      ImageIndex = 8
    end
    object DataSetRefresh1: TDataSetRefresh
      Category = 'Dataset'
      Caption = '&Refresh'
      Hint = 'Refresh'
      ImageIndex = 9
    end
  end
end