?? user.~dfm
字號:
inherited frmBUser: TfrmBUser
Top = 244
Width = 509
Height = 359
Caption = #25805#20316#21592#31649#29702
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
inherited ToolBar: TToolBar
Width = 501
end
inherited StatusBar1: TStatusBar
Top = 313
Width = 501
end
inherited Panel1: TPanel
Width = 501
end
object GroupBox1: TGroupBox [3]
Left = 0
Top = 48
Width = 501
Height = 117
Align = alTop
TabOrder = 7
object Label1: TLabel
Left = 32
Top = 22
Width = 26
Height = 13
Caption = #32534#21495
end
object Label11: TLabel
Left = 32
Top = 48
Width = 26
Height = 13
Caption = #22995#21517
end
object LabelDate: TLabel
Left = 264
Top = 48
Width = 52
Height = 13
Caption = #28155#21152#26102#38388
end
object Label3: TLabel
Left = 32
Top = 74
Width = 26
Height = 13
Caption = #23494#30721
end
object Label4: TLabel
Left = 6
Top = 100
Width = 52
Height = 13
Caption = #30830#35748#23494#30721
end
object Label5: TLabel
Left = 266
Top = 20
Width = 52
Height = 13
Caption = #25317#26377#26435#38480
end
object DBEdtOptSNum: TDBEdit
Left = 63
Top = 17
Width = 197
Height = 21
DataField = 'UserNum'
DataSource = dsBaseInfo
ImeName = #32043#20809#25340#38899#36755#20837#27861
TabOrder = 0
end
object DBEdtOptSName: TDBEdit
Left = 63
Top = 42
Width = 197
Height = 21
DataField = 'UserName'
DataSource = dsBaseInfo
ImeName = #32043#20809#25340#38899#36755#20837#27861
TabOrder = 1
end
object EditDate: TEdit
Left = 325
Top = 44
Width = 172
Height = 21
Color = clMenu
ImeName = #32043#20809#25340#38899#36755#20837#27861
ReadOnly = True
TabOrder = 5
end
object CMBPri: TComboBox
Left = 325
Top = 15
Width = 172
Height = 21
Enabled = False
ImeName = #32043#20809#25340#38899#36755#20837#27861
ItemHeight = 13
ItemIndex = 0
TabOrder = 4
Text = #36229#32423#31649#29702#21592
Items.Strings = (
#36229#32423#31649#29702#21592
#26222#36890#31649#29702#21592
#20837#24211#31649#29702
#20986#24211#31649#29702)
end
object DBEdtPassWord: TDBEdit
Left = 63
Top = 68
Width = 197
Height = 21
DataField = 'UserKey'
DataSource = dsBaseInfo
ImeName = #32043#20809#25340#38899#36755#20837#27861
MaxLength = 15
PasswordChar = '*'
TabOrder = 2
end
object EDTPassRep: TEdit
Left = 63
Top = 94
Width = 197
Height = 21
ImeName = #32043#20809#25340#38899#36755#20837#27861
MaxLength = 15
PasswordChar = '*'
TabOrder = 3
end
end
object GroupBox2: TGroupBox [4]
Left = 4
Top = 165
Width = 489
Height = 139
Align = alClient
TabOrder = 8
object DBGrid1: TDBGrid
Left = 2
Top = 15
Width = 485
Height = 122
Align = alClient
DataSource = dsBaseInfo
ImeName = #32043#20809#25340#38899#36755#20837#27861
ReadOnly = True
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'UserNum'
Title.Alignment = taCenter
Title.Caption = #32534#21495
Width = 36
Visible = True
end
item
Expanded = False
FieldName = 'UserName'
Title.Alignment = taCenter
Title.Caption = #22995#21517
Width = 174
Visible = True
end
item
Expanded = False
FieldName = 'updatedate'
Title.Alignment = taCenter
Title.Caption = #28155#21152#26102#38388
Width = 147
Visible = True
end>
end
end
inherited Panel2: TPanel
Top = 165
Height = 139
end
inherited Panel3: TPanel
Left = 493
Top = 165
Height = 139
end
inherited Panel4: TPanel
Top = 304
Width = 501
end
inherited Panel5: TPanel
Top = 165
Width = 489
Height = 139
object DBGrid2: TDBGrid
Left = 0
Top = 0
Width = 489
Height = 139
Align = alClient
DataSource = dsBaseInfo
ImeName = #32043#20809#25340#38899#36755#20837#27861
ReadOnly = True
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -13
TitleFont.Name = #23435#20307
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'UserNum'
Title.Alignment = taCenter
Title.Caption = #32534#21495
Width = 36
Visible = True
end
item
Expanded = False
FieldName = 'UserName'
Title.Alignment = taCenter
Title.Caption = #22995#21517
Width = 184
Visible = True
end
item
Expanded = False
FieldName = 'updatedate'
Title.Alignment = taCenter
Title.Caption = #28155#21152#26102#38388
Width = 157
Visible = True
end>
end
end
inherited ALToolbar: TActionList
Left = 446
Top = 86
end
inherited QBaseInfo: TADOQuery
CursorType = ctStatic
SQL.Strings = (
'select * from users ')
Left = 390
Top = 206
object QBaseInfoUserNum: TWideStringField
FieldName = 'UserNum'
Size = 50
end
object QBaseInfoUserName: TWideStringField
FieldName = 'UserName'
OnValidate = QBaseInfoUserNameValidate
Size = 50
end
object QBaseInfoUserKey: TWideStringField
FieldName = 'UserKey'
Size = 50
end
object QBaseInfoupdatedate: TDateTimeField
FieldName = 'updatedate'
end
object QBaseInfoUserSecurity: TWordField
FieldName = 'UserSecurity'
end
end
inherited dsBaseInfo: TDataSource
Left = 468
Top = 8
end
inherited QIsUnique: TADOQuery
Parameters = <
item
Name = 'UserName'
Attributes = [paNullable]
DataType = ftWideString
NumericScale = 255
Precision = 255
Size = 50
Value = Null
end>
SQL.Strings = (
'select * from users where UserName=:UserName')
Left = 418
Top = 156
end
inherited wwLookupDlg: TwwLookupDialog
Left = 457
Top = 148
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -