salebackfrm.dfm

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

object SaleBackInputDlg: TSaleBackInputDlg
  Left = 231
  Top = 177
  BorderStyle = bsDialog
  Caption = #38144#21806#36864#36135#24405#20837
  ClientHeight = 332
  ClientWidth = 491
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  FormStyle = fsMDIChild
  KeyPreview = True
  OldCreateOrder = True
  Position = poScreenCenter
  Visible = True
  OnClose = FormClose
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel
    Left = 8
    Top = 40
    Width = 60
    Height = 12
    Caption = #20135#21697#32534#21495#65306
  end
  object Label2: TLabel
    Left = 216
    Top = 40
    Width = 60
    Height = 12
    Caption = #36864#36135#26085#26399#65306
  end
  object Label3: TLabel
    Left = 384
    Top = 40
    Width = 36
    Height = 12
    Caption = #25968#37327#65306
  end
  object Label4: TLabel
    Left = 8
    Top = 72
    Width = 60
    Height = 12
    Caption = #36864#36135#21407#22240#65306
  end
  object DBEdtGoodId: TDBEdit
    Left = 72
    Top = 32
    Width = 121
    Height = 20
    DataField = 'GoodId'
    DataSource = DMMain.DSSaleBack
    TabOrder = 0
  end
  object DBEdtAmount: TDBEdit
    Left = 424
    Top = 32
    Width = 49
    Height = 20
    DataField = 'Amount'
    DataSource = DMMain.DSSaleBack
    TabOrder = 1
    OnKeyPress = DBEdtAmountKeyPress
  end
  object DBMReason: TDBMemo
    Left = 16
    Top = 88
    Width = 465
    Height = 41
    DataField = 'Reason'
    DataSource = DMMain.DSSaleBack
    TabOrder = 2
  end
  object ToolBar1: TToolBar
    Left = 0
    Top = 0
    Width = 491
    Height = 29
    ButtonHeight = 20
    ButtonWidth = 73
    Caption = 'ToolBar1'
    ShowCaptions = True
    TabOrder = 3
    object TBAdd: TToolButton
      Left = 0
      Top = 2
      Caption = #22686#21152
      ImageIndex = 0
      OnClick = TBAddClick
    end
    object TBEdit: TToolButton
      Left = 73
      Top = 2
      Caption = #32534#36753
      ImageIndex = 1
      OnClick = TBEditClick
    end
    object TBDelete: TToolButton
      Left = 146
      Top = 2
      Caption = #21024#38500
      ImageIndex = 2
      OnClick = TBDeleteClick
    end
    object TBOK: TToolButton
      Left = 219
      Top = 2
      Caption = #30830#35748
      Enabled = False
      ImageIndex = 4
      OnClick = TBOKClick
    end
    object TBCancel: TToolButton
      Left = 292
      Top = 2
      Caption = #21462#28040
      Enabled = False
      ImageIndex = 3
      OnClick = TBCancelClick
    end
    object TBQuit: TToolButton
      Left = 365
      Top = 2
      Caption = '    '#36864#20986'   '
      ImageIndex = 5
      OnClick = TBQuitClick
    end
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 144
    Width = 481
    Height = 185
    DataSource = DMMain.DSSaleBack
    TabOrder = 4
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = #23435#20307
    TitleFont.Style = []
    OnCellClick = DBGrid1CellClick
    OnKeyPress = DBGrid1KeyPress
    Columns = <
      item
        Expanded = False
        FieldName = 'GoodId'
        Title.Caption = #21830#21697#32534#21495
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'BackDate'
        Title.Caption = #36864#36135#26085#26399
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Amount'
        Title.Caption = #25968#37327
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Reason'
        Title.Caption = #36864#36135#21407#22240
        Visible = True
      end>
  end
  object DTPBackDate: TDateTimePicker
    Left = 280
    Top = 32
    Width = 89
    Height = 20
    Date = 38091.918578391210000000
    Time = 38091.918578391210000000
    TabOrder = 5
  end
end