📄 syjk1.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 + -