pfm_jhd2.dfm

POS收银系统

          Left = 8
          Top = 16
          Width = 39
          Height = 13
          Caption = '流水号'
        end
        object Label5: TLabel
          Left = 184
          Top = 20
          Width = 52
          Height = 13
          Caption = '进货仓库'
        end
        object Label16: TLabel
          Left = 400
          Top = 20
          Width = 26
          Height = 13
          Caption = '日期'
        end
        object Label11: TLabel
          Left = 568
          Top = 20
          Width = 65
          Height = 13
          Caption = '供应商名称'
        end
        object Label21: TLabel
          Left = 8
          Top = 44
          Width = 39
          Height = 13
          Caption = '经办人'
        end
        object Label20: TLabel
          Left = 392
          Top = 44
          Width = 39
          Height = 13
          Caption = '操作员'
        end
        object Label22: TLabel
          Left = 200
          Top = 44
          Width = 39
          Height = 13
          Caption = '审核人'
        end
        object Edit1: TEdit
          Left = 56
          Top = 16
          Width = 121
          Height = 21
          Color = clMenu
          ReadOnly = True
          TabOrder = 0
          Text = 'Edit1'
        end
        object Edit2: TEdit
          Left = 248
          Top = 16
          Width = 121
          Height = 21
          Color = clMenu
          ReadOnly = True
          TabOrder = 1
          Text = 'Edit2'
        end
        object Edit3: TEdit
          Left = 440
          Top = 16
          Width = 121
          Height = 21
          Color = clMenu
          ReadOnly = True
          TabOrder = 2
          Text = 'Edit3'
        end
        object Edit4: TEdit
          Left = 640
          Top = 16
          Width = 121
          Height = 21
          Color = clMenu
          ReadOnly = True
          TabOrder = 3
          Text = 'Edit4'
        end
        object Edit8: TEdit
          Left = 56
          Top = 40
          Width = 121
          Height = 21
          Color = clMenu
          ReadOnly = True
          TabOrder = 4
          Text = 'Edit8'
        end
        object Edit9: TEdit
          Left = 248
          Top = 40
          Width = 121
          Height = 21
          Color = clMenu
          ReadOnly = True
          TabOrder = 5
          Text = 'Edit9'
        end
        object Edit10: TEdit
          Left = 440
          Top = 40
          Width = 121
          Height = 21
          Color = clMenu
          ReadOnly = True
          TabOrder = 6
          Text = 'Edit10'
        end
        object BBtnjhd: TBitBtn
          Left = 640
          Top = 40
          Width = 105
          Height = 25
          Caption = '填写进货单'
          TabOrder = 7
          OnClick = BBtnjhdClick
        end
      end
      object BitBtn_quit: TBitBtn
        Left = 600
        Top = 384
        Width = 75
        Height = 25
        Caption = '退出'
        TabOrder = 2
      end
      object GroupBox3: TGroupBox
        Left = 257
        Top = 73
        Width = 529
        Height = 392
        Align = alClient
        Caption = '进货单明细记录输入'
        TabOrder = 3
        object LView1: TListView
          Left = 2
          Top = 145
          Width = 525
          Height = 245
          Align = alClient
          Color = clInfoBk
          Columns = <>
          HideSelection = False
          RowSelect = True
          TabOrder = 0
          ViewStyle = vsReport
          OnClick = LView1Click
        end
        object Panel1: TPanel
          Left = 2
          Top = 15
          Width = 525
          Height = 130
          Align = alTop
          BevelInner = bvLowered
          TabOrder = 1
          object Label2: TLabel
            Left = 16
            Top = 8
            Width = 130
            Height = 13
            Caption = '商品编码或商品条形码'
          end
          object Label3: TLabel
            Left = 168
            Top = 8
            Width = 78
            Height = 13
            Caption = '进货商品数量'
          end
          object Label6: TLabel
            Left = 320
            Top = 8
            Width = 52
            Height = 13
            Caption = '进货单价'
          end
          object Label15: TLabel
            Left = 16
            Top = 48
            Width = 39
            Height = 13
            Caption = '合同号'
          end
          object Label14: TLabel
            Left = 168
            Top = 48
            Width = 52
            Height = 13
            Caption = '单据号码'
          end
          object Label17: TLabel
            Left = 320
            Top = 48
            Width = 39
            Height = 13
            Caption = '发票号'
          end
          object lbltishi: TLabel
            Left = 16
            Top = 96
            Width = 36
            Height = 13
            Caption = '提示：'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clRed
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
          end
          object Edit11: TEdit
            Left = 16
            Top = 24
            Width = 121
            Height = 21
            Color = clAqua
            TabOrder = 0
            Text = 'Edit11'
            OnKeyPress = Edit11KeyPress
          end
          object Edit12: TEdit
            Left = 168
            Top = 24
            Width = 81
            Height = 21
            TabOrder = 1
            Text = 'Edit12'
            OnKeyPress = Edit12KeyPress
          end
          object Edit13: TEdit
            Left = 320
            Top = 24
            Width = 65
            Height = 21
            TabOrder = 2
            Text = 'Edit13'
            OnKeyPress = Edit13KeyPress
          end
          object Edit7: TEdit
            Left = 16
            Top = 64
            Width = 121
            Height = 21
            TabOrder = 3
            Text = 'Edit7'
            OnKeyPress = Edit7KeyPress
          end
          object Edit5: TEdit
            Left = 168
            Top = 64
            Width = 121
            Height = 21
            TabOrder = 4
            Text = 'Edit5'
            OnKeyPress = Edit5KeyPress
          end
          object Edit6: TEdit
            Left = 320
            Top = 64
            Width = 113
            Height = 21
            TabOrder = 5
            Text = 'Edit6'
            OnKeyPress = Edit6KeyPress
          end
          object BBtncancel: TBitBtn
            Left = 336
            Top = 96
            Width = 75
            Height = 25
            Caption = '取消退出'
            TabOrder = 6
            OnClick = BBtncancelClick
          end
          object BBtnSave: TBitBtn
            Left = 432
            Top = 96
            Width = 75
            Height = 25
            Caption = '保存退出'
            TabOrder = 7
            OnClick = BBtnSaveClick
          end
          object BBtndel: TBitBtn
            Left = 176
            Top = 96
            Width = 81
            Height = 25
            Caption = '删除进货记录'
            TabOrder = 8
            OnClick = BBtndelClick
          end
        end
      end
    end
  end
  object Query3: TQuery
    DatabaseName = 'posdb'
    SQL.Strings = (
      'select * from t_spxx where spbm=:spbm')
    Left = 452
    Top = 104
    ParamData = <
      item
        DataType = ftFixedChar
        Name = 'spbm'
        ParamType = ptUnknown
      end>
    object Query3spbm: TStringField
      FieldName = 'spbm'
      Origin = 'POSDB."dbo.t_spxx".spbm'
      FixedChar = True
      Size = 6
    end
    object Query3sptxm: TStringField
      FieldName = 'sptxm'
      Origin = 'POSDB."dbo.t_spxx".sptxm'
      FixedChar = True
      Size = 13
    end
    object Query3spmc: TStringField
      FieldName = 'spmc'
      Origin = 'POSDB."dbo.t_spxx".spmc'
    end
    object Query3ggxh: TStringField
      FieldName = 'ggxh'
      Origin = 'POSDB."dbo.t_spxx".ggxh'
    end
    object Query3dengji: TStringField
      FieldName = 'dengji'
      Origin = 'POSDB."dbo.t_spxx".dengji'
      FixedChar = True
      Size = 16
    end
    object Query3zhuangtai: TStringField
      FieldName = 'zhuangtai'
      Origin = 'POSDB."dbo.t_spxx".zhuangtai'
      FixedChar = True
      Size = 10
    end
    object Query3baozhuangdw: TStringField
      FieldName = 'baozhuangdw'
      Origin = 'POSDB."dbo.t_spxx".baozhuangdw'
      FixedChar = True
      Size = 10
    end
    object Query3baozhuangsl: TStringField
      FieldName = 'baozhuangsl'
      Origin = 'POSDB."dbo.t_spxx".baozhuangsl'
      FixedChar = True
      Size = 10
    end
    object Query3hh: TStringField
      FieldName = 'hh'
      Origin = 'POSDB."dbo.t_spxx".hh'
      FixedChar = True
      Size = 8
    end
    object Query3gysmc: TStringField
      FieldName = 'gysmc'
      Origin = 'POSDB."dbo.t_spxx".gysmc'
      FixedChar = True
      Size = 40
    end
    object Query3cd: TStringField
      FieldName = 'cd'
      Origin = 'POSDB."dbo.t_spxx".cd'
      Size = 30
    end
    object Query3xsfs: TStringField
      FieldName = 'xsfs'
      Origin = 'POSDB."dbo.t_spxx".xsfs'
      FixedChar = True
    end
    object Query3wsjj: TFloatField
      FieldName = 'wsjj'
      Origin = 'POSDB."dbo.t_spxx".wsjj'
    end
    object Query3jhsl: TFloatField
      FieldName = 'jhsl'
      Origin = 'POSDB."dbo.t_spxx".jhsl'
    end
    object Query3wsdj: TFloatField
      FieldName = 'wsdj'
      Origin = 'POSDB."dbo.t_spxx".wsdj'
    end
    object Query3xssl: TFloatField
      FieldName = 'xssl'
      Origin = 'POSDB."dbo.t_spxx".xssl'
    end
    object Query3yhl: TFloatField
      FieldName = 'yhl'
      Origin = 'POSDB."dbo.t_spxx".yhl'
    end
    object Query3splb: TStringField
      FieldName = 'splb'
      Origin = 'POSDB."dbo.t_spxx".splb'
      FixedChar = True
    end
  end
  object DataSource3: TDataSource
    DataSet = Query3
    Left = 420
    Top = 104
  end
  object Query1: TQuery
    DatabaseName = 'posdb'
    Left = 12
    Top = 225
  end
end