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

📄 unrcin.~dfm

📁 超市系统开发 超市系统开发 超市系统开发 超市系统开发
💻 ~DFM
📖 第 1 页 / 共 3 页
字号:
object FMRCIN: TFMRCIN
  Left = -53
  Top = 98
  AutoScroll = False
  Caption = '进货作业'
  ClientHeight = 477
  ClientWidth = 772
  Color = 13883848
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -15
  Font.Name = '宋体'
  Font.Style = []
  Menu = MainMenu
  OldCreateOrder = True
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 15
  object DBGrid2: TDBGrid
    Left = 0
    Top = 0
    Width = 569
    Height = 217
    Ctl3D = False
    DataSource = FMRCIND.DSRCINB
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = '宋体'
    Font.Style = []
    ImeName = '中文 (简体) - 拼音加加'
    ParentCtl3D = False
    ParentFont = False
    PopupMenu = PopupMenuDBGRID
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = '宋体'
    TitleFont.Style = []
    OnColExit = DBGrid2ColExit
    OnEditButtonClick = DBGrid2EditButtonClick
    Columns = <
      item
        Expanded = False
        FieldName = 'RIITM'
        ReadOnly = True
        Title.Alignment = taCenter
        Title.Caption = '项次'
        Title.Color = clInfoBk
        Width = 56
        Visible = True
      end
      item
        ButtonStyle = cbsEllipsis
        Color = 14283263
        Expanded = False
        FieldName = 'BGENO'
        Title.Alignment = taCenter
        Title.Caption = '产品条形码'
        Title.Color = clInfoBk
        Width = 141
        Visible = True
      end
      item
        Expanded = False
        FieldName = '_BGNAM'
        ReadOnly = True
        Title.Alignment = taCenter
        Title.Caption = '产品名称'
        Title.Color = clInfoBk
        Width = 158
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'RIUNP'
        Title.Alignment = taCenter
        Title.Caption = '计量单位'
        Title.Color = clInfoBk
        Visible = False
      end
      item
        Color = 14283263
        Expanded = False
        FieldName = 'RIGCV'
        Title.Alignment = taCenter
        Title.Caption = '发票数量'
        Title.Color = clInfoBk
        Visible = False
      end
      item
        Color = 14283263
        Expanded = False
        FieldName = 'RIGCN'
        Title.Alignment = taCenter
        Title.Caption = '数量'
        Title.Color = clInfoBk
        Width = 37
        Visible = True
      end
      item
        Color = 14283263
        Expanded = False
        FieldName = 'RIGCS'
        Title.Alignment = taCenter
        Title.Caption = '单价'
        Title.Color = clInfoBk
        Width = 65
        Visible = True
      end
      item
        Color = 14283263
        Expanded = False
        FieldName = 'RIGCT'
        Title.Alignment = taCenter
        Title.Caption = '总价'
        Title.Color = clInfoBk
        Width = 70
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'RBPST'
        Title.Alignment = taCenter
        Title.Caption = '库存位置'
        Title.Color = clInfoBk
        Visible = False
      end>
  end
  object Panel5: TPanel
    Left = 571
    Top = -3
    Width = 201
    Height = 212
    BevelOuter = bvNone
    BorderStyle = bsSingle
    Caption = ' '
    Color = clNavy
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 0
    object BTNSET: TBitBtn
      Left = 100
      Top = 147
      Width = 100
      Height = 40
      Caption = '&S 设置'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      Visible = False
    end
    object BitBtn3: TBitBtn
      Left = 100
      Top = 16
      Width = 100
      Height = 39
      Caption = '&L 采购单带入'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      Visible = False
    end
    object BTNINS: TBitBtn
      Left = 0
      Top = 0
      Width = 100
      Height = 40
      Caption = 'F1 新增'
      TabOrder = 0
      OnClick = BTNINSClick
    end
    object BTNYES: TBitBtn
      Left = 0
      Top = 84
      Width = 100
      Height = 40
      Caption = 'F3 存盘'
      TabOrder = 1
      OnClick = BTNYESClick
    end
    object BTNCAL: TBitBtn
      Left = 0
      Top = 126
      Width = 100
      Height = 40
      Caption = 'F4 取消'
      TabOrder = 2
      OnClick = BTNCALClick
    end
    object BTNQUT: TBitBtn
      Left = 0
      Top = 168
      Width = 100
      Height = 40
      Caption = 'Ctrl+Q 结束'
      TabOrder = 4
      OnClick = BTNQUTClick
    end
    object BTNDEL: TBitBtn
      Left = 0
      Top = 42
      Width = 100
      Height = 40
      Caption = 'F2 删除'
      TabOrder = 6
      OnClick = BTNDELClick
    end
    object BTNPRE: TBitBtn
      Left = 100
      Top = 59
      Width = 100
      Height = 40
      Cursor = crHandPoint
      Caption = 'F7 预览明细'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 7
      OnClick = BTNPRNClick
      Spacing = 1
    end
    object BTNPRN: TBitBtn
      Left = 100
      Top = 103
      Width = 100
      Height = 40
      Cursor = crHandPoint
      Caption = 'F8 打印明细'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -15
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
      TabOrder = 8
      OnClick = BTNPRNClick
      Spacing = 1
    end
  end
  object BGENO: JLOOKUPBOX
    Left = 95
    Top = 193
    Width = 361
    Height = 21
    Ctl3D = False
    ImeName = '中文 (简体) - 拼音加加'
    MaxLength = 20
    ParentCtl3D = False
    TabOrder = 2
    Visible = False
    _DatabaseName = 'MAIN'
    _TableName = 'BGDS'
    _Field_IDNO = 'BGENO'
    _Field_NAME = 'BGNAM'
    _EDIT_WIDTH = 120
    _CHANGE_QUERY = True
    _INSERT_RECORD = False
    _SHOW_MESSAGE = False
  end
  object Panel2: TPanel
    Left = 0
    Top = 216
    Width = 772
    Height = 261
    BevelOuter = bvLowered
    Caption = ' '
    Ctl3D = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = '宋体'
    Font.Style = []
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 3
    object LBROAMT: TLabel
      Left = 507
      Top = 88
      Width = 66
      Height = 13
      Caption = '= 总计金额'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label1: TLabel
      Left = 517
      Top = 108
      Width = 52
      Height = 13
      Caption = '尚缺金额'
      Color = 10998526
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGreen
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object Label2: TLabel
      Left = 283
      Top = 2
      Width = 11
      Height = 230
      AutoSize = False
      Caption = '┌│││││││││├┤││││└'
      Transparent = True
      WordWrap = True
    end
    object Label3: TLabel
      Left = 507
      Top = 68
      Width = 66
      Height = 13
      Caption = '+ 产品小计'
      Color = 10998526
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGreen
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object Label4: TLabel
      Left = 507
      Top = 48
      Width = 66
      Height = 13
      Caption = '+ 费用小计'
      Color = 10998526
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGreen
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentColor = False
      ParentFont = False
    end
    object LBRIAMT: TLabel
      Left = 290
      Top = 155
      Width = 52
      Height = 13
      Caption = '总计金额'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlue
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object LBRIENO: TLabel
      Left = 5
      Top = 8
      Width = 52
      Height = 13
      Caption = '进货单号'
    end
    object LBRITYP: TLabel
      Left = 165
      Top = 8
      Width = 52
      Height = 13
      Caption = '单据型号'
    end
    object LBBSENO: TLabel
      Left = 5
      Top = 48
      Width = 52
      Height = 13
      Caption = '厂商编号'
    end
    object LBRIIID: TLabel
      Left = 5
      Top = 28
      Width = 52
      Height = 13
      Caption = '采购单号'
    end
    object LBRIIAD: TLabel
      Left = 5
      Top = 68
      Width = 52
      Height = 13
      Caption = '发票地址'
    end
    object LBRIINO: TLabel
      Left = 5
      Top = 88
      Width = 52
      Height = 13
      Caption = '发票编号'
    end
    object LBRIDAT: TLabel
      Left = 165
      Top = 28
      Width = 52
      Height = 13
      Caption = '单据日期'
    end
    object LBBNENO: TLabel
      Left = 5
      Top = 148
      Width = 52
      Height = 13
      Caption = '经办人员'
    end
    object LBRIPAY: TLabel
      Left = 5
      Top = 108
      Width = 52
      Height = 13
      Caption = '付款方式'
    end
    object LBRIMRK: TLabel
      Left = 5
      Top = 168
      Width = 52
      Height = 13
      Caption = '备  注'
    end
    object LBRIEXG: TLabel
      Left = 5
      Top = 128
      Width = 52
      Height = 13
      Caption = '币  种'
    end
    object LBRIEXR: TLabel
      Left = 180
      Top = 128
      Width = 26
      Height = 13
      Caption = '汇率'
    end
    object LBRISA1: TLabel
      Left = 292
      Top = 8
      Width = 61
      Height = 13
      Caption = '费  用  1'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clPurple
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object LBRISA2: TLabel
      Left = 292
      Top = 28
      Width = 61
      Height = 13
      Caption = '费  用  2'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clPurple
      Font.Height = -13
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object LBRISA3: TLabel
      Left = 292
      Top = 48
      Width = 61
      Height = 13
      Caption = '费  用  3'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clPurple
      Font.Height = -13

⌨️ 快捷键说明

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