📄 login.dfm
字号:
2800A002800A002800A002800A002800A002800A002800A002800A002800A00D
8D5BFE40FA4FFBB2FF00E8758D3F8A5F229FC28C7AD890A002800A002800A002
800071D28017752B05C3347285C4A60140050014005001400500140050014005
0014005001400500140050014005001400500140050014005001400500140050
01400500140050014005001400500140050014005001401B1AB7FC81F49FF765
FF00D0EB0A7F14BE453F8518F5B9214005001400500140050014005001400500
140062800C1A2E802800A002800A002800A002800A002800A002800A002800A0
02800A002800A002800A574018A7740183E945D0050014005001400500140050
014005001400500140050014005001401B5AA2EEF0FE9722E08469636C763904
67F035853D2725E85BF8118B5B90140050014005001400500140050014005001
4005001400500140050014005001400500140050014005001400500140050014
0050014005001400500140050014005001400500140050014005001400500140
050014005001401AF67A8CF64AD1A08E485F968A540E8C7D707BFBD612829046
6E3B137F69C3DF49B0FF00BF6DFF00C554F23FE6657B4F241FDA50FF00D026C3
FEFDB7FF00154F91FF003317B4F241FDA50FFD026C3FEFDB7FF154723FE661ED
3C907F6943FF00409B0FFBF6DFFC551C8FF9987B4F241FDA50FF00D026C3FEFD
B7FF00154723FE661ED3C907F6943FF409B0FF00BF6DFF00C551C8FF009987B4
F241FDA50FFD026C3FEFDB7FF154723FE661ED3C907F6943FF00409B0FFBF6DF
FC551C8FF9987B4F241FDA50FF00D026C3FEFDB7FF00154723FE661ED3C907F6
943FF409B0FF00BF6DFF00C551C8FF009987B4F241FDA50FFD026C3FEFDB7FF1
54723FE661ED3C907F6943FF00409B0FFBF6DFFC551C8FF9987B4F241FDA50FF
00D026C3FEFDB7FF00154723FE661ED3C907F6943FF409B0FF00BF6DFF00C551
C8FF009987B4F241FDA50FFD026C3FEFDB7FF154723FE661ED3C907F6943FF00
409B0FFBF6DFFC551C8FF9987B4F241FDA50FF00D026C3FEFDB7FF00154723FE
661ED3C907F6943FF409B0FF00BF6DFF00C551C8FF009987B4F241FDA50FFD02
6C3FEFDB7FF154723FE661ED3C907F6943FF00409B0FFBF6DFFC551C8FF9987B
4F241FDA50FF00D026C3FEFDB7FF00154723FE661ED3C907F6943FF409B0FF00
BF6DFF00C551C8FF009987B4F241FDA50FFD026C3FEFDB7FF154723FE661ED3C
907F6943FF00409B0FFBF6DFFC551C8FF9987B4F241FDA50FF00D026C3FEFDB7
FF00154723FE661ED3C907F6943FF409B0FF00BF6DFF00C551C8FF009987B4F2
41FDA50FFD026C3FEFDB7FF154723FE661ED3C907F6943FF00409B0FFBF6DFFC
551C8FF9987B4F241FDA50FF00D026C3FEFDB7FF00154723FE661ED3C907F694
3FF409B0FF00BF6DFF00C551C8FF009987B4F241FDA50FFD026C3FEFDB7FF154
723FE661ED3C907F6943FF00409B0FFBF6DFFC551C8FF9987B4F241FDA50FF00
D026C3FEFDB7FF00154723FE661ED3C907F6943FF409B0FF00BF6DFF00C551C8
FF009987B4F241FDA50FFD026C3FEFDB7FF154723FE661ED3C907F6943FF0040
9B0FFBF6DFFC551C8FF9987B4F241FDA50FF00D026C3FEFDB7FF00154723FE66
1ED3C907F6943FF409B0FF00BF6DFF00C551C8FF009987B4F241FDA50FFD026C
3FEFDB7FF154723FE661ED3C907F6943FF00409B0FFBF6DFFC551C8FF9987B4F
241FDA50FF00D026C3FEFDB7FF00154723FE661ED3C907F6943FF409B0FF00BF
6DFF00C551C8FF009987B4F241FDA50FFD026C3FEFDB7FF154723FE661ED3C90
7F6943FF00409B0FFBF6DFFC551C8FF9987B4F241FDA50FF00D026C3FEFDB7FF
00154723FE661ED3C907F6943FF409B0FF00BF6DFF00C551C8FF009987B4F241
FDA50FFD026C3FEFDB7FF154723FE661ED3C907F6943FF00409B0FFBF6DFFC55
1C8FF9987B4F241FDA50FF00D026C3FEFDB7FF00154723FE661ED3C907F6943F
F409B0FF00BF6DFF00C551C8FF009987B4F241FDA50FFD026C3FEFDB7FF15472
3FE661ED3C907F6943FF00409B0FFBF6DFFC551C8FF9987B4F2467D599850014
0050014005001400500140050014005001400500140050014005001400500140
0500140050014005001400500140050014005001400500140050014005001400
5001400500140050014005001400500140050014005001400500140050014005
0014005001400500140050014005001400500140050014005001400500140050
0140050014005001400500140050014005001400500140050014005001400500
1400500140050014005001400500140050014005001400500140050014005001
4005001400500140050014005001400500140050014005001400500140050014
0050014005001400500140050014005001400500140050014005001400500140
0500140050014005001400500140050014005001400500140050014005001400
5001400500140050014005001400500140050014005001400500140050014005
0014005001400500140050014005001400500140050014005001400500140050
0140050014005001400500140050014005001400500140050014005001400500
1400500140050014005001400500140050014005001400500140050014005001
4005001400500140050014005001400500140050014005001400500140050014
00500140050014005001401FFFD9}
Stretch = True
Transparent = True
end
object Label1: TLabel
Left = 164
Top = 85
Width = 73
Height = 17
AutoSize = False
Caption = #30331#24405#24080#21495':'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Label2: TLabel
Left = 163
Top = 130
Width = 73
Height = 17
AutoSize = False
Caption = #25480#26435#23494#30721':'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWhite
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object EUser: TEdit
Left = 236
Top = 83
Width = 133
Height = 22
BevelInner = bvNone
BevelKind = bkSoft
BevelOuter = bvNone
Color = clWhite
Ctl3D = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentCtl3D = False
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 3
Text = #20911#29577#29664
OnKeyPress = EUserKeyPress
end
object BOK: TFlatButton
Left = 260
Top = 196
Width = 65
Height = 25
Color = clCream
ColorFocused = 15916991
Caption = #30830#23450'(&O)'
ParentColor = False
TabOrder = 1
OnClick = BOKClick
end
object BQuit: TFlatButton
Left = 336
Top = 196
Width = 65
Height = 25
Color = clCream
ColorFocused = 15916991
Caption = #36864#20986'(&Q)'
ParentColor = False
TabOrder = 2
OnClick = BQuitClick
end
object EPWD: TFlatEdit
Left = 236
Top = 129
Width = 133
Height = 21
Hint = #35831#36755#20837#27491#30830#30340#25480#26435#23494#30721
ColorBorder = 12164478
ColorFlat = clWhite
Font.Charset = SYMBOL_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Wingdings'
Font.Style = []
ParentFont = False
PasswordChar = 'l'
TabOrder = 0
OnKeyPress = edtPasswordKeyPress
end
object Props: TPropStorageEh
Active = False
StorageManager = PropIni
StoredProps.Strings = (
'EUser.<P>.Text')
Left = 108
end
object PropIni: TIniPropStorageManEh
Left = 80
end
object UserQry: TADOQuery
Connection = LinkSQL.PubLink
CursorType = ctStatic
Parameters = <
item
Name = '@Account'
DataType = ftString
Size = 255
Value = Null
end
item
Name = '@PWD'
DataType = ftString
Size = 255
Value = Null
end>
SQL.Strings = (
'Select * From T_User Where FName=:@Account And FPWD=:@PWD')
Left = 136
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -