pfm_tjd.dfm

POS收银系统

inherited fm_tjd: Tfm_tjd
  Left = 56
  Top = 110
  Caption = 'fm_tjd'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited PageControl1: TPageControl
    inherited TabSheet1: TTabSheet
      object Label1: TLabel [0]
        Left = 24
        Top = 16
        Width = 36
        Height = 13
        Caption = '流水号'
        FocusControl = DBEdit1
      end
      object Label2: TLabel [1]
        Left = 24
        Top = 56
        Width = 48
        Height = 13
        Caption = '商品编码'
        FocusControl = DBEdit2
      end
      object Label3: TLabel [2]
        Left = 24
        Top = 96
        Width = 60
        Height = 13
        Caption = '商品条形码'
        FocusControl = DBEdit3
      end
      object Label5: TLabel [3]
        Left = 24
        Top = 136
        Width = 60
        Height = 13
        Caption = '调价前单价'
        FocusControl = DBEdit6
      end
      object Label6: TLabel [4]
        Left = 24
        Top = 176
        Width = 60
        Height = 13
        Caption = '调价后单价'
        FocusControl = DBEdit7
      end
      object Label7: TLabel [5]
        Left = 24
        Top = 216
        Width = 48
        Height = 13
        Caption = '调价日期'
        FocusControl = DBEdit8
      end
      object Label8: TLabel [6]
        Left = 24
        Top = 264
        Width = 48
        Height = 13
        Caption = '审核标志'
        FocusControl = DBEdit9
      end
      object Label9: TLabel [7]
        Left = 24
        Top = 304
        Width = 36
        Height = 13
        Caption = '审核人'
        FocusControl = DBEdit10
      end
      object Label10: TLabel [8]
        Left = 24
        Top = 344
        Width = 36
        Height = 13
        Caption = '操作员'
        FocusControl = DBEdit11
      end
      object Label11: TLabel [9]
        Left = 208
        Top = 272
        Width = 24
        Height = 13
        Caption = '备注'
      end
      object DBEdit1: TDBEdit
        Left = 24
        Top = 32
        Width = 73
        Height = 21
        Color = clMenu
        DataField = 'lsh'
        DataSource = DataSource1
        ReadOnly = True
        TabOrder = 9
      end
      object DBEdit2: TDBEdit
        Left = 24
        Top = 72
        Width = 49
        Height = 21
        DataField = 'spbm'
        DataSource = DataSource1
        TabOrder = 10
        OnChange = DBEdit2Change
      end
      object DBEdit3: TDBEdit
        Left = 24
        Top = 112
        Width = 89
        Height = 21
        DataField = 'sptxm'
        DataSource = DataSource1
        TabOrder = 11
        OnChange = DBEdit3Change
      end
      object DBEdit6: TDBEdit
        Left = 24
        Top = 152
        Width = 73
        Height = 21
        TabStop = False
        Color = clMenu
        DataField = 'tjqdj'
        DataSource = DataSource1
        ReadOnly = True
        TabOrder = 12
      end
      object DBEdit7: TDBEdit
        Left = 24
        Top = 192
        Width = 73
        Height = 21
        DataField = 'tjhdj'
        DataSource = DataSource1
        TabOrder = 13
      end
      object DBEdit8: TDBEdit
        Left = 24
        Top = 232
        Width = 129
        Height = 21
        DataField = 'tjrq'
        DataSource = DataSource1
        TabOrder = 14
      end
      object DBEdit9: TDBEdit
        Left = 24
        Top = 280
        Width = 49
        Height = 21
        DataField = 'shbz'
        DataSource = DataSource1
        TabOrder = 15
      end
      object DBEdit10: TDBEdit
        Left = 24
        Top = 320
        Width = 49
        Height = 21
        DataField = 'shrm'
        DataSource = DataSource1
        TabOrder = 16
      end
      object DBEdit11: TDBEdit
        Left = 24
        Top = 360
        Width = 49
        Height = 21
        DataField = 'czym'
        DataSource = DataSource1
        TabOrder = 18
      end
      object DBMemo1: TDBMemo
        Left = 208
        Top = 288
        Width = 185
        Height = 89
        DataField = 'remark'
        DataSource = DataSource1
        TabOrder = 17
      end
    end
  end
  inherited Query1: TQuery
    SQL.Strings = (
      'select * from tb_tjd')
    object Query1lsh: TIntegerField
      FieldName = 'lsh'
      Origin = 'POSDB."dbo.tb_tjd".lsh'
    end
    object Query1spbm: TStringField
      FieldName = 'spbm'
      Origin = 'POSDB."dbo.tb_tjd".spbm'
      FixedChar = True
      Size = 6
    end
    object Query1sptxm: TStringField
      FieldName = 'sptxm'
      Origin = 'POSDB."dbo.tb_tjd".sptxm'
      FixedChar = True
      Size = 13
    end
    object Query1tjqdj: TFloatField
      FieldName = 'tjqdj'
      Origin = 'POSDB."dbo.tb_tjd".tjqdj'
    end
    object Query1tjhdj: TFloatField
      FieldName = 'tjhdj'
      Origin = 'POSDB."dbo.tb_tjd".tjhdj'
    end
    object Query1tjrq: TDateTimeField
      FieldName = 'tjrq'
      Origin = 'POSDB."dbo.tb_tjd".tjrq'
    end
    object Query1shbz: TStringField
      FieldName = 'shbz'
      Origin = 'POSDB."dbo.tb_tjd".shbz'
      FixedChar = True
      Size = 4
    end
    object Query1shrm: TStringField
      FieldName = 'shrm'
      Origin = 'POSDB."dbo.tb_tjd".shrm'
      FixedChar = True
      Size = 6
    end
    object Query1czym: TStringField
      FieldName = 'czym'
      Origin = 'POSDB."dbo.tb_tjd".czym'
      FixedChar = True
      Size = 6
    end
    object Query1remark: TStringField
      FieldName = 'remark'
      Origin = 'POSDB."dbo.tb_tjd".remark'
      Size = 60
    end
  end
end