📄 unit4.~dfm
字号:
object Form4: TForm4
Left = 276
Top = 161
BorderStyle = bsDialog
Caption = #23487#33293#20303#23487#20449#24687#25805#20316
ClientHeight = 462
ClientWidth = 545
Color = clInfoBk
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 = 8
Width = 65
Height = 17
AutoSize = False
Caption = #23487#33293#27004#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #38582#20070
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 280
Top = 40
Width = 65
Height = 17
AutoSize = False
Caption = #23487' '#33293' '#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #38582#20070
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 16
Top = 8
Width = 81
Height = 17
AutoSize = False
Caption = #23398#29983#23398#21495
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #38582#20070
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 16
Top = 40
Width = 73
Height = 17
AutoSize = False
Caption = #23398#29983#22995#21517
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #38582#20070
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 16
Top = 72
Width = 65
Height = 17
AutoSize = False
Caption = #27665' '#26063
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #38582#20070
Font.Style = []
ParentFont = False
end
object Button1: TButton
Left = 16
Top = 96
Width = 129
Height = 25
Caption = #28155#21152
TabOrder = 0
OnClick = Button1Click
end
object Button2: TButton
Left = 144
Top = 96
Width = 129
Height = 25
Caption = #21024#38500
TabOrder = 1
OnClick = Button2Click
end
object DBGrid1: TDBGrid
Left = 16
Top = 128
Width = 513
Height = 281
DataSource = DataSource1
ReadOnly = True
TabOrder = 2
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
object DBEdit1: TDBEdit
Left = 352
Top = 8
Width = 177
Height = 21
DataField = #23487#33293#27004#21495
DataSource = DataSource1
TabOrder = 3
end
object DBEdit2: TDBEdit
Left = 352
Top = 40
Width = 177
Height = 21
DataField = #23487#33293#21495
DataSource = DataSource1
TabOrder = 4
end
object DBEdit3: TDBEdit
Left = 88
Top = 72
Width = 177
Height = 21
DataField = #27665#26063
DataSource = DataSource1
TabOrder = 5
end
object DBEdit4: TDBEdit
Left = 88
Top = 40
Width = 177
Height = 21
DataField = #22995#21517
DataSource = DataSource1
TabOrder = 6
end
object DBEdit5: TDBEdit
Left = 88
Top = 8
Width = 177
Height = 21
DataField = #23398#21495
DataSource = DataSource1
TabOrder = 7
end
object DBNavigator1: TDBNavigator
Left = 16
Top = 416
Width = 510
Height = 25
DataSource = DataSource1
TabOrder = 8
end
object Button3: TButton
Left = 400
Top = 96
Width = 129
Height = 25
Caption = #20851#38381
TabOrder = 9
OnClick = Button3Click
end
object Button4: TButton
Left = 272
Top = 96
Width = 129
Height = 25
Caption = #20445#23384#20462#25913
TabOrder = 10
OnClick = Button4Click
end
object DataSource1: TDataSource
DataSet = ADOQuery1
OnStateChange = DataSource1StateChange
Left = 384
Top = 280
end
object ADOQuery1: TADOQuery
Active = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=cx.mdb;Persist Secu' +
'rity Info=False'
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from zsxx')
Left = 392
Top = 232
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -