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

📄 xspj.dfm

📁 本系统前端界面采用WINDOWS 窗口风格
💻 DFM
📖 第 1 页 / 共 2 页
字号:
        FieldName = 'sj'
        Title.Caption = '税金'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'lr'
        Title.Caption = '利润'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'cb'
        Title.Caption = '成本'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'ph'
        Title.Caption = '批号'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'pzwh'
        Title.Caption = '批准文号'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'ck_mc'
        Title.Caption = '仓库名称'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'kh_mc'
        Title.Caption = '客户名称'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'xsrq'
        Title.Caption = '销售日期'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'bm_mc'
        Title.Caption = '部门名称'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'ywy_xm'
        Title.Caption = '业务员姓名'
        Visible = True
      end>
  end
  object BitBtn1: TBitBtn
    Left = 600
    Top = 40
    Width = 75
    Height = 25
    Caption = '打印'
    TabOrder = 1
    OnClick = BitBtn1Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
      00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
      8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
      8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
      8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
      03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
      03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
      33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
      33333337FFFF7733333333300000033333333337777773333333}
    NumGlyphs = 2
  end
  object BitBtn2: TBitBtn
    Left = 688
    Top = 40
    Width = 75
    Height = 25
    Caption = '&X关闭'
    TabOrder = 2
    OnClick = BitBtn2Click
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
      F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
      000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
      338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
      45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
      3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
      F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
      000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
      338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
      4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
      8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
      333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
      0000}
    NumGlyphs = 2
  end
  object Edit_ckdh: TEdit
    Left = 136
    Top = 40
    Width = 129
    Height = 20
    TabOrder = 3
  end
  object Panel2: TPanel
    Left = 5
    Top = 40
    Width = 124
    Height = 23
    Caption = '出库单号'
    TabOrder = 5
  end
  object wpbm_Edit: TEdit
    Left = 368
    Top = 40
    Width = 97
    Height = 20
    TabOrder = 7
    OnChange = wpbm_EditChange
  end
  object CheckBox1: TCheckBox
    Left = 480
    Top = 42
    Width = 97
    Height = 17
    Caption = '按单号打印'
    Checked = True
    State = cbChecked
    TabOrder = 8
  end
  object Query_xs: TQuery
    OnCalcFields = Query_xsCalcFields
    DatabaseName = 'yygl'
    RequestLive = True
    Left = 288
    Top = 144
    object Query_xsxs_bh: TStringField
      FieldName = 'xs_bh'
      Origin = 'YYGL.xsxxb.xs_bh'
      Size = 22
    end
    object Query_xswp_bm: TStringField
      FieldName = 'wp_bm'
      Origin = 'YYGL.xsxxb.wp_bm'
      Size = 5
    end
    object Query_xskh_mc: TStringField
      FieldName = 'kh_mc'
      Origin = 'YYGL.xsxxb.kh_mc'
    end
    object Query_xspm: TStringField
      FieldName = 'pm'
      Origin = 'YYGL.xsxxb.pm'
    end
    object Query_xsdw: TStringField
      FieldName = 'dw'
      Origin = 'YYGL.xsxxb.dw'
      Size = 4
    end
    object Query_xsgg: TStringField
      FieldName = 'gg'
      Origin = 'YYGL.xsxxb.gg'
      Size = 10
    end
    object Query_xsjj: TFloatField
      FieldName = 'jj'
      Origin = 'YYGL.xsxxb.jj'
    end
    object Query_xsdj: TFloatField
      FieldName = 'dj'
      Origin = 'YYGL.xsxxb.dj'
    end
    object Query_xssl: TFloatField
      FieldName = 'sl'
      Origin = 'YYGL.xsxxb.sl'
    end
    object Query_xsje: TFloatField
      FieldName = 'je'
      Origin = 'YYGL.xsxxb.je'
    end
    object Query_xsfp_ph: TStringField
      FieldName = 'fp_ph'
      Origin = 'YYGL.xsxxb.fp_ph'
      Size = 14
    end
    object Query_xscb: TFloatField
      FieldKind = fkCalculated
      FieldName = 'cb'
      DisplayFormat = '0.0000'
      Calculated = True
    end
    object Query_xssj: TFloatField
      FieldKind = fkCalculated
      FieldName = 'sj'
      DisplayFormat = '0.0000'
      Calculated = True
    end
    object Query_xsml: TFloatField
      FieldKind = fkCalculated
      FieldName = 'ml'
      Calculated = True
    end
    object Query_xslr: TFloatField
      FieldKind = fkCalculated
      FieldName = 'lr'
      DisplayFormat = '0.0000'
      Calculated = True
    end
    object Query_xsph: TStringField
      FieldName = 'ph'
      Origin = 'YYGL.xsxxb.ph'
    end
    object Query_xsxsrq: TDateTimeField
      FieldName = 'xsrq'
      Origin = 'YYGL.xsxxb.xsrq'
      DisplayFormat = 'yyyy-mm-dd'
    end
    object Query_xsck_bh: TStringField
      FieldName = 'ck_bh'
      Origin = 'YYGL.xsxxb.ck_bh'
      Size = 1
    end
    object Query_xsck_mc: TStringField
      FieldKind = fkLookup
      FieldName = 'ck_mc'
      LookupDataSet = Query_ckxx
      LookupKeyFields = 'ck_bh'
      LookupResultField = 'ck_mc'
      KeyFields = 'ck_bh'
      Size = 10
      Lookup = True
    end
    object Query_xsbm_mc: TStringField
      FieldName = 'bm_mc'
      Origin = 'YYGL.xsxxb.bm_mc'
      Size = 10
    end
    object Query_xsywy_xm: TStringField
      FieldName = 'ywy_xm'
      Origin = 'YYGL.xsxxb.ywy_xm'
      Size = 8
    end
    object Query_xscd: TStringField
      FieldName = 'cd'
      Origin = 'YYGL.xsxxb.cd'
    end
    object Query_xssb: TStringField
      FieldName = 'sb'
      Origin = 'YYGL.xsxxb.sb'
      Size = 10
    end
    object Query_xspzwh: TStringField
      FieldName = 'pzwh'
      Origin = 'YYGL.xsxxb.pzwh'
      Size = 30
    end
    object Query_xsyxq: TFloatField
      FieldName = 'yxq'
      Origin = 'YYGL.xsxxb.yxq'
    end
  end
  object DataSource_xs: TDataSource
    DataSet = Query_xs
    Left = 288
    Top = 184
  end
  object Query_ckd: TQuery
    DatabaseName = 'yygl'
    RequestLive = True
    Left = 328
    Top = 144
  end
  object Query_ckxx: TQuery
    DatabaseName = 'yygl'
    RequestLive = True
    Left = 248
    Top = 144
  end
  object Database: TDatabase
    AliasName = 'yygl'
    Connected = True
    DatabaseName = 'yygl'
    LoginPrompt = False
    Params.Strings = (
      'user name='#39#39
      'password='#39#39)
    SessionName = 'Default'
    TransIsolation = tiRepeatableRead
    Left = 296
    Top = 112
  end
  object Query_tmp: TQuery
    Left = 376
    Top = 152
  end
end

⌨️ 快捷键说明

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