mrcpckthsl.dfm

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

object cpckthsl: Tcpckthsl
  Left = 267
  Top = 104
  BorderIcons = []
  BorderStyle = bsSingle
  Caption = 'cpckthsl'
  ClientHeight = 124
  ClientWidth = 150
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel
    Left = 5
    Top = 16
    Width = 154
    Height = 14
    Caption = #35831#22312#27492#26639#36755#20837#36864#36135#25968#37327#65306
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object Edit1: TEdit
    Left = 16
    Top = 50
    Width = 121
    Height = 20
    TabOrder = 0
    Text = 'Edit1'
    OnExit = Edit1Exit
    OnKeyPress = Edit1KeyPress
  end
  object Button1: TButton
    Left = 7
    Top = 85
    Width = 66
    Height = 25
    Caption = #36864'  '#36135
    TabOrder = 1
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 73
    Top = 85
    Width = 69
    Height = 25
    Caption = #21462'  '#28040
    TabOrder = 2
    OnClick = Button2Click
  end
  object Table1: TTable
    DatabaseName = 'user'
    TableName = 'kc'
    Left = 64
    Top = 8
    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 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 Table1pi: TFloatField
      FieldName = 'pi'
    end
    object Table1ling: TFloatField
      FieldName = 'ling'
    end
    object Table1jy: TFloatField
      FieldName = 'jy'
    end
    object Table1je: TFloatField
      FieldName = 'je'
    end
    object Table1shi: TFloatField
      FieldName = 'shi'
    end
    object Table1bei: TStringField
      FieldName = 'bei'
      Size = 40
    end
  end
end