goodeditfrm.dfm

这是一个本人初定的小制作

object GoodEditDlg: TGoodEditDlg
  Left = 199
  Top = 124
  ActiveControl = DBEditId
  BorderStyle = bsDialog
  Caption = #21830#21697#20449#24687#32534#36753
  ClientHeight = 452
  ClientWidth = 583
  Color = clBtnFace
  ParentFont = True
  KeyPreview = True
  OldCreateOrder = True
  Position = poScreenCenter
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 8
    Top = 8
    Width = 553
    Height = 385
    Shape = bsFrame
  end
  object Label1: TLabel
    Left = 40
    Top = 32
    Width = 36
    Height = 13
    Caption = #32534#21495#65306
  end
  object Label2: TLabel
    Left = 40
    Top = 84
    Width = 36
    Height = 13
    Caption = #21517#31216#65306
  end
  object Label3: TLabel
    Left = 40
    Top = 137
    Width = 36
    Height = 13
    Caption = #31867#22411#65306
  end
  object Label4: TLabel
    Left = 40
    Top = 190
    Width = 36
    Height = 13
    Caption = #21333#20301#65306
  end
  object Label5: TLabel
    Left = 40
    Top = 243
    Width = 36
    Height = 13
    Caption = #21333#20215#65306
  end
  object Label6: TLabel
    Left = 40
    Top = 296
    Width = 36
    Height = 13
    Caption = #25552#25104#65306
  end
  object Label7: TLabel
    Left = 16
    Top = 328
    Width = 72
    Height = 13
    Caption = #23433#20840#24211#23384#37327#65306
  end
  object OKBtn: TButton
    Left = 87
    Top = 404
    Width = 75
    Height = 25
    Caption = #30830#23450'(&O)'
    Default = True
    ModalResult = 1
    TabOrder = 0
    OnClick = OKBtnClick
  end
  object CancelBtn: TButton
    Left = 295
    Top = 404
    Width = 75
    Height = 25
    Cancel = True
    Caption = #21462#28040'(&C)'
    ModalResult = 2
    TabOrder = 1
    OnClick = CancelBtnClick
  end
  object DBEditId: TDBEdit
    Left = 96
    Top = 24
    Width = 377
    Height = 21
    DataField = 'Id'
    DataSource = DMMain.DSGood
    TabOrder = 2
  end
  object DBEditName: TDBEdit
    Left = 96
    Top = 72
    Width = 377
    Height = 21
    DataField = 'Name'
    DataSource = DMMain.DSGood
    TabOrder = 3
  end
  object DBEditType: TDBEdit
    Left = 96
    Top = 128
    Width = 377
    Height = 21
    DataField = 'Type'
    DataSource = DMMain.DSGood
    TabOrder = 4
  end
  object DBEditUnit: TDBEdit
    Left = 96
    Top = 184
    Width = 377
    Height = 21
    DataField = 'Unit'
    DataSource = DMMain.DSGood
    TabOrder = 5
  end
  object DBEditPrice: TDBEdit
    Left = 96
    Top = 232
    Width = 377
    Height = 21
    DataField = 'Price'
    DataSource = DMMain.DSGood
    TabOrder = 6
  end
  object DBEditBonus: TDBEdit
    Left = 96
    Top = 288
    Width = 377
    Height = 21
    DataField = 'SellBonus'
    DataSource = DMMain.DSGood
    TabOrder = 7
  end
  object DBEdtSaftyStock: TDBEdit
    Left = 96
    Top = 328
    Width = 377
    Height = 21
    DataField = 'SaftyStock'
    DataSource = DMMain.DSGood
    TabOrder = 8
  end
end