goodseditunit.dfm

简单的进销存系统,包含登陆等界面,内容丰富,各种技巧,适合初学者

object GoodsEditForm: TGoodsEditForm
  Left = 638
  Top = 184
  Width = 394
  Height = 346
  Caption = 'GoodsEditForm'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poOwnerFormCenter
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object PanelBkGnd: TPanel
    Left = 0
    Top = 0
    Width = 386
    Height = 312
    Align = alClient
    BevelOuter = bvNone
    Color = clInactiveCaptionText
    Ctl3D = True
    ParentCtl3D = False
    TabOrder = 0
    object Panel_button: TPanel
      Left = 0
      Top = 263
      Width = 386
      Height = 49
      Align = alBottom
      BevelOuter = bvNone
      ParentColor = True
      TabOrder = 0
      object Bevel_button: TBevel
        Left = 7
        Top = 1
        Width = 356
        Height = 2
      end
      object OKBtn: TButton
        Left = 124
        Top = 14
        Width = 74
        Height = 27
        Cursor = crHandPoint
        Caption = #20445#23384'[&S]'
        TabOrder = 0
        OnClick = OKBtnClick
      end
      object CancelBtn: TButton
        Left = 207
        Top = 14
        Width = 74
        Height = 27
        Cursor = crHandPoint
        Caption = #21462#28040'[&C]'
        TabOrder = 1
        OnClick = CancelBtnClick
      end
    end
    object FlatPanel_edit: TPanel
      Left = 12
      Top = 6
      Width = 346
      Height = 243
      ParentColor = True
      TabOrder = 1
      object Label1: TLabel
        Left = 14
        Top = 14
        Width = 36
        Height = 13
        Caption = #21697#21517#65306
      end
      object Label2: TLabel
        Left = 14
        Top = 46
        Width = 36
        Height = 13
        Caption = #22411#21495#65306
      end
      object Label3: TLabel
        Left = 14
        Top = 79
        Width = 36
        Height = 13
        Caption = #32534#21495#65306
      end
      object Label5: TLabel
        Left = 14
        Top = 146
        Width = 36
        Height = 13
        Caption = #21333#20215#65306
      end
      object Label4: TLabel
        Left = 14
        Top = 179
        Width = 36
        Height = 13
        Caption = #25552#25104#65306
      end
      object Label6: TLabel
        Left = 14
        Top = 212
        Width = 36
        Height = 13
        Caption = #22791#27880#65306
      end
      object Label7: TLabel
        Left = 14
        Top = 112
        Width = 36
        Height = 13
        Caption = #21333#20301#65306
      end
      object E_NAME: TDBEdit
        Left = 64
        Top = 8
        Width = 241
        Height = 21
        DataField = 'name'
        DataSource = GoodsInfoForm.DataSource_name
        TabOrder = 0
      end
      object E_type: TDBEdit
        Left = 64
        Top = 40
        Width = 241
        Height = 21
        DataField = 'type'
        DataSource = GoodsInfoForm.DataSource_name
        TabOrder = 1
      end
      object E_ID: TDBEdit
        Left = 64
        Top = 72
        Width = 241
        Height = 21
        DataField = 'id'
        DataSource = GoodsInfoForm.DataSource_name
        TabOrder = 2
      end
      object E_unit: TDBEdit
        Left = 64
        Top = 112
        Width = 241
        Height = 21
        DataField = 'unit'
        DataSource = GoodsInfoForm.DataSource_name
        TabOrder = 3
      end
      object E_price: TDBEdit
        Left = 64
        Top = 144
        Width = 241
        Height = 21
        DataField = 'price'
        DataSource = GoodsInfoForm.DataSource_name
        TabOrder = 4
      end
      object E_sellprice: TDBEdit
        Left = 65
        Top = 176
        Width = 240
        Height = 21
        DataField = 'sellprice'
        DataSource = GoodsInfoForm.DataSource_name
        TabOrder = 5
      end
      object E_memo: TDBEdit
        Left = 66
        Top = 208
        Width = 239
        Height = 21
        DataField = 'memo'
        DataSource = GoodsInfoForm.DataSource_name
        TabOrder = 6
      end
    end
  end
  object ADOQuery_data: TADOQuery
    Parameters = <>
    Left = 8
    Top = 280
  end
  object ADOCommand_data: TADOCommand
    Parameters = <>
    Left = 40
    Top = 280
  end
  object ADOQuery_temp: TADOQuery
    Parameters = <>
    Left = 72
    Top = 280
  end
end