unposn.dfm

超市系统开发 超市系统开发 超市系统开发 超市系统开发

    end
    object PNPR2: TDBEdit
      Left = 295
      Top = 25
      Width = 60
      Height = 19
      DataField = 'PNPR2'
      DataSource = FMPOSND.DSPOSN
      TabOrder = 3
    end
    object BGEN2: JDBLOOKUPBOX
      Left = 45
      Top = 25
      Width = 200
      Height = 19
      DataField = 'BGEN2'
      DataSource = FMPOSND.DSPOSN
      MaxLength = 20
      TabOrder = 2
      _DatabaseName = 'MAIN'
      _TableName = 'BGDS'
      _Field_IDNO = 'BGENO'
      _Field_NAME = 'BGNAM'
      _EDIT_WIDTH = 100
      _CHANGE_QUERY = True
      _INSERT_RECORD = False
      _SHOW_MESSAGE = False
    end
    object BGEN1: JDBLOOKUPBOX
      Left = 45
      Top = 5
      Width = 200
      Height = 19
      DataField = 'BGEN1'
      DataSource = FMPOSND.DSPOSN
      MaxLength = 20
      TabOrder = 0
      _DatabaseName = 'MAIN'
      _TableName = 'BGDS'
      _Field_IDNO = 'BGENO'
      _Field_NAME = 'BGNAM'
      _EDIT_WIDTH = 100
      _CHANGE_QUERY = True
      _INSERT_RECORD = False
      _SHOW_MESSAGE = False
    end
    object PNDT1: TJDBEdit
      Left = 45
      Top = 45
      Width = 80
      Height = 19
      DataField = 'PNDT1'
      DataSource = FMPOSND.DSPOSN
      TabOrder = 4
      _EditType = EDATE_EDIT
      _SHOWCAL = NONE
    end
    object PNDT2: TJDBEdit
      Left = 45
      Top = 65
      Width = 80
      Height = 19
      DataField = 'PNDT2'
      DataSource = FMPOSND.DSPOSN
      TabOrder = 5
      _EditType = EDATE_EDIT
      _SHOWCAL = NONE
    end
    object PNDAT: TJDBEdit
      Left = 45
      Top = 85
      Width = 80
      Height = 19
      DataField = 'PNDAT'
      DataSource = FMPOSND.DSPOSN
      TabOrder = 6
      _EditType = EDATE_EDIT
      _SHOWCAL = NONE
    end
    object DBGrid: TDBGrid
      Left = 1
      Top = 120
      Width = 611
      Height = 241
      DataSource = FMPOSND.DSPOSN
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = '宋体'
      Font.Style = []
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
      ParentFont = False
      TabOrder = 8
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = '宋体'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'BGEN1'
          Title.Alignment = taCenter
          Title.Caption = '产品条形码1'
          Title.Color = clInfoBk
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = '_BGNAM1'
          Title.Alignment = taCenter
          Title.Caption = '产品名称1'
          Title.Color = clInfoBk
          Width = 90
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'BGEN2'
          Title.Alignment = taCenter
          Title.Caption = '产品条形码2'
          Title.Color = clInfoBk
          Width = 80
          Visible = True
        end
        item
          Expanded = False
          FieldName = '_BGNAM2'
          Title.Alignment = taCenter
          Title.Caption = '产品名称2'
          Title.Color = clInfoBk
          Width = 90
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'PNPR1'
          Title.Alignment = taCenter
          Title.Caption = '价格1'
          Title.Color = clInfoBk
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'PNPR2'
          Title.Alignment = taCenter
          Title.Caption = '价格2'
          Title.Color = clInfoBk
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'PNDT1'
          Title.Alignment = taCenter
          Title.Caption = '起始日'
          Title.Color = clInfoBk
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'PNDT2'
          Title.Alignment = taCenter
          Title.Caption = '结束日'
          Title.Color = clInfoBk
          Width = 60
          Visible = True
        end>
    end
  end
  object Panel1: TPanel
    Left = 617
    Top = 0
    Width = 125
    Height = 364
    Align = alRight
    BevelOuter = bvNone
    BorderStyle = bsSingle
    Caption = ' '
    Color = clBlack
    TabOrder = 2
    object BTNQUT: TBitBtn
      Left = 0
      Top = 310
      Width = 120
      Height = 50
      Cursor = crHandPoint
      Caption = 'Ctrl+Q 结束'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnClick = BTNQUTClick
    end
    object BTNCAL: TBitBtn
      Left = 0
      Top = 150
      Width = 120
      Height = 50
      Cursor = crHandPoint
      Caption = 'F4 取消'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = BTNCALClick
      Spacing = 1
    end
    object BTNYES: TBitBtn
      Left = 0
      Top = 100
      Width = 120
      Height = 50
      Cursor = crHandPoint
      Caption = 'F3 确定'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = BTNYESClick
      Spacing = 1
    end
    object BTNDEL: TBitBtn
      Left = 0
      Top = 50
      Width = 120
      Height = 50
      Cursor = crHandPoint
      Caption = 'F2 删除'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      OnClick = BTNDELClick
      Spacing = 1
    end
    object BTNINS: TBitBtn
      Left = 0
      Top = 0
      Width = 120
      Height = 50
      Cursor = crHandPoint
      Caption = 'F1 新增'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnClick = BTNINSClick
      Spacing = 1
    end
    object BTNPRN: TBitBtn
      Left = 0
      Top = 260
      Width = 120
      Height = 50
      Cursor = crHandPoint
      Caption = 'F8 打印'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      OnClick = BTNPRNClick
      Spacing = 1
    end
    object BTNPRE: TBitBtn
      Left = 0
      Top = 210
      Width = 120
      Height = 50
      Cursor = crHandPoint
      Caption = 'F7 预览'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 6
      OnClick = BTNPRNClick
      Spacing = 1
    end
  end
  object MainMenu: TMainMenu
    Left = 556
    Top = 6
    object N1: TMenuItem
      Caption = '新增'
      ShortCut = 112
      Visible = False
      OnClick = BTNINSClick
    end
    object N2: TMenuItem
      Caption = '删除'
      ShortCut = 113
      Visible = False
      OnClick = BTNDELClick
    end
    object N3: TMenuItem
      Caption = '确定'
      ShortCut = 114
      Visible = False
      OnClick = BTNYESClick
    end
    object N4: TMenuItem
      Caption = '取消'
      ShortCut = 115
      Visible = False
      OnClick = BTNCALClick
    end
    object N6: TMenuItem
      Caption = '查询'
      ShortCut = 116
      Visible = False
      OnClick = BTNSERClick
    end
    object MENPRE: TMenuItem
      Caption = '预览'
      ShortCut = 118
      Visible = False
      OnClick = BTNPRNClick
    end
    object MENPRN: TMenuItem
      Caption = '打印'
      ShortCut = 119
      Visible = False
      OnClick = BTNPRNClick
    end
    object N5: TMenuItem
      Caption = '结束'
      ShortCut = 16465
      Visible = False
      OnClick = BTNQUTClick
    end
  end
end