?? formadmin.dfm
字號:
object Admin: TAdmin
Left = 172
Top = 182
Width = 725
Height = 379
ActiveControl = Button1
Caption = #33647#21697#31649#29702
Color = clBtnFace
Constraints.MaxHeight = 379
Constraints.MaxWidth = 747
Constraints.MinHeight = 379
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 24
Top = 24
Width = 72
Height = 13
Caption = #36873#25321#26597#35810#26041#24335
end
object Label2: TLabel
Left = 304
Top = 24
Width = 36
Height = 13
Caption = #20851#38190#23383
end
object DBGrid1: TDBGrid
Left = 16
Top = 72
Width = 681
Height = 249
Hint = #21452#20987#21487#20462#25913#36873#39033#21333#20803#65281
BiDiMode = bdLeftToRight
Ctl3D = True
DataSource = DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete]
ParentBiDiMode = False
ParentCtl3D = False
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clBlack
TitleFont.Height = -16
TitleFont.Name = #23435#20307
TitleFont.Pitch = fpVariable
TitleFont.Style = [fsBold]
OnColExit = DBGrid1ColExit
Columns = <
item
Expanded = False
FieldName = #33647#21697#20195#30721
Width = 86
Visible = True
end
item
Expanded = False
FieldName = #33647#21697#21517#31216
Width = 81
Visible = True
end
item
Expanded = False
FieldName = #36827#36135#21333#20215
Width = 73
Visible = True
end
item
Expanded = False
FieldName = #38144#21806#21333#20215
Width = 72
Visible = True
end
item
Expanded = False
FieldName = #29983#20135#26085#26399
Width = 74
Visible = True
end
item
Expanded = False
FieldName = #26377#25928#26399
Visible = True
end
item
Expanded = False
FieldName = #24211#23384#25968
Visible = True
end
item
Expanded = False
FieldName = #36827#36135#21378#23478
Width = 71
Visible = True
end>
end
object ComboBox1: TComboBox
Left = 136
Top = 24
Width = 145
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
ItemHeight = 13
TabOrder = 1
Text = #33647#21697#20195#30721
OnChange = ComboBox1Change
Items.Strings = (
#33647#21697#20195#30721
#33647#21697#21517#31216
#29983#20135#26085#26399
#26377#25928#26399
#36827#36135#21378#23478
#21015#20986#25152#26377)
end
object Edit1: TEdit
Left = 352
Top = 24
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 2
Text = 'Edit1'
end
object Button1: TButton
Left = 496
Top = 24
Width = 49
Height = 25
Caption = #26597#35810
TabOrder = 3
OnClick = Button1Click
end
object Button2: TButton
Left = 576
Top = 24
Width = 89
Height = 25
Caption = #35745#31639#24403#21069#30408#21033
TabOrder = 4
OnClick = Button2Click
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 208
end
object ADOQuery1: TADOQuery
Active = True
ConnectionString =
'Provider=SQLOLEDB.1;Password=delphi;Persist Security Info=True;U' +
'ser ID=sa;Initial Catalog=ypjxc;Data Source=LZ'
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from '#33647#21697#20449#24687)
Left = 256
end
object ADOQuery2: TADOQuery
ConnectionString =
'Provider=SQLOLEDB.1;Password=delphi;Persist Security Info=True;U' +
'ser ID=sa;Initial Catalog=ypjxc'
Parameters = <>
Left = 320
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -