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

📄 univtt.dfm

📁 DELPHI编写的商场收银POS机源代码
💻 DFM
字号:
object FMIVTT: TFMIVTT
  Left = 15
  Top = 57
  AutoScroll = False
  Caption = '盘点资料 更新 库存资料'
  ClientHeight = 473
  ClientWidth = 772
  Color = 16755370
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -15
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = True
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 15
  object BTNQUT: TSpeedButton
    Left = 486
    Top = 227
    Width = 160
    Height = 239
    Cursor = crHandPoint
    Caption = '&Q 退出'
    OnClick = BTNQUTClick
  end
  object GroupBox1: TGroupBox
    Left = 2
    Top = 0
    Width = 649
    Height = 220
    Caption = '暂存盘'
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 0
    object BTNINS: TSpeedButton
      Left = 480
      Top = 30
      Width = 160
      Height = 80
      Cursor = crHandPoint
      AllowAllUp = True
      Caption = '&T 更新库存'
      OnClick = BTNINSClick
    end
    object Gauge: TGauge
      Left = 475
      Top = 200
      Width = 171
      Height = 15
      ForeColor = clRed
      Progress = 0
    end
    object DBGrid1: TDBGrid
      Left = 3
      Top = 15
      Width = 468
      Height = 201
      DataSource = FMIVTTD.DSIVTA
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      Options = [dgTitles, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
      ParentFont = False
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = '宋体'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'BGENO'
          Title.Alignment = taCenter
          Title.Caption = '产品条形码'
          Title.Color = clInfoBk
          Width = 104
          Visible = True
        end
        item
          Expanded = False
          FieldName = '_BGNAM'
          Title.Alignment = taCenter
          Title.Caption = '产品名称'
          Title.Color = clInfoBk
          Width = 107
          Visible = True
        end
        item
          Color = 15138303
          Expanded = False
          FieldName = '_BGQTS'
          Title.Alignment = taCenter
          Title.Caption = '安存量'
          Title.Color = clInfoBk
          Width = 40
          Visible = True
        end
        item
          Color = 16774111
          Expanded = False
          FieldName = 'IACNT'
          Title.Alignment = taCenter
          Title.Caption = '盘存量'
          Title.Color = clInfoBk
          Width = 40
          Visible = True
        end
        item
          Color = 15529471
          Expanded = False
          FieldName = '_BGCNT'
          Title.Alignment = taCenter
          Title.Caption = '库存量'
          Title.Color = clInfoBk
          Width = 40
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'IADAT'
          Title.Alignment = taCenter
          Title.Caption = '改动日'
          Title.Color = clInfoBk
          Width = 55
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'IATME'
          Title.Alignment = taCenter
          Title.Caption = '改动日'
          Title.Color = clInfoBk
          Width = 50
          Visible = True
        end>
    end
    object BTCAN: TBitBtn
      Left = 480
      Top = 115
      Width = 160
      Height = 80
      Caption = '取消转入'
      TabOrder = 1
      Visible = False
      OnClick = BTCANClick
    end
    object CAN_UPDATE_RBRN: TCheckBox
      Left = 490
      Top = 10
      Width = 131
      Height = 17
      Caption = '更新库存数量?'
      Checked = True
      State = cbChecked
      TabOrder = 2
    end
  end
  object GroupBox2: TGroupBox
    Left = 2
    Top = 220
    Width = 479
    Height = 251
    Caption = '盘点盈亏记录'
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 1
    object Label1: TLabel
      Left = 5
      Top = 21
      Width = 60
      Height = 12
      Caption = '产品条形码'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 343
      Top = 21
      Width = 15
      Height = 15
      Caption = '至'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      Visible = False
    end
    object Label4: TLabel
      Left = 255
      Top = 21
      Width = 30
      Height = 15
      Caption = '日期'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      Visible = False
    end
    object LB_CON21: TJEdit
      Left = 285
      Top = 17
      Width = 55
      Height = 21
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      Visible = False
      Digits = 1
      Max = 999999999
      _EditType = CDATE_EDIT
      _SHOWCAL = NONE
      _BADINPUT = False
      _LONGTIME = False
    end
    object LB_CON22: TJEdit
      Left = 360
      Top = 17
      Width = 55
      Height = 21
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      Visible = False
      Digits = 1
      Max = 999999999
      _EditType = CDATE_EDIT
      _SHOWCAL = NONE
      _BADINPUT = False
      _LONGTIME = False
    end
    object Button1: TButton
      Left = 250
      Top = 12
      Width = 151
      Height = 29
      Caption = '查询'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 2
      OnClick = Button1Click
    end
    object DBGrid3: TDBGrid
      Left = 3
      Top = 45
      Width = 468
      Height = 201
      DataSource = FMIVTTD.DSIVTT
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -12
      TitleFont.Name = '宋体'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'BGENO'
          Title.Alignment = taCenter
          Title.Caption = '产品条形码'
          Title.Color = clInfoBk
          Width = 121
          Visible = True
        end
        item
          Expanded = False
          FieldName = '_BGNAM'
          Title.Alignment = taCenter
          Title.Caption = '产品名称'
          Title.Color = clInfoBk
          Width = 130
          Visible = True
        end
        item
          Color = 16773857
          Expanded = False
          FieldName = 'ITCNV'
          Title.Alignment = taCenter
          Title.Caption = '盘点量'
          Title.Color = clInfoBk
          Width = 40
          Visible = True
        end
        item
          Color = 16773857
          Expanded = False
          FieldName = 'ITCNR'
          Title.Alignment = taCenter
          Title.Caption = '原库存'
          Title.Color = clInfoBk
          Width = 40
          Visible = True
        end
        item
          Color = 15661567
          Expanded = False
          FieldName = 'ITCNT'
          Title.Alignment = taCenter
          Title.Caption = '盘差量'
          Title.Color = clInfoBk
          Width = 40
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ITDAT'
          Title.Alignment = taCenter
          Title.Caption = '保存日期'
          Title.Color = clInfoBk
          Width = 58
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'ITTME'
          Title.Alignment = taCenter
          Title.Caption = '保存日期'
          Title.Color = clInfoBk
          Visible = False
        end>
    end
    object ED_BGENO: JLOOKUPBOX
      Left = 75
      Top = 15
      Width = 171
      Height = 21
      MaxLength = 20
      TabOrder = 4
      _DatabaseName = 'MAIN'
      _TableName = 'BGDS'
      _Field_IDNO = 'BGENO'
      _Field_NAME = 'BGNAM'
      _EDIT_WIDTH = 120
      _CHANGE_QUERY = True
      _INSERT_RECORD = False
      _SHOW_MESSAGE = False
    end
  end
end

⌨️ 快捷键说明

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