📄 usetuser.~dfm
字号:
object Fmsetuser: TFmsetuser
Left = 395
Top = 119
Width = 565
Height = 406
Caption = 'Fmsetuser'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnActivate = FormActivate
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 206
Top = 24
Width = 132
Height = 21
Caption = #29992#25143#25968#25454#31649#29702
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -21
Font.Name = #26999#20307'_GB2312'
Font.Style = [fsUnderline]
ParentFont = False
end
object GroupBox1: TGroupBox
Left = 24
Top = 56
Width = 497
Height = 97
Caption = #29992#25143#35774#32622
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
object Label2: TLabel
Left = 24
Top = 24
Width = 52
Height = 13
Caption = #29992#25143#21517#65306
end
object Label3: TLabel
Left = 24
Top = 64
Width = 39
Height = 13
Caption = #23494#30721#65306
end
object Label4: TLabel
Left = 272
Top = 24
Width = 33
Height = 13
Caption = #26435#38480':'
end
object Edit1: TEdit
Left = 80
Top = 24
Width = 121
Height = 21
TabOrder = 0
Text = 'Edit1'
end
object Edit2: TEdit
Left = 80
Top = 64
Width = 121
Height = 21
TabOrder = 1
Text = 'Edit2'
end
object ComboBox1: TComboBox
Left = 320
Top = 21
Width = 121
Height = 21
ItemHeight = 13
ItemIndex = 0
TabOrder = 2
Text = 'Read'
Items.Strings = (
'Read'
'Write'
'All')
end
end
object GroupBox2: TGroupBox
Left = 24
Top = 160
Width = 497
Height = 137
Caption = #35760#24405#27983#35272
Font.Charset = ANSI_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 1
object DBGrid1: TDBGrid
Left = 2
Top = 15
Width = 493
Height = 120
Align = alClient
DataSource = DataSource1
TabOrder = 0
TitleFont.Charset = ANSI_CHARSET
TitleFont.Color = clNavy
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
end
end
object BitBtn1: TBitBtn
Left = 75
Top = 320
Width = 110
Height = 33
Caption = #28155' '#21152
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -19
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = BitBtn1Click
end
object BitBtn2: TBitBtn
Left = 223
Top = 320
Width = 110
Height = 33
Caption = #21024' '#38500
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -19
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = BitBtn2Click
end
object BitBtn3: TBitBtn
Left = 371
Top = 320
Width = 110
Height = 33
Caption = #36864' '#20986
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -19
Font.Name = #26999#20307'_GB2312'
Font.Style = []
ParentFont = False
TabOrder = 4
OnClick = BitBtn3Click
end
object Table1: TTable
Active = True
DatabaseName = 'miscontainer'
TableName = 'USER.DB'
Left = 8
Top = 8
object Table1Cyh: TStringField
DisplayLabel = #29992#25143#21517
DisplayWidth = 8
FieldName = 'Cyh'
Size = 8
end
object Table1Cmm: TStringField
DisplayLabel = #23494#30721
DisplayWidth = 15
FieldName = 'Cmm'
Size = 15
end
object Table1Cqx: TStringField
DisplayLabel = #26435#38480
FieldName = 'Cqx'
Size = 5
end
end
object DataSource1: TDataSource
DataSet = Table1
Left = 48
Top = 8
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -