?? chgpassunit.dfm
字號:
object ChgPassword: TChgPassword
Left = 168
Top = 146
BorderIcons = []
BorderStyle = bsSingle
Caption = '修改管理員口令'
ClientHeight = 183
ClientWidth = 245
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋體'
Font.Style = []
OldCreateOrder = False
Position = poMainFormCenter
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 12
object Label1: TLabel
Left = 32
Top = 16
Width = 36
Height = 12
Caption = '舊口令'
end
object Label2: TLabel
Left = 32
Top = 48
Width = 36
Height = 12
Caption = '新口令'
end
object Label3: TLabel
Left = 32
Top = 80
Width = 48
Height = 12
Caption = '再輸一次'
end
object Button1: TButton
Left = 32
Top = 136
Width = 75
Height = 25
Caption = '確定'
TabOrder = 0
OnClick = Button1Click
end
object Button2: TButton
Left = 136
Top = 136
Width = 75
Height = 25
Caption = '取消'
TabOrder = 1
OnClick = Button2Click
end
object Edit1: TEdit
Left = 88
Top = 8
Width = 121
Height = 20
TabOrder = 2
OnKeyDown = Edit1KeyDown
end
object Edit2: TEdit
Left = 88
Top = 40
Width = 121
Height = 20
TabOrder = 3
OnKeyDown = Edit2KeyDown
end
object Edit3: TEdit
Left = 88
Top = 72
Width = 121
Height = 20
TabOrder = 4
OnKeyDown = Edit3KeyDown
end
object CheckBox1: TCheckBox
Left = 32
Top = 107
Width = 73
Height = 17
Caption = '顯示口令'
TabOrder = 5
OnClick = CheckBox1Click
end
object ADOQuery1: TADOQuery
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=.\sysdata.mdb;Persi' +
'st Security Info=False'
Parameters = <>
SQL.Strings = (
'SELECT * FROM admin WHERE admin_name = "admin"')
Left = 200
Top = 96
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -