edit_goods.dfm

商场管理系统源码 一套值得初学者学习的源码包含全部源码,控件

inherited Frm_edit_goods: TFrm_edit_goods
  Left = 322
  Top = 183
  Caption = 'Frm_edit_goods'
  ClientHeight = 313
  ClientWidth = 375
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 12
  inherited PanelBkGnd: TPanel
    Width = 375
    Height = 313
    inherited Panel_button: TPanel
      Top = 264
      Width = 375
      inherited OKBtn: TDsFancyButton
        Caption = #20445#23384'[&S]'
        OnClick = OKBtnClick
      end
    end
    object FlatPanel_edit: TFlatPanel
      Left = 12
      Top = 6
      Width = 346
      Height = 243
      ParentColor = True
      TabOrder = 1
      object Label1: TLabel
        Left = 14
        Top = 14
        Width = 36
        Height = 12
        Caption = #21697#21517#65306
      end
      object Label2: TLabel
        Left = 14
        Top = 46
        Width = 36
        Height = 12
        Caption = #22411#21495#65306
      end
      object Label3: TLabel
        Left = 14
        Top = 79
        Width = 36
        Height = 12
        Caption = #32534#21495#65306
      end
      object Label5: TLabel
        Left = 14
        Top = 146
        Width = 36
        Height = 12
        Caption = #21333#20215#65306
      end
      object Label4: TLabel
        Left = 14
        Top = 179
        Width = 36
        Height = 12
        Caption = #25552#25104#65306
      end
      object Label6: TLabel
        Left = 14
        Top = 212
        Width = 36
        Height = 12
        Caption = #22791#27880#65306
      end
      object Label7: TLabel
        Left = 14
        Top = 112
        Width = 36
        Height = 12
        Caption = #21333#20301#65306
      end
      object E_type: TFlatEdit
        Left = 53
        Top = 44
        Width = 278
        Height = 18
        ColorFocused = clCream
        ColorFlat = 15658734
        MaxLength = 20
        TabOrder = 1
        OnExit = E_typeExit
        OnKeyDown = E_NAMEKeyDown
      end
      object E_ID: TFlatEdit
        Left = 53
        Top = 77
        Width = 278
        Height = 18
        ColorFocused = clCream
        ColorFlat = 15658734
        MaxLength = 2
        TabOrder = 2
        OnExit = E_IDExit
        OnKeyDown = E_NAMEKeyDown
      end
      object E_price: TFlatEdit
        Left = 53
        Top = 144
        Width = 278
        Height = 18
        ColorFocused = clCream
        ColorFlat = 15658734
        MaxLength = 20
        TabOrder = 4
        OnKeyDown = E_NAMEKeyDown
        OnKeyPress = E_priceKeyPress
      end
      object E_sellprice: TFlatEdit
        Left = 53
        Top = 177
        Width = 278
        Height = 18
        ColorFocused = clCream
        ColorFlat = 15658734
        MaxLength = 20
        TabOrder = 5
        OnKeyDown = E_NAMEKeyDown
        OnKeyPress = E_priceKeyPress
      end
      object E_memo: TFlatEdit
        Left = 53
        Top = 210
        Width = 278
        Height = 18
        ColorFocused = clCream
        ColorFlat = 15658734
        MaxLength = 200
        TabOrder = 6
        OnKeyDown = E_NAMEKeyDown
      end
      object E_unit: TFlatEdit
        Left = 53
        Top = 110
        Width = 278
        Height = 18
        ColorFocused = clCream
        ColorFlat = 15658734
        MaxLength = 20
        TabOrder = 3
        OnKeyDown = E_NAMEKeyDown
      end
      object E_NAME: TFlatComboBox
        Left = 53
        Top = 11
        Width = 278
        Height = 20
        Color = 15658734
        DropDownCount = 30
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlue
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ItemHeight = 12
        ParentFont = False
        TabOrder = 0
        ItemIndex = -1
        OnExit = E_typeExit
        OnKeyDown = E_NAMEKeyDown
      end
    end
  end
  object Query_data: TQuery
    Left = 34
    Top = 29
  end
end