cf_czy.dfm

delphi和SQL做的超市管理系统

object cfra_czy: Tcfra_czy
  Left = 0
  Top = 0
  Width = 532
  Height = 361
  TabOrder = 0
  object Panel1: TPanel
    Left = 0
    Top = 303
    Width = 532
    Height = 58
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 0
    object ToolBar1: TToolBar
      Left = 0
      Top = 0
      Width = 532
      Height = 57
      ButtonHeight = 50
      ButtonWidth = 37
      Caption = 'ToolBar1'
      Images = ImageList1
      ShowCaptions = True
      TabOrder = 0
      object TButton1: TToolButton
        Left = 0
        Top = 2
        Caption = #26032#24314
        ImageIndex = 1
        OnClick = TButton1Click
      end
      object TButton2: TToolButton
        Left = 37
        Top = 2
        Caption = #20462#25913
        ImageIndex = 0
        OnClick = TButton2Click
      end
      object TButton3: TToolButton
        Left = 74
        Top = 2
        Caption = #20445#23384
        Enabled = False
        ImageIndex = 2
        OnClick = TButton3Click
      end
      object TButton4: TToolButton
        Left = 111
        Top = 2
        Caption = #21024#38500
        ImageIndex = 3
        OnClick = TButton4Click
      end
    end
  end
  object GroupBox2: TGroupBox
    Left = 0
    Top = 208
    Width = 521
    Height = 89
    Caption = #26435#38480#35774#23450
    TabOrder = 1
    object CheckBox1: TCheckBox
      Left = 64
      Top = 40
      Width = 97
      Height = 17
      Caption = #29992#25143#31649#29702
      Enabled = False
      TabOrder = 0
    end
    object CheckBox2: TCheckBox
      Left = 208
      Top = 40
      Width = 97
      Height = 17
      Caption = #21830#21697#31649#29702
      Enabled = False
      TabOrder = 1
    end
    object CheckBox3: TCheckBox
      Left = 360
      Top = 40
      Width = 97
      Height = 17
      Caption = #38144#21806#31649#29702
      Enabled = False
      TabOrder = 2
    end
  end
  object GroupBox1: TGroupBox
    Left = 280
    Top = 0
    Width = 241
    Height = 201
    Caption = #32534#36753#26639
    TabOrder = 2
    object Label1: TLabel
      Left = 16
      Top = 40
      Width = 36
      Height = 13
      Caption = #32534#21495#65306
    end
    object Label2: TLabel
      Left = 16
      Top = 72
      Width = 48
      Height = 13
      Caption = #29992#25143#21517#65306
    end
    object Label3: TLabel
      Left = 16
      Top = 104
      Width = 60
      Height = 13
      Caption = #29992#25143#31867#22411#65306
    end
    object Label4: TLabel
      Left = 40
      Top = 152
      Width = 156
      Height = 13
      Caption = #27880#24847#65306#32534#21495#21644#29992#25143#21517#19981#33021#37325#22797
    end
    object Edit1: TEdit
      Left = 80
      Top = 32
      Width = 137
      Height = 21
      BevelInner = bvNone
      BevelKind = bkFlat
      BorderStyle = bsNone
      Enabled = False
      TabOrder = 0
      Text = 'Edit1'
    end
    object Edit2: TEdit
      Left = 80
      Top = 64
      Width = 137
      Height = 21
      BevelInner = bvNone
      BevelKind = bkFlat
      BorderStyle = bsNone
      Enabled = False
      TabOrder = 1
      Text = 'Edit1'
    end
    object ComboBox1: TComboBox
      Left = 80
      Top = 96
      Width = 137
      Height = 21
      BevelInner = bvNone
      BevelKind = bkFlat
      Enabled = False
      ItemHeight = 13
      TabOrder = 2
      Text = 'ComboBox1'
      OnChange = ComboBox1Change
      Items.Strings = (
        #31649#29702#21592
        #38144#21806#21592
        #36229#32423#29992#25143)
    end
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 0
    Width = 273
    Height = 201
    DataSource = DataSource1
    TabOrder = 3
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnEnter = DBGrid1Enter
    Columns = <
      item
        Expanded = False
        FieldName = 'user_id'
        Title.Alignment = taCenter
        Title.Caption = #32534#21495
        Width = 43
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'user_name'
        Title.Alignment = taCenter
        Title.Caption = #29992#25143#21517
        Width = 76
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'user_type'
        Title.Alignment = taCenter
        Title.Caption = #29992#25143#31867#22411
        Visible = True
      end>
  end
  object DataSource1: TDataSource
    DataSet = dm.ADO_user
    OnDataChange = DataSource1DataChange
    Left = 80
    Top = 80
  end
  object ImageList1: TImageList