edcontracts.dfm

用VC++编写关于仓库销售管理系统的程序,很有用的哟

object EdContractForm: TEdContractForm
  Left = 187
  Top = 302
  Width = 711
  Height = 541
  BorderIcons = [biSystemMenu]
  Caption = #21512#21516#31649#29702
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object Speedbar: TPanel
    Left = 0
    Top = 0
    Width = 703
    Height = 129
    Align = alTop
    Caption = #31354#20540
    TabOrder = 0
    object PrintBtn: TSpeedButton
      Left = 288
      Top = 8
      Width = 23
      Height = 22
      Hint = #25171#21360
    end
    object ModeIndicator: TLabel
      Left = 328
      Top = 16
      Width = 30
      Height = 13
      Caption = '['#27169#24335']'
    end
    object DBEditBtns: TDBNavigator
      Left = 16
      Top = 0
      Width = 216
      Height = 25
      DataSource = ActiveSource
      VisibleButtons = [nbInsert, nbDelete, nbEdit, nbPost, nbCancel, nbRefresh]
      TabOrder = 0
    end
    object DBNavBtns: TDBNavigator
      Left = 32
      Top = 48
      Width = 222
      Height = 25
      DataSource = ActiveSource
      VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbPost, nbCancel]
      TabOrder = 1
    end
    object DBText1: TDBEdit
      Left = 416
      Top = 16
      Width = 121
      Height = 21
      DataField = #21512#21516#32534#21495
      DataSource = MastData.ContractsSource
      TabOrder = 2
    end
  end
  object HeaderPanel: TPanel
    Left = 0
    Top = 129
    Width = 703
    Height = 377
    Align = alClient
    Caption = #31354#20540
    TabOrder = 1
    object Label1: TLabel
      Left = 24
      Top = 16
      Width = 48
      Height = 13
      Caption = #21512#21516#32534#21495
    end
    object Label2: TLabel
      Left = 96
      Top = 16
      Width = 48
      Height = 13
      Caption = #23458#25143#32534#21495
    end
    object Label3: TLabel
      Left = 168
      Top = 16
      Width = 48
      Height = 13
      Caption = #21830#21697#32534#21495
    end
    object Label4: TLabel
      Left = 264
      Top = 16
      Width = 48
      Height = 13
      Caption = #21830#21697#21517#31216
    end
    object Label5: TLabel
      Left = 368
      Top = 16
      Width = 48
      Height = 13
      Caption = #21830#21697#35268#26684
    end
    object Label6: TLabel
      Left = 24
      Top = 72
      Width = 24
      Height = 13
      Caption = #21333#20215
    end
    object Label7: TLabel
      Left = 24
      Top = 96
      Width = 24
      Height = 13
      Caption = #25968#37327
    end
    object Label8: TLabel
      Left = 24
      Top = 120
      Width = 24
      Height = 13
      Caption = #24635#20215
    end
    object Label9: TLabel
      Left = 24
      Top = 144
      Width = 48
      Height = 13
      Caption = #20184#27454#26041#24335
    end
    object Label10: TLabel
      Left = 488
      Top = 16
      Width = 48
      Height = 13
      Caption = #31614#23383#26085#26399
    end
    object Label11: TLabel
      Left = 24
      Top = 168
      Width = 48
      Height = 13
      Caption = #21512#21516#26399#38480
    end
    object PopupCalBtn: TSpeedButton
      Left = 464
      Top = 192
      Width = 81
      Height = 49
      Caption = #31354#20540
    end
    object ContractNoEdit: TDBEdit
      Left = 16
      Top = 32
      Width = 57
      Height = 21
      DataField = #21512#21516#32534#21495
      DataSource = MastData.ContractsSource
      TabOrder = 0
    end
    object ContractValidEdit: TDBEdit
      Left = 80
      Top = 168
      Width = 153
      Height = 21
      DataField = #21512#21516#26399#38480
      DataSource = MastData.ContractsSource
      TabOrder = 1
    end
    object PartNoEdit: TDBEdit
      Left = 168
      Top = 32
      Width = 57
      Height = 21
      DataField = #21830#21697#32534#21495
      DataSource = MastData.PartsSource
      TabOrder = 2
    end
    object SaleDateEdit: TDBEdit
      Left = 544
      Top = 8
      Width = 57
      Height = 21
      DataField = #31614#23383#26085#26399
      DataSource = MastData.ContractsSource
      TabOrder = 3
    end
    object PriceEdit: TDBEdit
      Left = 56
      Top = 64
      Width = 57
      Height = 21
      DataField = #21333#20215
      DataSource = MastData.ContractsSource
      TabOrder = 4
    end
    object QuanEdit: TDBEdit
      Left = 56
      Top = 88
      Width = 57
      Height = 21
      DataField = #25968#37327
      DataSource = MastData.ContractsSource
      TabOrder = 5
    end
    object TotalEdit: TDBEdit
      Left = 56
      Top = 120
      Width = 57
      Height = 21
      DataField = #24635#20215
      DataSource = MastData.ContractsSource
      TabOrder = 6
    end
    object PartNameCombo: TDBLookupListBox
      Left = 256
      Top = 32
      Width = 73
      Height = 17
      DataField = #21830#21697#32534#21495
      DataSource = MastData.ContractsSource
      ListField = #21830#21697#21517#31216
      ListSource = MastData.PartsSource
      TabOrder = 7
    end
    object PartSpecCombo: TDBLookupListBox
      Left = 360
      Top = 32
      Width = 73
      Height = 17
      DataField = #21830#21697#32534#21495
      DataSource = MastData.ContractsSource
      ListField = #35268#26684
      ListSource = MastData.PartsSource
      TabOrder = 8
    end
    object PaymentCombo: TDBComboBox
      Left = 88
      Top = 144
      Width = 145
      Height = 21
      DataField = #20184#27454#26041#24335
      DataSource = MastData.ContractsSource
      ItemHeight = 13
      TabOrder = 9
    end
    object DBGrid1: TDBGrid
      Left = 184
      Top = 64
      Width = 321
      Height = 41
      DataSource = MastData.ContractsSource
      TabOrder = 10
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
    end
    object SaveBtn: TButton
      Left = 32
      Top = 216
      Width = 75
      Height = 25
      Caption = #20445#23384#32534#36753
      TabOrder = 11
    end
    object CancelBtn: TButton
      Left = 152
      Top = 216
      Width = 75
      Height = 25
      Caption = #21462#28040#32534#36753
      TabOrder = 12
    end
    object CloseBtn: TButton
      Left = 288
      Top = 216
      Width = 75
      Height = 25
      Cancel = True
      Caption = #20851#38381
      ModalResult = 1
      TabOrder = 13
    end
    object CustNoEdit: TDBEdit
      Left = 96
      Top = 32
      Width = 57
      Height = 21
      DataField = #23458#25143#32534#21495
      DataSource = MastData.CustSource
      TabOrder = 14
    end
  end
  object ActiveSource: TDataSource
    DataSet = MastData.Contracts
    Left = 176
    Top = 448
  end
end