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

📄 syjk1.dfm

📁 思微POS连锁超市管理系统 (商业代码),几年前的东西了
💻 DFM
字号:
object syjk: Tsyjk
  Left = 215
  Top = 131
  BorderStyle = bsDialog
  Caption = '结款'
  ClientHeight = 405
  ClientWidth = 624
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 16
  object Label1: TLabel
    Left = 8
    Top = 19
    Width = 109
    Height = 35
    Caption = '应收:'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -35
    Font.Name = '宋体'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label2: TLabel
    Left = 104
    Top = 16
    Width = 63
    Height = 43
    Caption = '0.00'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -35
    Font.Name = 'Impact'
    Font.Style = []
    ParentFont = False
  end
  object Label3: TLabel
    Left = 8
    Top = 331
    Width = 109
    Height = 35
    Caption = '找补:'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -35
    Font.Name = '宋体'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label4: TLabel
    Left = 104
    Top = 328
    Width = 63
    Height = 43
    Caption = '0.00'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -35
    Font.Name = 'Impact'
    Font.Style = []
    ParentFont = False
  end
  object Label5: TLabel
    Left = 8
    Top = 175
    Width = 109
    Height = 35
    Caption = '已收:'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -35
    Font.Name = '宋体'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label6: TLabel
    Left = 8
    Top = 253
    Width = 109
    Height = 35
    Caption = '欠款:'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -35
    Font.Name = '宋体'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label7: TLabel
    Left = 104
    Top = 172
    Width = 63
    Height = 43
    Caption = '0.00'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -35
    Font.Name = 'Impact'
    Font.Style = []
    ParentFont = False
  end
  object Label8: TLabel
    Left = 104
    Top = 250
    Width = 63
    Height = 43
    Caption = '0.00'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -35
    Font.Name = 'Impact'
    Font.Style = []
    ParentFont = False
  end
  object Label9: TLabel
    Left = 8
    Top = 97
    Width = 109
    Height = 35
    Caption = '折扣:'
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -35
    Font.Name = '宋体'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label10: TLabel
    Left = 104
    Top = 94
    Width = 63
    Height = 43
    Caption = '0.00'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -35
    Font.Name = 'Impact'
    Font.Style = []
    ParentFont = False
  end
  object DBGridEh1: TDBGridEh
    Left = 272
    Top = 0
    Width = 352
    Height = 405
    LineColor = clBlack
    SelectedFontColor = clHighlightText
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -29
    Font.Name = '宋体'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 0
    TitleFont.Charset = GB2312_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -21
    TitleFont.Name = '宋体'
    TitleFont.Style = [fsBold]
    OnKeyDown = DBGridEh1KeyDown
    FooterRowCount = 1
    FrozenCols = 2
    FooterFont.Charset = GB2312_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -16
    FooterFont.Name = '宋体'
    FooterFont.Style = []
    FooterColor = clMenu
    AutoFitColWidths = True
    SumList.Active = True
    CurrencyStyle.CurrencyFont.Charset = DEFAULT_CHARSET
    CurrencyStyle.CurrencyFont.Color = clWindowText
    CurrencyStyle.CurrencyFont.Height = -11
    CurrencyStyle.CurrencyFont.Name = 'MS Sans Serif'
    CurrencyStyle.CurrencyFont.Style = []
    CurrencyStyle.CurrencySymbol = '¥'
    CurrencyStyle.CompartColor = clSilver
    CurrencyStyle.KilobitColor = clGreen
    CurrencyStyle.RadixColor = clRed
    CurrencyStyle.ShowMinus = True
    CurrencyStyle.ShowZero = False
    CurrencyStyle.MinusColor = clRed
    CurrencyStyle.Layout = tlCenter
    CurrencyStyle.HeadFont.Charset = DEFAULT_CHARSET
    CurrencyStyle.HeadFont.Color = clWindowText
    CurrencyStyle.HeadFont.Height = -11
    CurrencyStyle.HeadFont.Name = '楷体_GB2312'
    CurrencyStyle.HeadFont.Style = []
    Columns = <
      item
        FieldName = 'fkfsname'
        Width = 94
        Footer.Alignment = taCenter
        Footer.Font.Charset = GB2312_CHARSET
        Footer.Font.Color = clWindowText
        Footer.Font.Height = -29
        Footer.Font.Name = '宋体'
        Footer.Font.Style = [fsBold]
        Footer.ValueType = fvtStaticText
        Footer.Value = '合计'
        Footers = <>
      end
      item
        FieldName = 'yn_ce'
        Width = 93
        Footer.Font.Charset = GB2312_CHARSET
        Footer.Font.Color = clWindowText
        Footer.Font.Height = -29
        Footer.Font.Name = '宋体'
        Footer.Font.Style = [fsBold]
        Footers = <>
      end
      item
        FieldName = 'fkje'
        Width = 136
        Footer.Font.Charset = GB2312_CHARSET
        Footer.Font.Color = clWindowText
        Footer.Font.Height = -29
        Footer.Font.Name = '宋体'
        Footer.Font.Style = [fsBold]
        Footer.ValueType = fvtSum
        Footer.FieldName = 'fkje'
        Footers = <>
      end>
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 624
    Height = 405
    BevelOuter = bvNone
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -29
    Font.Name = '宋体'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 1
    Visible = False
    object Label11: TLabel
      Left = 8
      Top = 16
      Width = 192
      Height = 97
      Caption = '找补'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -96
      Font.Name = '隶书'
      Font.Style = []
      ParentFont = False
    end
    object Label12: TLabel
      Left = 116
      Top = 152
      Width = 342
      Height = 97
      Alignment = taRightJustify
      BiDiMode = bdRightToLeft
      Caption = '78.50元'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -96
      Font.Name = '隶书'
      Font.Style = [fsBold]
      ParentBiDiMode = False
      ParentFont = False
    end
    object Label13: TLabel
      Left = 168
      Top = 344
      Width = 301
      Height = 29
      Caption = '正在打印,请稍候……'
    end
  end
  object Table1: TTable
    BeforeEdit = Table1BeforeEdit
    AfterPost = Table1AfterPost
    BeforeScroll = Table1BeforeScroll
    DatabaseName = 'pos'
    TableName = 'dbo.syfk_t'
    Left = 304
    Top = 168
    object Table1fkfsname: TStringField
      DisplayLabel = '付款方式'
      DisplayWidth = 34
      FieldName = 'fkfsname'
      FixedChar = True
      Size = 50
    end
    object Table1fkje: TCurrencyField
      DisplayLabel = '付款金额'
      DisplayWidth = 10
      FieldName = 'fkje'
    end
    object Table1fkfsid: TStringField
      FieldName = 'fkfsid'
      FixedChar = True
      Size = 10
    end
    object Table1yn_ce: TStringField
      DisplayLabel = '超额付款'
      FieldName = 'yn_ce'
      FixedChar = True
      Size = 2
    end
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 344
    Top = 168
  end
  object Query1: TQuery
    DatabaseName = 'pos'
    Left = 384
    Top = 168
  end
  object Table2: TTable
    Active = True
    DatabaseName = 'pos'
    IndexFieldNames = 'xsid'
    TableName = 'dbo.spxs_m'
    Left = 320
    Top = 240
  end
  object Table3: TTable
    Active = True
    DatabaseName = 'pos'
    TableName = 'dbo.spxs_s'
    Left = 360
    Top = 240
  end
  object Table4: TTable
    Active = True
    DatabaseName = 'pos'
    TableName = 'dbo.syfk'
    Left = 400
    Top = 240
  end
  object Table5: TTable
    Active = True
    DatabaseName = 'pos'
    IndexFieldNames = 'xsid'
    TableName = 'dbo.HYXF'
    Left = 320
    Top = 272
  end
  object Table6: TTable
    DatabaseName = 'pos'
    TableName = 'dbo.posprntx'
    Left = 360
    Top = 272
  end
end

⌨️ 快捷键说明

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