📄 jxjhc.dfm
字号:
object frmjxjhc: Tfrmjxjhc
Left = 278
Top = 249
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = #25945#23398#35745#21010#23398#26399#35838#26102#20998#24067#34920
ClientHeight = 326
ClientWidth = 495
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 16
object Label10: TLabel
Left = 16
Top = 8
Width = 69
Height = 16
Caption = #20837#23398#24180#20221': '
end
object Label11: TLabel
Left = 48
Top = 28
Width = 36
Height = 16
Caption = #19987#19994': '
end
object Label12: TLabel
Left = 32
Top = 48
Width = 48
Height = 16
Caption = #35838#31243#21517': '
end
object Label1: TLabel
Left = 104
Top = 8
Width = 288
Height = 16
AutoSize = False
end
object Label2: TLabel
Left = 104
Top = 28
Width = 288
Height = 16
AutoSize = False
end
object Label3: TLabel
Left = 104
Top = 48
Width = 288
Height = 16
AutoSize = False
end
object Panel1: TPanel
Left = 16
Top = 72
Width = 369
Height = 209
BorderStyle = bsSingle
TabOrder = 1
object Label4: TLabel
Left = 16
Top = 12
Width = 63
Height = 16
Caption = #23398#24180#23398#26399' '
end
object Label5: TLabel
Left = 16
Top = 44
Width = 63
Height = 16
Caption = #35762#35838#23398#26102' '
end
object Label6: TLabel
Left = 16
Top = 76
Width = 63
Height = 16
Caption = #23454#39564#23398#26102' '
end
object Label7: TLabel
Left = 48
Top = 108
Width = 30
Height = 16
Caption = #23398#20998' '
end
object Label8: TLabel
Left = 176
Top = 44
Width = 81
Height = 16
Caption = #35762#35838#21608#23398#26102' '
end
object Label9: TLabel
Left = 176
Top = 76
Width = 81
Height = 16
Caption = #23454#39564#21608#23398#26102' '
end
object Label13: TLabel
Left = 25
Top = 136
Width = 320
Height = 33
AutoSize = False
Caption = #35762#35838#21608#23398#26102#12289#23454#39564#23398#26102#12289#23398#20998#40664#35748#20540#20998#21035' '#20026'2'#12289'0'#12289'1'#65292#35838#31243#24635#23398#26102'='#35762#35838#23398#26102'+'#23454#39564#23398#26102
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -13
Font.Name = #40657#20307
Font.Style = []
ParentFont = False
Transparent = False
WordWrap = True
end
object Cb_xnxq: TComboBox
Left = 88
Top = 8
Width = 233
Height = 24
ItemHeight = 16
TabOrder = 0
OnChange = Cb_xnxqChange
OnKeyPress = Cb_xnxqKeyPress
end
object E_jkxs: TEdit
Left = 88
Top = 40
Width = 81
Height = 24
TabOrder = 1
OnKeyPress = E_jkxsKeyPress
end
object E_syxs: TEdit
Left = 88
Top = 72
Width = 81
Height = 24
TabOrder = 3
OnKeyPress = E_syxsKeyPress
end
object E_xf: TEdit
Left = 88
Top = 104
Width = 105
Height = 24
TabOrder = 5
OnKeyPress = E_xfKeyPress
end
object E_jkzxs: TEdit
Left = 256
Top = 40
Width = 65
Height = 24
TabOrder = 2
OnKeyPress = E_jkzxsKeyPress
end
object E_syzxs: TEdit
Left = 256
Top = 72
Width = 65
Height = 24
TabOrder = 4
OnKeyPress = E_syzxsKeyPress
end
object DBNavigator1: TDBNavigator
Left = 1
Top = 176
Width = 363
Height = 28
DataSource = Frmjxjhgl.DataSource2
VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
Align = alBottom
Hints.Strings = (
#31532#19968#26465
#19978#19968#26465
#19979#19968#26465
#21518#19968#26465
'')
TabOrder = 6
OnClick = DBNavigator1Click
end
end
object Button1: TButton
Left = 408
Top = 88
Width = 75
Height = 25
Caption = #30830#23450'(&O)'
TabOrder = 2
OnClick = Button1Click
end
object Button2: TButton
Left = 408
Top = 120
Width = 75
Height = 25
Caption = #22686#21152'(&A)'
TabOrder = 0
OnClick = Button2Click
end
object Button3: TButton
Left = 408
Top = 152
Width = 75
Height = 25
Caption = #21024#38500'(&D)'
TabOrder = 3
OnClick = Button3Click
end
object Button4: TButton
Left = 408
Top = 189
Width = 75
Height = 25
Caption = #24674#22797'(&C)'
TabOrder = 4
OnClick = Button4Click
end
object Button5: TButton
Left = 408
Top = 240
Width = 75
Height = 25
Caption = #20851#38381'(&w)'
TabOrder = 5
OnClick = Button5Click
end
object Q_xnxqh: TQuery
DatabaseName = 'kjxy'
SQL.Strings = (
'SELECT SYS_XNXQ__XNXQH, SYS_XNXQ__XNXQWZ, SYS_XNXQ__QSZC, SYS_XN' +
'XQ__ZZZC, SYS_XNXQ__DQBZ'
'FROM dbo.SYS_XNXQ Dbo_sys_xnxq'
'WHERE SYS_XNXQ__XNXQWZ =:xnxqwz ')
Left = 344
Top = 80
ParamData = <
item
DataType = ftString
Name = 'xnxqwz'
ParamType = ptUnknown
Value = ''
end>
end
object Q_kyy_xnxq: TQuery
DatabaseName = 'kjxy'
SQL.Strings = (
'SELECT JW_JXJHC.JW_JXJHC__KYY, SYS_XNXQ.SYS_XNXQ__XNXQWZ'
'FROM JW_JXJHC INNER JOIN'
' SYS_XNXQ ON '
' JW_JXJHC.JW_JXJHC__XNXQH = SYS_XNXQ.SYS_XNXQ__XNXQH'
'WHERE SYS_XNXQ.SYS_XNXQ__XNXQWZ =:xnxqwz AND JW_JXJHC.JW_JXJHC__' +
'KYY =:kyy')
Left = 408
Top = 88
ParamData = <
item
DataType = ftString
Name = 'xnxqwz'
ParamType = ptUnknown
Value = '0'
end
item
DataType = ftString
Name = 'kyy'
ParamType = ptUnknown
Value = '0'
end>
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -