unituserset.dfm
来自「一套宾馆管理系统」· DFM 代码 · 共 130 行
DFM
130 行
object frmUserSet: TfrmUserSet
Left = 256
Top = 166
Width = 489
Height = 480
Caption = #29992#25143#35774#32622
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object CoolBar1: TCoolBar
Left = 0
Top = 0
Width = 481
Height = 33
Bands = <
item
Control = ToolBar1
ImageIndex = -1
Width = 477
end>
object ToolBar1: TToolBar
Left = 9
Top = 0
Width = 464
Height = 25
ButtonHeight = 21
ButtonWidth = 55
Caption = 'ToolBar1'
ShowCaptions = True
TabOrder = 0
object tbnAdd: TToolButton
Left = 0
Top = 2
Caption = #28155#21152#29992#25143
ImageIndex = 0
OnClick = tbnAddClick
end
object tbnDelete: TToolButton
Left = 55
Top = 2
Caption = #21024#38500#29992#25143
ImageIndex = 1
OnClick = tbnDeleteClick
end
object tbnEdit: TToolButton
Left = 110
Top = 2
Caption = #20462#25913#29992#25143
ImageIndex = 2
OnClick = tbnEditClick
end
object tbnRole: TToolButton
Left = 165
Top = 2
Caption = #35774#32622#29992#33394
ImageIndex = 3
OnClick = tbnRoleClick
end
object tbnExit: TToolButton
Left = 220
Top = 2
Caption = #36864#20986
ImageIndex = 4
OnClick = tbnExitClick
end
end
end
object StatusBar1: TStatusBar
Left = 0
Top = 428
Width = 481
Height = 25
Panels = <>
end
object Panel1: TPanel
Left = 0
Top = 33
Width = 481
Height = 395
Align = alClient
Caption = 'Panel1'
TabOrder = 2
object GroupBox1: TGroupBox
Left = 1
Top = 1
Width = 479
Height = 393
Align = alClient
Caption = #29992#25143#21015#34920
TabOrder = 0
object DBGrid1: TDBGrid
Left = 2
Top = 15
Width = 475
Height = 376
Align = alClient
DataSource = DataSource
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
end
end
object DataSource: TDataSource
Left = 121
Top = 122
end
object ADOQuery: TADOQuery
Parameters = <>
Left = 169
Top = 122
end
object ADOcmd: TADOCommand
Parameters = <>
Left = 225
Top = 122
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?