⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 rppos1f.dfm

📁 DELPHI编写的商场收银POS机源代码
💻 DFM
字号:
object RMPOS1F: TRMPOS1F
  Left = 271
  Top = 238
  AutoScroll = False
  Caption = '销售记录明细表'
  ClientHeight = 182
  ClientWidth = 422
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = True
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 300
    Height = 181
    Caption = '查询条件'
    Color = 16755370
    Ctl3D = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clNavy
    Font.Height = -15
    Font.Name = '宋体'
    Font.Style = []
    ParentColor = False
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 0
    object LB_CON1: TLabel
      Left = 10
      Top = 25
      Width = 60
      Height = 15
      Caption = '查询日期'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label7: TLabel
      Left = 173
      Top = 24
      Width = 15
      Height = 15
      Caption = '至'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label1: TLabel
      Left = 10
      Top = 46
      Width = 75
      Height = 15
      Caption = '产品条形码'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 10
      Top = 93
      Width = 60
      Height = 15
      Caption = '销售金额'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 173
      Top = 93
      Width = 15
      Height = 15
      Caption = '至'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 10
      Top = 67
      Width = 60
      Height = 15
      Caption = '产品类别'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object LB11: TJEdit
      Left = 70
      Top = 20
      Width = 100
      Height = 21
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      Digits = 1
      Max = 999999999
      _EditType = CDATE_EDIT
      _SHOWCAL = NONE
      _BADINPUT = True
      _LONGTIME = False
    end
    object LB12: TJEdit
      Left = 190
      Top = 20
      Width = 100
      Height = 21
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      Digits = 1
      Max = 999999999
      _EditType = CDATE_EDIT
      _SHOWCAL = NONE
      _BADINPUT = True
      _LONGTIME = False
    end
    object LB21: JLOOKUPBOX
      Left = 70
      Top = 42
      Width = 221
      Height = 21
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      MaxLength = 20
      ParentFont = False
      TabOrder = 2
      _DatabaseName = 'MAIN'
      _TableName = 'BGDS'
      _Field_IDNO = 'BGENO'
      _Field_NAME = 'BGNAM'
      _EDIT_WIDTH = 80
      _CHANGE_QUERY = True
      _INSERT_RECORD = False
      _SHOW_MESSAGE = False
    end
    object LB41: TJEdit
      Left = 70
      Top = 89
      Width = 100
      Height = 21
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      Digits = 1
      Max = 999999999
      _EditType = INTEGER_EDIT
      _SHOWCAL = NONE
      _BADINPUT = True
      _LONGTIME = False
    end
    object LB42: TJEdit
      Left = 190
      Top = 89
      Width = 100
      Height = 21
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      Digits = 1
      Max = 999999999
      _EditType = INTEGER_EDIT
      _SHOWCAL = NONE
      _BADINPUT = True
      _LONGTIME = False
    end
    object LB31: SELOOKUPBOX
      Left = 70
      Top = 65
      Width = 221
      Height = 21
      MaxLength = 20
      TabOrder = 5
      _DatabaseName = 'MAIN'
      _TableName = 'SYSLST'
      _Field_IDNO = 'BGDSBGKIN'
      _EDIT_WIDTH = 80
      _CHANGE_QUERY = True
      _INSERT_RECORD = True
      _SHOW_MESSAGE = False
    end
  end
  object Panel1: TPanel
    Left = 302
    Top = 0
    Width = 120
    Height = 182
    Align = alRight
    BevelOuter = bvNone
    BorderWidth = 1
    Color = clNavy
    TabOrder = 1
    object BTNPRN: TSpeedButton
      Left = 0
      Top = 62
      Width = 120
      Height = 60
      Cursor = crHandPoint
      Caption = '&P 打印'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      OnClick = BTNPREClick
    end
    object BTNPRE: TSpeedButton
      Left = 0
      Top = 2
      Width = 120
      Height = 60
      Cursor = crHandPoint
      Caption = '&W 预览'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      OnClick = BTNPREClick
    end
    object BTNQUT: TSpeedButton
      Left = 0
      Top = 122
      Width = 120
      Height = 60
      Cursor = crHandPoint
      Caption = '&Q 结束'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      OnClick = BTNQUTClick
    end
  end
  object QPOS1F: TQuery
    DatabaseName = 'MAIN'
    SQL.Strings = (
      'SELECT * '
      'FROM POSA, POSB, BGDS'
      'WHERE POSA.PAENO=POSB.PAENO'
      '  AND POSB.BGENO = BGDS.BGENO')
    Left = 305
    Top = 5
    object QPOS1FPAENO: TStringField
      FieldName = 'PAENO'
      Origin = 'MAIN.POSA.PAENO'
      Size = 12
    end
    object QPOS1FPAIDE: TStringField
      FieldName = 'PAIDE'
      Origin = 'MAIN.POSA.PAIDE'
      Size = 3
    end
    object QPOS1FBMENO: TStringField
      FieldName = 'BMENO'
      Origin = 'MAIN.POSA.BMENO'
      Size = 10
    end
    object QPOS1FBNENO: TStringField
      FieldName = 'BNENO'
      Origin = 'MAIN.POSA.BNENO'
      Size = 10
    end
    object QPOS1FPAIPN: TBooleanField
      FieldName = 'PAIPN'
      Origin = 'MAIN.POSA.PAIPN'
    end
    object QPOS1FPAIVO: TStringField
      FieldName = 'PAIVO'
      Origin = 'MAIN.POSA.PAIVO'
      Size = 15
    end
    object QPOS1FPACIV: TStringField
      FieldName = 'PACIV'
      Origin = 'MAIN.POSA.PACIV'
      Size = 8
    end
    object QPOS1FPADAT: TDateTimeField
      FieldName = 'PADAT'
      Origin = 'MAIN.POSA.PADAT'
    end
    object QPOS1FPATME: TStringField
      FieldName = 'PATME'
      Origin = 'MAIN.POSA.PATME'
      Size = 5
    end
    object QPOS1FPACNT: TFloatField
      FieldName = 'PACNT'
      Origin = 'MAIN.POSA.PACNT'
    end
    object QPOS1FPACOT: TFloatField
      FieldName = 'PACOT'
      Origin = 'MAIN.POSA.PACOT'
    end
    object QPOS1FPACOG: TFloatField
      FieldName = 'PACOG'
      Origin = 'MAIN.POSA.PACOG'
    end
    object QPOS1FPACNO: TStringField
      FieldName = 'PACNO'
      Origin = 'MAIN.POSA.PACNO'
    end
    object QPOS1FPACDT: TDateTimeField
      FieldName = 'PACDT'
      Origin = 'MAIN.POSA.PACDT'
    end
    object QPOS1FPACNA: TFloatField
      FieldName = 'PACNA'
      Origin = 'MAIN.POSA.PACNA'
    end
    object QPOS1FPACKD: TStringField
      FieldName = 'PACKD'
      Origin = 'MAIN.POSA.PACKD'
      Size = 3
    end
    object QPOS1FPGCOS: TFloatField
      FieldName = 'PGCOS'
      Origin = 'MAIN.POSA.PGCOS'
    end
    object QPOS1FPABCK: TBooleanField
      FieldName = 'PABCK'
      Origin = 'MAIN.POSA.PABCK'
    end
    object QPOS1FPABCN: TBooleanField
      FieldName = 'PABCN'
      Origin = 'MAIN.POSA.PABCN'
    end
    object QPOS1FPACPD: TBooleanField
      FieldName = 'PACPD'
      Origin = 'MAIN.POSA.PACPD'
    end
    object QPOS1FPAWEK: TStringField
      FieldName = 'PAWEK'
      Origin = 'MAIN.POSA.PAWEK'
      Size = 1
    end
    object QPOS1FPAENO_1: TStringField
      FieldName = 'PAENO_1'
      Origin = 'MAIN.POSA.PAWEK'
      Size = 12
    end
    object QPOS1FPBENO: TStringField
      FieldName = 'PBENO'
      Origin = 'MAIN.POSA.PAWEK'
      Size = 3
    end
    object QPOS1FBGQTN: TFloatField
      FieldName = 'BGQTN'
      Origin = 'MAIN.POSA.PAWEK'
    end
    object QPOS1FBGENO: TStringField
      FieldName = 'BGENO'
      Origin = 'MAIN.POSA.PAWEK'
    end
    object QPOS1FBGCNT: TFloatField
      FieldName = 'BGCNT'
      Origin = 'MAIN.POSA.PAWEK'
    end
    object QPOS1FBGCOS: TFloatField
      FieldName = 'BGCOS'
      Origin = 'MAIN.POSA.PAWEK'
    end
    object QPOS1FBGCOT: TFloatField
      FieldName = 'BGCOT'
      Origin = 'MAIN.POSA.PAWEK'
    end
    object QPOS1FBGENO_1: TStringField
      FieldName = 'BGENO_1'
      Origin = 'MAIN.POSA.PAWEK'
    end
    object QPOS1FBGNAM: TStringField
      FieldName = 'BGNAM'
      Origin = 'MAIN.POSA.PAWEK'
      Size = 40
    end
    object QPOS1FBGKIN: TStringField
      FieldName = 'BGKIN'
      Origin = 'MAIN.POSA.PAWEK'
      Size = 3
    end
    object QPOS1FBGPST: TFloatField
      FieldName = 'BGPST'
      Origin = 'MAIN.POSA.PAWEK'
    end
    object QPOS1FBGPVP: TFloatField
      FieldName = 'BGPVP'
      Origin = 'MAIN.POSA.PAWEK'
    end
    object QPOS1FBGPMM: TFloatField
      FieldName = 'BGPMM'
      Origin = 'MAIN.POSA.PAWEK'
    end
    object QPOS1FBGCST: TFloatField
      FieldName = 'BGCST'
      Origin = 'MAIN.POSA.PAWEK'
    end
    object QPOS1FBGOTH: TFloatField
      FieldName = 'BGOTH'
      Origin = 'MAIN.POSA.PAWEK'
    end
    object QPOS1FBGQTS: TFloatField
      FieldName = 'BGQTS'
      Origin = 'MAIN.POSA.PAWEK'
    end
    object QPOS1FBGQTN_1: TFloatField
      FieldName = 'BGQTN_1'
      Origin = 'MAIN.POSA.PAWEK'
    end
    object QPOS1FBGCOS_1: TFloatField
      FieldName = 'BGCOS_1'
      Origin = 'MAIN.POSA.PAWEK'
    end
    object QPOS1FBSENO: TStringField
      FieldName = 'BSENO'
      Origin = 'MAIN.POSA.PAWEK'
      Size = 10
    end
    object QPOS1FBGCNA: TStringField
      FieldName = 'BGCNA'
      Origin = 'MAIN.POSA.PAWEK'
      Size = 40
    end
    object QPOS1FBGSUM: TStringField
      FieldName = 'BGSUM'
      Origin = 'MAIN.POSA.PAWEK'
      Size = 30
    end
    object QPOS1FBGSIN: TStringField
      FieldName = 'BGSIN'
      Origin = 'MAIN.POSA.PAWEK'
      Size = 5
    end
    object QPOS1FBGRUL: TStringField
      FieldName = 'BGRUL'
      Origin = 'MAIN.POSA.PAWEK'
      Size = 3
    end
    object QPOS1FBGGAU: TStringField
      FieldName = 'BGGAU'
      Origin = 'MAIN.POSA.PAWEK'
      Size = 3
    end
    object QPOS1FBGUNS: TStringField
      FieldName = 'BGUNS'
      Origin = 'MAIN.POSA.PAWEK'
      Size = 3
    end
    object QPOS1FBGUNP: TStringField
      FieldName = 'BGUNP'
      Origin = 'MAIN.POSA.PAWEK'
      Size = 3
    end
    object QPOS1FBGCLR: TStringField
      FieldName = 'BGCLR'
      Origin = 'MAIN.POSA.PAWEK'
      Size = 3
    end
    object QPOS1FBGCLH: TStringField
      FieldName = 'BGCLH'
      Origin = 'MAIN.POSA.PAWEK'
      Size = 10
    end
    object QPOS1FBGCLW: TFloatField
      FieldName = 'BGCLW'
      Origin = 'MAIN.POSA.PAWEK'
    end
    object QPOS1FBGUNW: TStringField
      FieldName = 'BGUNW'
      Origin = 'MAIN.POSA.PAWEK'
      Size = 3
    end
    object QPOS1FBGUSE: TStringField
      FieldName = 'BGUSE'
      Origin = 'MAIN.POSA.PAWEK'
      Size = 3
    end
    object QPOS1FBGCSS: TFloatField
      FieldName = 'BGCSS'
      Origin = 'MAIN.POSA.PAWEK'
    end
    object QPOS1FBGQTE: TFloatField
      FieldName = 'BGQTE'
      Origin = 'MAIN.POSA.PAWEK'
    end
    object QPOS1FBGDTC: TDateTimeField
      FieldName = 'BGDTC'
      Origin = 'MAIN.POSA.PAWEK'
    end
    object QPOS1FBGDAT: TDateTimeField
      FieldName = 'BGDAT'
      Origin = 'MAIN.POSA.PAWEK'
    end
    object QPOS1FBGMRK: TMemoField
      FieldName = 'BGMRK'
      Origin = 'MAIN.POSA.PAWEK'
      BlobType = ftMemo
      Size = 1
    end
    object QPOS1FBGBSA: TStringField
      FieldName = 'BGBSA'
      Origin = 'MAIN.POSA.PAWEK'
      Size = 50
    end
    object QPOS1FBGBSB: TStringField
      FieldName = 'BGBSB'
      Origin = 'MAIN.POSA.PAWEK'
      Size = 50
    end
    object QPOS1FBGBSC: TStringField
      FieldName = 'BGBSC'
      Origin = 'MAIN.POSA.PAWEK'
      Size = 50
    end
    object QPOS1FBGBIA: TFloatField
      FieldName = 'BGBIA'
      Origin = 'MAIN.POSA.PAWEK'
    end
    object QPOS1FBGBIB: TFloatField
      FieldName = 'BGBIB'
      Origin = 'MAIN.POSA.PAWEK'
    end
    object QPOS1FBGBIC: TFloatField
      FieldName = 'BGBIC'
      Origin = 'MAIN.POSA.PAWEK'
    end
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -