📄 unit3.dfm
字号:
object Form3: TForm3
Left = 257
Top = 207
Width = 564
Height = 372
Caption = #20013#21326#20154#27665#20849#21644#22269#20844#27665#25143#31821#31649#29702#31995#32479#65288#26222#36890#29992#25143#65289
Color = clMoneyGreen
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 13
object PageControl1: TPageControl
Left = 8
Top = 8
Width = 545
Height = 329
ActivePage = TabSheet2
TabOrder = 0
object TabSheet1: TTabSheet
Caption = #31934#30830#26597#25214
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
object DBGrid1: TDBGrid
Left = 0
Top = 176
Width = 537
Height = 120
DataSource = DataSource1
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object GroupBox1: TGroupBox
Left = 0
Top = 8
Width = 537
Height = 169
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
object RadioButton1: TRadioButton
Left = 288
Top = 24
Width = 65
Height = 17
Caption = #22995#21517
TabOrder = 0
end
object Edit1: TEdit
Left = 344
Top = 24
Width = 121
Height = 24
TabOrder = 1
end
object RadioButton2: TRadioButton
Left = 288
Top = 64
Width = 57
Height = 17
Caption = #24615#21035
TabOrder = 2
end
object Edit2: TEdit
Left = 344
Top = 64
Width = 121
Height = 24
TabOrder = 3
end
object RadioButton3: TRadioButton
Left = 288
Top = 104
Width = 57
Height = 17
Caption = #23398#21382
TabOrder = 4
end
object Edit3: TEdit
Left = 344
Top = 104
Width = 121
Height = 24
TabOrder = 5
end
object RadioButton4: TRadioButton
Left = 24
Top = 24
Width = 89
Height = 17
Caption = #20986#29983#26085#26399
TabOrder = 6
end
object Button1: TButton
Left = 288
Top = 136
Width = 177
Height = 25
Caption = #26597#35810
TabOrder = 7
OnClick = Button1Click
end
object Edit4: TEdit
Left = 128
Top = 24
Width = 137
Height = 24
TabOrder = 8
end
object RadioButton5: TRadioButton
Left = 24
Top = 64
Width = 89
Height = 17
Caption = #23478#24237#20303#22336
TabOrder = 9
end
object Edit5: TEdit
Left = 128
Top = 64
Width = 137
Height = 24
TabOrder = 10
end
object RadioButton6: TRadioButton
Left = 24
Top = 104
Width = 89
Height = 17
Caption = #23130#23035#24773#20917
TabOrder = 11
end
object Edit6: TEdit
Left = 128
Top = 104
Width = 137
Height = 24
TabOrder = 12
end
object RadioButton7: TRadioButton
Left = 24
Top = 136
Width = 105
Height = 17
Caption = #36523#20221#35777#21495#30721
TabOrder = 13
end
object Edit7: TEdit
Left = 128
Top = 136
Width = 137
Height = 24
TabOrder = 14
end
end
end
object TabSheet2: TTabSheet
Caption = #27169#31946#26597#25214
ImageIndex = 1
object DBGrid2: TDBGrid
Left = 0
Top = 152
Width = 537
Height = 144
DataSource = DataSource2
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object CheckBox1: TCheckBox
Left = 24
Top = 24
Width = 73
Height = 17
Caption = #22995#21517
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
end
object Edit8: TEdit
Left = 104
Top = 16
Width = 121
Height = 21
TabOrder = 2
end
object CheckBox2: TCheckBox
Left = 24
Top = 80
Width = 73
Height = 17
Caption = #24615#21035
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
end
object Edit9: TEdit
Left = 104
Top = 72
Width = 121
Height = 21
TabOrder = 4
end
object CheckBox3: TCheckBox
Left = 240
Top = 24
Width = 113
Height = 17
Caption = #20986#29983#26085#26399
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
end
object Edit10: TEdit
Left = 360
Top = 16
Width = 121
Height = 21
TabOrder = 6
end
object Button2: TButton
Left = 360
Top = 72
Width = 113
Height = 33
Caption = #26597#35810
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 7
OnClick = Button2Click
end
end
end
object ADOConnection1: TADOConnection
Connected = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\'#22797#20214' '#38472#22836#21457'\'#25968#25454#24211'\db2.m' +
'db;Persist Security Info=False'
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 388
Top = 256
end
object ADOQuery1: TADOQuery
Connection = ADOConnection1
Parameters = <>
SQL.Strings = (
'select * from '#20844#27665#25143#31821#34920'2')
Left = 444
Top = 264
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 492
Top = 232
end
object ADOConnection2: TADOConnection
Connected = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\'#22797#20214' '#38472#22836#21457'\'#25968#25454#24211'\db2.m' +
'db;Persist Security Info=False'
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 228
Top = 256
end
object ADOQuery2: TADOQuery
Connection = ADOConnection2
Parameters = <>
SQL.Strings = (
'select * from '#20844#27665#25143#31821#34920'2')
Left = 324
Top = 264
end
object DataSource2: TDataSource
DataSet = ADOQuery2
Left = 276
Top = 264
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -