ding_dan_cha.dfm

品质管理系统：delphi+sql实现了制造企业在生产过程中对产品质量的控制

object ding_dan_ch: Tding_dan_ch
  Left = 3
  Top = 70
  Width = 801
  Height = 491
  Caption = #35330#21934#36039#26009#26597#35426
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnActivate = FormActivate
  OnClose = FormClose
  DesignSize = (
    793
    464)
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 3
    Top = 1
    Width = 776
    Height = 144
    Anchors = [akLeft, akTop, akRight]
    Caption = #35330#21934#36039#26009#26597#35426
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object Label1: TLabel
      Left = 46
      Top = 32
      Width = 41
      Height = 20
      AutoSize = False
      Caption = #38917#30446':'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 245
      Top = 37
      Width = 33
      Height = 16
      AutoSize = False
      Caption = #20839#23481':'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 57
      Top = 75
      Width = 24
      Height = 20
      AutoSize = False
      Caption = #24478':'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 257
      Top = 75
      Width = 24
      Height = 20
      AutoSize = False
      Caption = #21040':'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Edit1: TEdit
      Left = 278
      Top = 33
      Width = 90
      Height = 21
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      Text = 'Edit1'
      OnKeyPress = Edit1KeyPress
    end
    object Button1: TButton
      Left = 409
      Top = 31
      Width = 90
      Height = 25
      Caption = #26597#35426
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = Button1Click
    end
    object Button2: TButton
      Left = 643
      Top = 31
      Width = 90
      Height = 25
      Cancel = True
      Caption = #21462#28040
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = Button2Click
    end
    object Button5: TButton
      Left = 527
      Top = 31
      Width = 90
      Height = 25
      Caption = #36681'EXCEL'
      TabOrder = 3
      OnClick = Button5Click
    end
    object t1: TMaskEdit
      Left = 79
      Top = 71
      Width = 90
      Height = 21
      EditMask = '9999/99/99;1;_'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      MaxLength = 10
      ParentFont = False
      TabOrder = 4
      Text = '    /  /  '
      OnKeyPress = t1KeyPress
    end
    object t2: TMaskEdit
      Left = 278
      Top = 71
      Width = 90
      Height = 21
      EditMask = '9999/99/99;1;_'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      MaxLength = 10
      ParentFont = False
      TabOrder = 5
      Text = '    /  /  '
      OnKeyPress = t2KeyPress
    end
    object ComboBox1: TComboBox
      Left = 80
      Top = 31
      Width = 90
      Height = 21
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ItemHeight = 13
      ParentFont = False
      TabOrder = 6
      Text = 'ComboBox1'
      OnClick = ComboBox1Click
      Items.Strings = (
        #35330#21934#32232#34399
        #27454#34399'('#24288#34399')'
        #19979#21934#26085#26399
        #20986#36008#26085#26399
        #21697#21517
        #36319#21934#20154
        #20316#27861)
    end
  end
  object DBGrid1: TDBGrid
    Left = 4
    Top = 147
    Width = 775
    Height = 302
    Anchors = [akLeft, akTop, akRight, akBottom]
    Color = clYellow
    DataSource = DataSource1
    ReadOnly = True
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'Dh'
        Title.Caption = #35330#21934#32232#34399
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'chang_hao'
        Title.Caption = #24288#34399'('#27454#34399')'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Pm'
        Title.Caption = #21697#21517
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Sl'
        Title.Caption = #25976#37327
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Zf1'
        Title.Caption = #20316#27861
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Xdr'
        Title.Caption = #19979#21934#26085#26399
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Chr'
        Title.Caption = #20986#36008#26085#26399
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Bl'
        Title.Caption = #29627#40599
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Bm'
        Title.Caption = #32972#32011
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Bmcl'
        Title.Caption = #34920#38754#34389#29702'1'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'bmcl1'
        Title.Caption = #34920#38754#34389#29702'2'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Bzi'
        Title.Caption = #32972#23383
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Cc'
        Title.Caption = #23610#23544
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Cdr'
        Title.Caption = #36319#21934#20154
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Chfs'
        Title.Caption = #20986#36008#26041#24335
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Cl'
        Title.Caption = #26448#26009
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Cs'
        Title.Caption = #24288#21830
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Cz'
        Title.Caption = #29986#35657
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Dd'
        Title.Caption = #38651#37709
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Dw'
        Title.Caption = #21934#20301
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Dx'
        Title.Caption = #21934#22411
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'hou_du'
        Title.Caption = #21402#24230
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Pj'
        Title.Caption = #37197#20214
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'shen_hao'
        Title.Caption = #25613#32791#29575
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Sdr'
        Title.Caption = #36664#21934#20154
        Visible = True
      end>
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 296
    Top = 240
  end
  object Query1: TQuery
    Active = True
    DatabaseName = 'aa'
    SQL.Strings = (
      'select * from dingdan1')
    Left = 152
    Top = 240
  end
  object Table1: TTable
    Active = True
    DatabaseName = 'aa'
    TableName = 'dbo.biao_zheng_chan_liang'
    Left = 192
    Top = 224
  end
end