?? unit2.dfm
字號:
object Form2: TForm2
Left = 284
Top = 226
Width = 696
Height = 480
Caption = #36710#36742#20449#24687
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 280
Top = 48
Width = 113
Height = 41
AutoSize = False
Caption = #36710#36742#20449#24687
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object DBGrid1: TDBGrid
Left = 16
Top = 144
Width = 641
Height = 185
DataSource = DataSource1
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object DBNavigator1: TDBNavigator
Left = 16
Top = 336
Width = 640
Height = 33
DataSource = DataSource1
TabOrder = 1
end
object Button1: TButton
Left = 448
Top = 400
Width = 75
Height = 25
Caption = #36820#22238
TabOrder = 2
OnClick = Button1Click
end
object Button2: TButton
Left = 560
Top = 400
Width = 75
Height = 25
Caption = #36864#20986
TabOrder = 3
OnClick = Button2Click
end
object ADOConnection1: TADOConnection
Connected = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=E:\My' +
' Project\Delphi\'#36710#36742#31649#29702#31995#32479'\database\db1.mdb;Mode=Share Deny None;Ext' +
'ended Properties="";Persist Security Info=False;Jet OLEDB:System' +
' database="";Jet OLEDB:Registry Path="";Jet OLEDB:Database Passw' +
'ord="";Jet OLEDB:Engine Type=5;Jet OLEDB:Database Locking Mode=1' +
';Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Trans' +
'actions=1;Jet OLEDB:New Database Password="";Jet OLEDB:Create Sy' +
'stem Database=False;Jet OLEDB:Encrypt Database=False;Jet OLEDB:D' +
'on'#39't Copy Locale on Compact=False;Jet OLEDB:Compact Without Repl' +
'ica Repair=False;Jet OLEDB:SFP=False'
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 8
Top = 64
end
object ADODataSet1: TADODataSet
Active = True
Connection = ADOConnection1
CursorType = ctStatic
CommandText = 'select * from '#36710#36742#20449#24687
Parameters = <>
Left = 40
Top = 64
end
object DataSource1: TDataSource
DataSet = ADODataSet1
Left = 72
Top = 64
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -