📄 main_xfgl_xftjcxform.~dfm
字号:
object main_xfgl_xftjcx: Tmain_xfgl_xftjcx
Left = 0
Top = 115
BorderIcons = []
BorderStyle = bsDialog
Caption = #23398#29983#20132#36153#24773#20917#26465#20214#26597#35810
ClientHeight = 310
ClientWidth = 632
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object DBGrid1: TDBGrid
Left = 4
Top = 165
Width = 645
Height = 140
Color = 16767411
DataSource = DataSource1
ReadOnly = True
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnDblClick = DBGrid1DblClick
Columns = <
item
Expanded = False
FieldName = #23398#29983#32534#21495
Visible = True
end
item
Expanded = False
FieldName = #23398#29983#22995#21517
Visible = True
end
item
Expanded = False
FieldName = #25152#22312#31995#21517
Width = 61
Visible = True
end
item
Expanded = False
FieldName = #25152#22312#24180#32423
Visible = True
end
item
Expanded = False
FieldName = #25152#22312#29677#32423
Visible = True
end
item
Expanded = False
FieldName = 'XF'
Width = 32
Visible = True
end
item
Expanded = False
FieldName = 'ZF'
Width = 31
Visible = True
end
item
Expanded = False
FieldName = 'KBF'
Width = 43
Visible = True
end
item
Expanded = False
FieldName = 'ZSF'
Width = 50
Visible = True
end
item
Expanded = False
FieldName = 'BF'
Width = 43
Visible = True
end
item
Expanded = False
FieldName = 'KGF'
Width = 44
Visible = True
end
item
Expanded = False
FieldName = 'BXF'
Width = 46
Visible = True
end
item
Expanded = False
FieldName = 'SJF'
Width = 46
Visible = True
end
item
Expanded = False
FieldName = 'JDF'
Width = 52
Visible = True
end
item
Expanded = False
FieldName = 'QTF'
Width = 48
Visible = True
end
item
Expanded = False
FieldName = 'MJF'
Width = 48
Visible = True
end
item
Expanded = False
FieldName = 'zfy'
Width = 30
Visible = True
end
item
Expanded = False
FieldName = #32564#36153#26085#26399
Width = 62
Visible = True
end
item
Expanded = False
FieldName = #32463#25163#20154
Width = 45
Visible = True
end>
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 632
Height = 34
Align = alTop
Font.Charset = GB2312_CHARSET
Font.Color = clWhite
Font.Height = -24
Font.Name = #26999#20307'_GB2312'
Font.Style = [fsBold, fsItalic]
ParentFont = False
TabOrder = 1
object Label4: TLabel
Left = 200
Top = 5
Width = 250
Height = 24
Caption = #23398#29983#20132#36153#24773#20917#26465#20214#26597#35810
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -24
Font.Name = #26999#20307'_GB2312'
Font.Style = [fsBold, fsItalic]
ParentFont = False
Transparent = True
end
end
object GroupBox2: TGroupBox
Left = 3
Top = 34
Width = 646
Height = 128
TabOrder = 2
object Memo1: TMemo
Left = 432
Top = 72
Width = 209
Height = 41
TabOrder = 3
end
object GroupBox1: TGroupBox
Left = 8
Top = 8
Width = 217
Height = 113
TabOrder = 0
object Label1: TLabel
Left = 14
Top = 19
Width = 65
Height = 13
Caption = #26597#35810#23383#27573#65306
end
object Label2: TLabel
Left = 27
Top = 48
Width = 52
Height = 13
Caption = #26465#20214#24335#65306
Enabled = False
end
object Label3: TLabel
Left = 27
Top = 80
Width = 52
Height = 13
Caption = #26597#35810#20540#65306
Enabled = False
end
object ComboBox1: TComboBox
Left = 80
Top = 15
Width = 129
Height = 21
Style = csDropDownList
Color = 16767411
ItemHeight = 13
TabOrder = 0
OnClick = ComboBox1Click
Items.Strings = (
#23398#29983#32534#21495
#23398#29983#22995#21517
#25152#22312#31995#21517
#25152#22312#24180#32423
#25152#22312#29677#32423
#23398#36153
#26434#36153
#29677#36153
#35838#26412#36153
#20303#23487#36153
#19978#26426#36153
#34917#20064#36153
#35838#31649#36153
#20511#35835#36153
#20854#23427#36153
#20813#20132#36153
#24635#36153#29992
#20132#36153#26085#26399
#32463#25163#20154)
end
object ComboBox2: TComboBox
Left = 80
Top = 48
Width = 57
Height = 21
Style = csDropDownList
Color = 16767411
DropDownCount = 7
Enabled = False
ItemHeight = 13
TabOrder = 1
OnClick = ComboBox2Click
Items.Strings = (
#31561#20110
#22823#20110
#23567#20110
#19981#31561#20110
#22823#20110#31561#20110
#23567#20110#31561#20110
''
''
''
''
''
'')
end
object Edit1: TEdit
Left = 80
Top = 80
Width = 129
Height = 21
Color = 16767411
Enabled = False
TabOrder = 2
OnChange = Edit1Change
OnKeyPress = Edit1KeyPress
end
object ComboBox3: TComboBox
Left = 144
Top = 48
Width = 65
Height = 21
Style = csDropDownList
Color = 16767411
Enabled = False
ItemHeight = 13
TabOrder = 3
OnClick = ComboBox3Click
Items.Strings = (
#21644
#25110)
end
end
object StringGrid1: TStringGrid
Left = 424
Top = 16
Width = 209
Height = 105
Color = 16767411
ColCount = 4
DefaultRowHeight = 20
RowCount = 2
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goRowSizing, goTabs, goRowSelect]
ScrollBars = ssVertical
TabOrder = 1
ColWidths = (
64
66
64
64)
RowHeights = (
20
22)
end
object GroupBox3: TGroupBox
Left = 232
Top = 8
Width = 185
Height = 113
TabOrder = 2
object BitBtn1: TBitBtn
Left = 7
Top = 16
Width = 82
Height = 25
Caption = #21152#20837#26465#20214
Enabled = False
TabOrder = 0
OnClick = BitBtn1Click
OnKeyPress = BitBtn1KeyPress
end
object BitBtn4: TBitBtn
Left = 97
Top = 80
Width = 80
Height = 25
Caption = #36864' '#20986
TabOrder = 1
OnClick = BitBtn4Click
Glyph.Data = {
EE000000424DEE000000000000007600000028000000100000000F0000000100
0400000000007800000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
888888880888888888888880080088888888880E088808888888000E00000000
888880EE07770888888880EE07770888888880EE07770888088880EE07770880
088880EE07770800000880EE07770880088880EE077708880888800077770888
888880077777088888888000000008888888}
NumGlyphs = 2
end
object BitBtn5: TBitBtn
Left = 8
Top = 48
Width = 81
Height = 25
Caption = #28165#38500#26465#20214
Enabled = False
TabOrder = 2
OnClick = BitBtn5Click
end
object BitBtn6: TBitBtn
Left = 96
Top = 16
Width = 81
Height = 25
Caption = #24320#22987#26597#35810
Enabled = False
TabOrder = 3
OnClick = BitBtn6Click
end
object BitBtn2: TBitBtn
Left = 8
Top = 80
Width = 81
Height = 25
Caption = #25171#21360#25968#25454
TabOrder = 4
OnClick = BitBtn2Click
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
888F8800000000000888808888888880808800000000000008080888888BBB88
0008088888877788080800000000000008800888888888808080800000000008
0800880FFFFFFFF080808880F00000F000088880FFFFFFFF088888880F00000F
088888880FFFFFFFF08888888000000000888888888888888888}
end
object BitBtn3: TBitBtn
Left = 98
Top = 48
Width = 79
Height = 25
Caption = #25152#26377#35760#24405
TabOrder = 5
OnClick = BitBtn3Click
end
end
end
object DataSource1: TDataSource
DataSet = Table1
Left = 160
Top = 224
end
object Table1: TTable
OnCalcFields = Table1CalcFields
DatabaseName = 'JFXT'
TableName = 'fyb'
TableType = ttParadox
Left = 128
Top = 248
object Table1BDEDesigner: TStringField
FieldName = #23398#29983#32534#21495
Required = True
Size = 5
end
object Table1BDEDesigner2: TStringField
FieldName = #23398#29983#22995#21517
Size = 8
end
object Table1BDEDesigner3: TStringField
FieldName = #25152#22312#31995#21517
end
object Table1BDEDesigner4: TStringField
FieldName = #25152#22312#24180#32423
Size = 8
end
object Table1BDEDesigner5: TStringField
FieldName = #25152#22312#29677#32423
Size = 8
end
object Table1XF: TCurrencyField
DisplayLabel = #23398#36153
FieldName = 'XF'
end
object Table1ZF: TCurrencyField
DisplayLabel = #26434#36153
FieldName = 'ZF'
end
object Table1KBF: TCurrencyField
DisplayLabel = #35838#26412#36153
FieldName = 'KBF'
end
object Table1ZSF: TCurrencyField
DisplayLabel = #20303#23487#36153
FieldName = 'ZSF'
end
object Table1BF: TCurrencyField
DisplayLabel = #29677#36153
FieldName = 'BF'
end
object Table1KGF: TCurrencyField
DisplayLabel = #35838#31649#36153
FieldName = 'KGF'
end
object Table1BXF: TCurrencyField
DisplayLabel = #34917#20064#36153
FieldName = 'BXF'
end
object Table1SJF: TCurrencyField
DisplayLabel = #19978#26426#36153
FieldName = 'SJF'
end
object Table1JDF: TCurrencyField
DisplayLabel = #20511#35835#36153
FieldName = 'JDF'
end
object Table1QTF: TCurrencyField
DisplayLabel = #20854#23427#36153
FieldName = 'QTF'
end
object Table1MJF: TCurrencyField
DisplayLabel = #20813#20132#36153
FieldName = 'MJF'
end
object Table1BDEDesigner6: TDateField
FieldName = #32564#36153#26085#26399
end
object Table1BDEDesigner7: TStringField
FieldName = #32463#25163#20154
Size = 8
end
object Table1zfy: TCurrencyField
FieldKind = fkCalculated
FieldName = 'zfy'
Calculated = True
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -