📄 mrkhxxcx.~dfm
字号:
object khxxcx: Tkhxxcx
Left = 0
Top = 139
BorderIcons = [biSystemMenu]
BorderStyle = bsSingle
Caption = #23458#25143#20449#24687#26597#35810
ClientHeight = 286
ClientWidth = 690
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object Label1: TLabel
Left = 243
Top = 261
Width = 10
Height = 19
Caption = '='
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 25
Top = 265
Width = 96
Height = 12
Caption = #35831#36873#25321#26597#35810#26465#20214'->'
end
object BitBtn1: TBitBtn
Left = 391
Top = 257
Width = 75
Height = 25
Caption = #26597' '#35810
TabOrder = 0
OnClick = BitBtn1Click
end
object BitBtn2: TBitBtn
Left = 471
Top = 257
Width = 75
Height = 25
Caption = #21047' '#26032
TabOrder = 1
OnClick = BitBtn2Click
end
object BitBtn3: TBitBtn
Left = 575
Top = 257
Width = 75
Height = 25
Caption = #36864' '#20986
TabOrder = 2
OnClick = BitBtn3Click
end
object ComboBox1: TComboBox
Left = 132
Top = 259
Width = 97
Height = 22
Style = csOwnerDrawVariable
ItemHeight = 16
TabOrder = 3
OnClick = ComboBox1Click
Items.Strings = (
#23458#25143#32534#21495
#23458#25143#20840#31216
#32852#31995#30005#35805
#32852#31995#20154)
end
object Edit1: TEdit
Left = 261
Top = 259
Width = 121
Height = 20
TabOrder = 4
OnKeyPress = Edit1KeyPress
end
object GroupBox1: TGroupBox
Left = 2
Top = 1
Width = 679
Height = 248
Caption = #23458#25143#20449#24687#27983#35272
TabOrder = 5
object DBGrid1: TDBGrid
Left = 7
Top = 14
Width = 666
Height = 227
DataSource = DataSource1
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = #23435#20307
TitleFont.Style = []
OnDblClick = DBGrid1DblClick
Columns = <
item
Alignment = taCenter
Expanded = False
FieldName = 'khbh'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = #23458#25143#32534#21495
Width = 68
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'khqc'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = #23458#25143#20840#31216
Width = 100
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'lxdh'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = #32852#31995#30005#35805
Width = 75
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'lxr'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = #32852#31995#20154
Width = 74
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'sj'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = #31227#21160#30005#35805
Width = 74
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'di'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = #22320#22336
Width = 103
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'yb'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = #37038#32534
Width = 57
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'cz'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = #36710#22411
Width = 58
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'wz'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = #32593#22336
Width = 57
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'khyh'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = #24320#25143#38134#34892
Width = 100
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'yhzh'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = #38134#34892#36134#21495
Width = 100
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'nsh'
ReadOnly = True
Title.Alignment = taCenter
Title.Caption = #32435#31246#21495
Width = 100
Visible = True
end>
end
end
object Table1: TTable
DatabaseName = 'user'
TableName = 'kehu'
Left = 184
Top = 97
object Table1id: TAutoIncField
FieldName = 'id'
end
object Table1khbh: TStringField
FieldName = 'khbh'
end
object Table1khqc: TStringField
FieldName = 'khqc'
Size = 80
end
object Table1lxdh: TStringField
FieldName = 'lxdh'
Size = 30
end
object Table1lxr: TStringField
FieldName = 'lxr'
Size = 40
end
object Table1sj: TStringField
FieldName = 'sj'
Size = 100
end
object Table1di: TStringField
FieldName = 'di'
Size = 80
end
object Table1yb: TStringField
FieldName = 'yb'
Size = 40
end
object Table1cz: TStringField
FieldName = 'cz'
Size = 40
end
object Table1wz: TStringField
FieldName = 'wz'
Size = 40
end
object Table1khyh: TStringField
FieldName = 'khyh'
Size = 40
end
object Table1yhzh: TStringField
FieldName = 'yhzh'
Size = 40
end
object Table1nsh: TStringField
FieldName = 'nsh'
Size = 100
end
end
object DataSource1: TDataSource
DataSet = Table1
Left = 120
Top = 89
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -