mrcpckcx.dfm

这是用Delphi编写的汽车配件管理系统。主要功能有基础信息管理

object cpckcx: Tcpckcx
  Left = 251
  Top = 217
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = #20986#24211#21830#21697#35760#24405
  ClientHeight = 288
  ClientWidth = 699
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object GroupBox1: TGroupBox
    Left = 120
    Top = 4
    Width = 576
    Height = 277
    Caption = #20986#24211#21830#21697#19968#35272
    TabOrder = 0
    object DBGrid1: TDBGrid
      Left = 8
      Top = 15
      Width = 560
      Height = 250
      DataSource = DataSource1
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 0
      TitleFont.Charset = GB2312_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      Columns = <
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'cpbh'
          ReadOnly = True
          Title.Alignment = taCenter
          Title.Caption = #20135#21697#32534#21495
          Width = 57
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'cpmc'
          ReadOnly = True
          Title.Alignment = taCenter
          Title.Caption = #20135#21697#21517#31216
          Width = 93
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'cpxh'
          ReadOnly = True
          Title.Alignment = taCenter
          Title.Caption = #20135#21697#22411#21495
          Width = 62
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'cpbs'
          ReadOnly = True
          Title.Alignment = taCenter
          Title.Caption = #20135#21697#26631#35782
          Width = 58
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'rdate'
          ReadOnly = True
          Title.Alignment = taCenter
          Title.Caption = #20986#24211#26085#26399
          Width = 66
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'jsr'
          ReadOnly = True
          Title.Alignment = taCenter
          Title.Caption = #32463#25163#20154
          Width = 51
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'dan'
          ReadOnly = True
          Title.Alignment = taCenter
          Title.Caption = #21333#20301
          Width = 31
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'shuliang'
          ReadOnly = True
          Title.Alignment = taCenter
          Title.Caption = #20986#24211#25968#37327
          Width = 57
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'cx'
          ReadOnly = True
          Title.Alignment = taCenter
          Title.Caption = #24212#29992#36710#22411
          Width = 100
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'cd'
          ReadOnly = True
          Title.Alignment = taCenter
          Title.Caption = #20135#22320
          Width = 100
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'khbh'
          ReadOnly = True
          Title.Alignment = taCenter
          Title.Caption = #23458#25143#32534#21495
          Width = 100
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'khqc'
          ReadOnly = True
          Title.Alignment = taCenter
          Title.Caption = #23458#25143#21517#31216
          Width = 100
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'lxdh'
          ReadOnly = True
          Title.Alignment = taCenter
          Title.Caption = #32852#31995#30005#35805
          Width = 100
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'ling'
          ReadOnly = True
          Title.Alignment = taCenter
          Title.Caption = #38646#21806#20215
          Width = 100
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'je'
          ReadOnly = True
          Title.Alignment = taCenter
          Title.Caption = #24635#37329#39069
          Width = 100
          Visible = True
        end>
    end
  end
  object GroupBox2: TGroupBox
    Left = 7
    Top = 4
    Width = 106
    Height = 109
    Caption = #36755#20837#26597#35810#26465#20214
    TabOrder = 1
    object Label1: TLabel
      Left = 37
      Top = 58
      Width = 20
      Height = 19
      Caption = '||'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -19
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object ComboBox1: TComboBox
      Left = 8
      Top = 33
      Width = 87
      Height = 18
      Style = csOwnerDrawVariable
      ItemHeight = 12
      TabOrder = 0
      OnClick = ComboBox1Click
      Items.Strings = (
        #20135#21697#32534#21495
        #20135#21697#21517#31216
        #20135#21697#22411#21495
        #23458#25143#32534#21495
        #23458#25143#20840#31216
        #32463#25163#20154)
    end
    object Edit1: TEdit
      Left = 8
      Top = 80
      Width = 85
      Height = 20
      TabOrder = 1
      Text = 'Edit1'
      OnExit = Button1Click
      OnKeyPress = Edit1KeyPress
    end
  end
  object Button1: TButton
    Left = 24
    Top = 128
    Width = 75
    Height = 25
    Caption = #26597'  '#35810
    TabOrder = 2
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 24
    Top = 168
    Width = 75
    Height = 25
    Caption = #21047'  '#26032
    TabOrder = 3
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 24
    Top = 208
    Width = 75
    Height = 25
    Caption = #36864'  '#20986
    TabOrder = 4
    OnClick = Button3Click
  end
  object Table1: TTable
    DatabaseName = 'user'
    TableName = 'chanck'
    Left = 232
    Top = 32
    object Table1id: TAutoIncField
      FieldName = 'id'
    end
    object Table1cpbh: TStringField
      FieldName = 'cpbh'
    end
    object Table1cpmc: TStringField
      FieldName = 'cpmc'
      Size = 60
    end
    object Table1cpxh: TStringField
      FieldName = 'cpxh'
      Size = 40
    end
    object Table1cpbs: TStringField
      FieldName = 'cpbs'
      Size = 40
    end
    object Table1rdate: TDateTimeField
      FieldName = 'rdate'
    end
    object Table1jsr: TStringField
      FieldName = 'jsr'
      Size = 40
    end
    object Table1dan: TStringField
      FieldName = 'dan'
      Size = 8
    end
    object Table1shuliang: TStringField
      FieldName = 'shuliang'
    end
    object Table1cx: TStringField
      FieldName = 'cx'
      Size = 40
    end
    object Table1cd: TStringField
      FieldName = 'cd'
      Size = 40
    end
    object Table1khbh: TStringField
      FieldName = 'khbh'
    end
    object Table1khqc: TStringField
      FieldName = 'khqc'
      Size = 80
    end
    object Table1lxdh: TStringField
      FieldName = 'lxdh'
      Size = 30
    end
    object Table1ling: TFloatField
      FieldName = 'ling'
    end
    object Table1je: TFloatField
      FieldName = 'je'
    end
    object Table1ying: TFloatField
      FieldName = 'ying'
    end
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 200
    Top = 32
  end
end