pfm_jhd.dfm

POS收银系统

inherited fm_jhd: Tfm_jhd
  Left = 8
  Top = 244
  Width = 744
  Height = 508
  Caption = 'fm_jhd'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited PageControl1: TPageControl
    Width = 736
    Height = 481
    inherited TabSheet1: TTabSheet
      object Label2: TLabel [0]
        Left = 264
        Top = 176
        Width = 13
        Height = 13
        Caption = 'lsh'
        FocusControl = DBEdit1
        Visible = False
      end
      object Label3: TLabel [1]
        Left = 32
        Top = 168
        Width = 48
        Height = 13
        Caption = '商品编码'
        FocusControl = DBEdit2
      end
      object Label6: TLabel [2]
        Left = 20
        Top = 200
        Width = 60
        Height = 13
        Caption = '商品条形码'
        FocusControl = DBEdit3
      end
      object Label8: TLabel [3]
        Left = 32
        Top = 264
        Width = 48
        Height = 13
        Caption = '进货数量'
        FocusControl = DBEdit7
      end
      object Label9: TLabel [4]
        Left = 32
        Top = 232
        Width = 48
        Height = 13
        Caption = '进货单价'
        FocusControl = DBEdit8
      end
      inherited GroupBox1: TGroupBox
        Top = 0
      end
      object GroupBox2: TGroupBox
        Left = 24
        Top = 0
        Width = 393
        Height = 153
        TabOrder = 9
        object Label1: TLabel
          Left = 8
          Top = 16
          Width = 36
          Height = 13
          Caption = '流水号'
        end
        object Label5: TLabel
          Left = 184
          Top = 20
          Width = 48
          Height = 13
          Caption = '进货仓库'
        end
        object Label16: TLabel
          Left = 16
          Top = 44
          Width = 24
          Height = 13
          Caption = '日期'
        end
        object Label11: TLabel
          Left = 176
          Top = 44
          Width = 60
          Height = 13
          Caption = '供应商名称'
        end
        object Label21: TLabel
          Left = 200
          Top = 92
          Width = 36
          Height = 13
          Caption = '经办人'
        end
        object Label20: TLabel
          Left = 200
          Top = 124
          Width = 36
          Height = 13
          Caption = '操作员'
        end
        object Label22: TLabel
          Left = 8
          Top = 116
          Width = 36
          Height = 13
          Caption = '审核人'
        end
        object Label15: TLabel
          Left = 8
          Top = 88
          Width = 36
          Height = 13
          Caption = '合同号'
        end
        object Label17: TLabel
          Left = 200
          Top = 68
          Width = 36
          Height = 13
          Caption = '发票号'
        end
        object Label14: TLabel
          Left = 0
          Top = 64
          Width = 48
          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 = 56
          Top = 40
          Width = 121
          Height = 21
          Color = clMenu
          ReadOnly = True
          TabOrder = 2
          Text = 'Edit3'
        end
        object Edit4: TEdit
          Left = 248
          Top = 40
          Width = 121
          Height = 21
          Color = clMenu
          ReadOnly = True
          TabOrder = 3
          Text = 'Edit4'
        end
        object Edit5: TEdit
          Left = 56
          Top = 64
          Width = 121
          Height = 21
          Color = clMenu
          ReadOnly = True
          TabOrder = 4
          Text = 'Edit5'
        end
        object Edit6: TEdit
          Left = 248
          Top = 64
          Width = 121
          Height = 21
          Color = clMenu
          ReadOnly = True
          TabOrder = 5
          Text = 'Edit6'
        end
        object Edit7: TEdit
          Left = 56
          Top = 88
          Width = 121
          Height = 21
          Color = clMenu
          ReadOnly = True
          TabOrder = 6
          Text = 'Edit7'
        end
        object Edit8: TEdit
          Left = 248
          Top = 88
          Width = 121
          Height = 21
          Color = clMenu
          ReadOnly = True
          TabOrder = 7
          Text = 'Edit8'
        end
        object Edit9: TEdit
          Left = 56
          Top = 112
          Width = 121
          Height = 21
          Color = clMenu
          ReadOnly = True
          TabOrder = 8
          Text = 'Edit9'
        end
        object Edit10: TEdit
          Left = 248
          Top = 112
          Width = 121
          Height = 21
          Color = clMenu
          ReadOnly = True
          TabOrder = 9
          Text = 'Edit10'
        end
      end
      object DBEdit1: TDBEdit
        Left = 264
        Top = 192
        Width = 64
        Height = 21
        DataField = 'lsh'
        DataSource = DataSource1
        TabOrder = 10
        Visible = False
      end
      object DBEdit2: TDBEdit
        Left = 96
        Top = 168
        Width = 57
        Height = 21
        DataField = 'spbm'
        DataSource = DataSource1
        TabOrder = 11
        OnChange = DBEdit2Change
      end
      object DBEdit3: TDBEdit
        Left = 96
        Top = 200
        Width = 82
        Height = 21
        DataField = 'sptxm'
        DataSource = DataSource1
        TabOrder = 12
        OnChange = DBEdit3Change
      end
      object DBEdit7: TDBEdit
        Left = 96
        Top = 264
        Width = 64
        Height = 21
        DataField = 'jhnum'
        DataSource = DataSource1
        TabOrder = 13
      end
      object DBEdit8: TDBEdit
        Left = 96
        Top = 232
        Width = 64
        Height = 21
        DataField = 'jhdj'
        DataSource = DataSource1
        TabOrder = 14
      end
    end
    inherited TabSheet2: TTabSheet
      inherited DBGrid1: TDBGrid
        Width = 728
        ReadOnly = False
      end
      inherited BitBtn6: TBitBtn
        Visible = False
      end
      object BBtn_yskcl: TBitBtn
        Left = 320
        Top = 408
        Width = 75
        Height = 25
        Caption = '应收款处理'
        TabOrder = 4
        OnClick = BBtn_yskclClick
      end
    end
  end
  inherited DataSource1: TDataSource
    Left = 4
    Top = 48
  end
  inherited Query1: TQuery
    SQL.Strings = (
      'select * from tb_jhdmx')
    Left = 12
    Top = 120
    object Query1lsh: TIntegerField
      FieldName = 'lsh'
      Origin = 'POSDB."dbo.tb_jhdmx".lsh'
    end
    object Query1spbm: TStringField
      FieldName = 'spbm'
      Origin = 'POSDB."dbo.tb_jhdmx".spbm'
      FixedChar = True
      Size = 6
    end
    object Query1sptxm: TStringField
      FieldName = 'sptxm'
      Origin = 'POSDB."dbo.tb_jhdmx".sptxm'
      FixedChar = True
      Size = 13
    end
    object Query1jhnum: TIntegerField
      FieldName = 'jhnum'
      Origin = 'POSDB."dbo.tb_jhdmx".jhnum'
    end
    object Query1jhdj: TFloatField
      FieldName = 'jhdj'
      Origin = 'POSDB."dbo.tb_jhdmx".jhdj'
    end
  end
  inherited Query3: TQuery
    DataSource = nil
  end
end