📄 unit7.dfm
字号:
object connectreader: Tconnectreader
Left = 169
Top = 45
Width = 649
Height = 547
AutoSize = True
Caption = #32852#31995#35835#32773
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 88
Width = 641
Height = 161
TabOrder = 0
object Label3: TLabel
Left = 72
Top = 56
Width = 33
Height = 13
AutoSize = False
Caption = #21333#20301
end
object Label4: TLabel
Left = 288
Top = 48
Width = 25
Height = 13
AutoSize = False
Caption = #30005#35805
end
object Label5: TLabel
Left = 72
Top = 104
Width = 33
Height = 13
AutoSize = False
Caption = #37038#20214
end
object Edit3: TEdit
Left = 128
Top = 48
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 0
end
object Edit4: TEdit
Left = 328
Top = 48
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 1
end
object Edit5: TEdit
Left = 128
Top = 96
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 2
end
object BitBtn1: TBitBtn
Left = 264
Top = 80
Width = 41
Height = 41
TabOrder = 3
OnClick = BitBtn1Click
Glyph.Data = {
96040000424D9604000000000000B600000028000000200000001F0000000100
080000000000E0030000C40E0000C40E0000200000002000000000000000FFFF
6600CC990000CC00330066666600CCFFFF00CCCCCC0084000000000099006633
000099660000FFFFFF00FF9966006600FF00FFCC6600FF6633000000CC003300
CC00FFFFFF000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000121212121212
1212121212121212070703030312121212121212121212121212121212121212
1212121212121207030303030F03031212121212121212121212121212121212
121212121212030703030F0F0F0F0F0312121212121212121212121212121212
121212121212070C0A0A030F0F020F0203121212121212121212121212121212
1212121212030C0712121203020202020C031212120712121212121212121212
121212121203071212121212030C0C0C0C0E0312070712121212000000000000
00000000000000000000000000030C0E0E0E0E070E0700000000040404040404
0404040404040404040404040404030E0E0E0E0E01070404040004060B050505
050505050505050505050505050505030E010E0101070505040004060B0B0505
050505050505050505050505050505050301010101070505040004060B050B0B
050505050505050505050505050505030101010101070505040004060B0B0B05
0B0505050505090909090909090903030303030303070505040004060B0B0B0B
0B0B05050505050505050505050505050505050505050505040004060B0B0B05
0B050B050505090909090909090909090909090909090505040004060B0B0B0B
0B0B0B0B0505050505050505050505050505050505050505040004060B0B0B0B
0B050B050B05090909090909090909090909090909090505040004060B0B0B0B
0B0B0B0B050B050505050505050505050505050505050505040004060B0B0B0B
0B0B0B050B0B0B0505050505050505050505050505050505040004060B0B0B0B
0B0B0B0B0B05050B05050505050505050505051008080805040004060B0B0707
0707070707070B0B0B050505050505050505051110080805040004060B0B0303
03030303070B050B050B0B05050505050505050D11100805040004060B0B0303
03030F070B0B0B0B0B0B050B050505050505050D0D111005040004060B0B0303
030F0F0F070B0B0B0B050B050B05050505050505050505050400040606060303
0F0F0F0F02070606060606060606060606060606060606060400040404040303
070F0202020C0704040404040404040404040404040404040400121212120307
1203020C0C0C0C07121212121207031212121212121212121212121212120312
1212030C0C0E0E0E07121212070C031212121212121212121212121212121212
121212030E0E0E0E0E0703030C03031212121212121212121212121212121212
12121212030E0E01010107070303121212121212121212121212121212121212
12121212120C0C0E010101010C12121212121212121212121212121212121212
121212121212120C0E0E0E0E1212121212121212121212121212}
Layout = blGlyphRight
end
end
object GroupBox1: TGroupBox
Left = 0
Top = 0
Width = 641
Height = 89
Caption = #38656#32852#31995#35835#32773
TabOrder = 1
object Edit1: TEdit
Left = 128
Top = 32
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 0
end
object Edit2: TEdit
Left = 336
Top = 32
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 1
end
object RadioButton1: TRadioButton
Left = 56
Top = 32
Width = 49
Height = 17
Caption = #32534#21495
TabOrder = 2
end
object RadioButton2: TRadioButton
Left = 264
Top = 32
Width = 49
Height = 17
Caption = #22995#21517
TabOrder = 3
end
object Button3: TButton
Left = 496
Top = 56
Width = 89
Height = 25
Caption = #22797#20301'[&R]'
TabOrder = 4
OnClick = Button3Click
end
object Button1: TButton
Left = 496
Top = 16
Width = 89
Height = 25
Caption = #26174#31034#20449#24687'[&S]'
TabOrder = 5
OnClick = Button1Click
end
end
object Panel2: TPanel
Left = 0
Top = 256
Width = 641
Height = 257
TabOrder = 2
Visible = False
object Label1: TLabel
Left = 57
Top = 49
Width = 73
Height = 13
AutoSize = False
Caption = #21457#20214#20154#22320#22336
end
object Label2: TLabel
Left = 73
Top = 145
Width = 60
Height = 13
Caption = #27491' '#25991#65306
end
object Label6: TLabel
Left = 73
Top = 97
Width = 60
Height = 13
Caption = #37038#20214#20027#39064#65306
end
object Edit6: TEdit
Left = 145
Top = 41
Width = 137
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 0
Text = 'wl_xzsb203@doit.net.cn'
end
object memo1: TMemo
Left = 145
Top = 137
Width = 400
Height = 105
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
Lines.Strings = (
'')
TabOrder = 1
end
object Button2: TButton
Left = 505
Top = 33
Width = 80
Height = 25
Caption = #21457#36865'[&P]'
TabOrder = 2
OnClick = Button2Click
end
object Edit7: TEdit
Left = 145
Top = 89
Width = 137
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
TabOrder = 3
end
object BitBtn2: TBitBtn
Left = 368
Top = 32
Width = 75
Height = 25
Caption = #32676#21457'[&A]'
TabOrder = 4
OnClick = BitBtn2Click
end
end
object IdSMTP1: TIdSMTP
MaxLineAction = maException
ReadTimeout = 0
OnConnected = Button2Click
Port = 25
AuthenticationType = atNone
Left = 448
Top = 184
end
object ADOTable1: TADOTable
ConnectionString =
'Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security In' +
'fo=False;Initial Catalog=library;Data Source=.'
TableName = 'Readers'
Left = 648
Top = 136
end
object DataSource1: TDataSource
DataSet = ADOTable1
Left = 624
Top = 200
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -