📄 ding_dan_cha.dfm
字号:
object ding_dan_ch: Tding_dan_ch
Left = -2
Top = 103
Width = 798
Height = 351
Caption = #35330#21934#26597#35426
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
OnCreate = FormCreate
DesignSize = (
790
324)
PixelsPerInch = 96
TextHeight = 13
object GroupBox1: TGroupBox
Left = 5
Top = 10
Width = 772
Height = 112
Anchors = [akLeft, akTop, akRight]
Caption = #26597#35426#35330#21934
TabOrder = 0
object Label1: TLabel
Left = 48
Top = 20
Width = 65
Height = 13
AutoSize = False
Caption = #26597#35426#38917#30446
end
object Label2: TLabel
Left = 158
Top = 44
Width = 13
Height = 13
AutoSize = False
Caption = '='
end
object Label3: TLabel
Left = 219
Top = 20
Width = 65
Height = 13
AutoSize = False
Caption = #26597#35426#20839#23481
end
object ComboBox1: TComboBox
Left = 38
Top = 40
Width = 100
Height = 21
ItemHeight = 13
TabOrder = 0
Text = 'ComboBox1'
OnClick = ComboBox1Click
Items.Strings = (
#35330#21934#32232#34399
#19979#21934#26085#26399)
end
object Edit1: TEdit
Left = 189
Top = 40
Width = 120
Height = 21
TabOrder = 1
Text = 'Edit1'
OnKeyDown = Edit1KeyDown
end
object Button1: TButton
Left = 384
Top = 46
Width = 100
Height = 23
Caption = #26597#35426
TabOrder = 2
OnClick = Button1Click
end
object Button2: TButton
Left = 552
Top = 46
Width = 100
Height = 23
Caption = #36820#22238
TabOrder = 3
OnClick = Button2Click
end
object MaskEdit1: TMaskEdit
Left = 38
Top = 74
Width = 100
Height = 21
EditMask = '9999/99/99;1;_'
MaxLength = 10
TabOrder = 4
Text = ' / / '
OnKeyDown = MaskEdit1KeyDown
end
object MaskEdit2: TMaskEdit
Left = 189
Top = 76
Width = 120
Height = 21
EditMask = '9999/99/99;1;_'
MaxLength = 10
TabOrder = 5
Text = ' / / '
OnKeyDown = MaskEdit2KeyDown
end
end
object DBGrid1: TDBGrid
Left = 8
Top = 128
Width = 769
Height = 191
Anchors = [akLeft, akTop, akRight, akBottom]
Color = clLime
DataSource = DataSource1
ReadOnly = True
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'Dh'
Title.Caption = #35330#21934#34399
Visible = True
end
item
Expanded = False
FieldName = 'Zh'
Title.Caption = #23376#34399
Visible = True
end
item
Expanded = False
FieldName = 'Xdr'
Title.Caption = #19979#21934#26085#26399
Visible = True
end
item
Expanded = False
FieldName = 'Kpo'
Title.Caption = #23458#25142'po'#34399
Visible = True
end
item
Expanded = False
FieldName = 'Cs'
Title.Caption = #23610#23544
Visible = True
end
item
Expanded = False
FieldName = 'Dx'
Title.Caption = #21934#22411
Visible = True
end
item
Expanded = False
FieldName = 'Chr'
Title.Caption = #20986#36008#26085#26399
Visible = True
end
item
Expanded = False
FieldName = 'Kh'
Title.Caption = #27454#34399
Visible = True
end
item
Expanded = False
FieldName = 'Zk'
Title.Caption = #29376#27841
Visible = True
end
item
Expanded = False
FieldName = 'Keh'
Title.Caption = #23458#25142#32232#34399
Visible = True
end
item
Expanded = False
FieldName = 'Pm'
Title.Caption = #21697#21517
Visible = True
end
item
Expanded = False
FieldName = 'Sl'
Title.Caption = #25976#37327
Visible = True
end
item
Expanded = False
FieldName = 'Dw'
Title.Caption = #21934#20301
Visible = True
end
item
Expanded = False
FieldName = 'Cdr'
Title.Caption = #20986#21934#20154
Visible = True
end
item
Expanded = False
FieldName = 'Gdr'
Title.Caption = #36319#21934#20154
Visible = True
end
item
Expanded = False
FieldName = 'Sdr'
Title.Caption = #36664#21934#20154
Visible = True
end
item
Expanded = False
FieldName = 'Zf'
Title.Caption = #20316#27861
Visible = True
end
item
Expanded = False
FieldName = 'Zf1'
Title.Caption = #32113#35336#20316#27861
Visible = True
end
item
Expanded = False
FieldName = 'Bmcl'
Title.Caption = #34920#38754#34389#29702
Visible = True
end
item
Expanded = False
FieldName = 'Dd'
Title.Caption = #38651#37709
Visible = True
end
item
Expanded = False
FieldName = 'Pj'
Title.Caption = #37197#20214
Visible = True
end
item
Expanded = False
FieldName = 'Bz1'
Title.Caption = #21253#35037'1'
Visible = True
end
item
Expanded = False
FieldName = 'Bz2'
Title.Caption = #21253#35037'2'
Visible = True
end
item
Expanded = False
FieldName = 'Bz3'
Title.Caption = #21253#35037'3'
Visible = True
end
item
Expanded = False
FieldName = 'Bz4'
Title.Caption = #21253#35037'4'
Visible = True
end
item
Expanded = False
FieldName = 'Bz5'
Title.Caption = #21253#35037'5'
Visible = True
end
item
Expanded = False
FieldName = 'Cl'
Title.Caption = #26448#26009
Visible = True
end
item
Expanded = False
FieldName = 'Bl'
Title.Caption = #27874#40599
Visible = True
end
item
Expanded = False
FieldName = 'Bm'
Title.Caption = #32972#27169
Visible = True
end
item
Expanded = False
FieldName = 'Cc'
Title.Caption = #23610#23544
Visible = True
end
item
Expanded = False
FieldName = 'Cz'
Title.Caption = #29986#35388
Visible = True
end
item
Expanded = False
FieldName = 'Ys'
Title.Caption = #38991#33394
Visible = True
end
item
Expanded = False
FieldName = 'Bzi'
Title.Caption = #32972#23383
Visible = True
end
item
Expanded = False
FieldName = 'Chfs'
Title.Caption = #20986#36008#26041#24335
Visible = True
end
item
Expanded = False
FieldName = 'chgs'
Title.Caption = #20462#25913#27425#25976
Visible = True
end
item
Expanded = False
FieldName = 'Mt'
Title.Caption = #40613#38957
Visible = True
end
item
Expanded = False
FieldName = 'Pno'
Title.Caption = #24207#34399
Visible = True
end
item
Expanded = False
FieldName = 'ychsl'
Title.Caption = #20986#36008#25976#37327
Visible = True
end
item
Expanded = False
FieldName = 'Ysbz'
Title.Caption = #38991#33394#20633#27880
Visible = True
end
item
Expanded = False
FieldName = 'Zdr'
Title.Caption = #21046#21934#20154
Visible = True
end
item
Expanded = False
FieldName = 'is_chuhuo'
Title.Caption = #26159#21542#20986#36008
Visible = True
end
item
Expanded = False
FieldName = 'is_chuyang'
Title.Caption = #26159#21542#20986#27171
Visible = True
end>
end
object DataSource1: TDataSource
DataSet = Query1
Left = 112
Top = 192
end
object Query1: TQuery
Active = True
DatabaseName = 'oy'
SQL.Strings = (
'select * from dingdan1')
Left = 200
Top = 184
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -