📄 unit1.~dfm
字号:
object Form1: TForm1
Left = 192
Top = 107
Width = 546
Height = 409
Caption = 'Form1'
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 Shape1: TShape
Left = 312
Top = 320
Width = 17
Height = 17
end
object Shape2: TShape
Left = 312
Top = 352
Width = 17
Height = 17
Shape = stCircle
end
object Memo1: TMemo
Left = 16
Top = 16
Width = 513
Height = 265
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
Lines.Strings = (
'Memo1')
TabOrder = 0
end
object Edit1: TEdit
Left = 16
Top = 288
Width = 433
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 1
Text = 'hello!'
end
object Button1: TButton
Left = 456
Top = 288
Width = 75
Height = 25
Caption = 'Send'
TabOrder = 2
OnClick = Button1Click
end
object Edit2: TEdit
Left = 16
Top = 320
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 3
Text = '127.0.0.1'
end
object Edit3: TEdit
Left = 144
Top = 320
Width = 73
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 4
Text = '3100'
end
object Button2: TButton
Left = 224
Top = 320
Width = 75
Height = 25
Caption = 'Connect'
TabOrder = 5
OnClick = Button2Click
end
object Edit4: TEdit
Left = 16
Top = 352
Width = 121
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 6
Text = '4000'
end
object CheckBox1: TCheckBox
Left = 152
Top = 352
Width = 49
Height = 17
Caption = #20390#21548
TabOrder = 7
OnClick = CheckBox1Click
end
object ClientSocket1: TClientSocket
Active = False
ClientType = ctNonBlocking
Port = 0
OnConnect = ClientSocket1Connect
OnDisconnect = ClientSocket1Disconnect
OnRead = ClientSocket1Read
OnError = ClientSocket1Error
Left = 24
Top = 64
end
object ServerSocket1: TServerSocket
Active = False
Port = 0
ServerType = stNonBlocking
OnClientConnect = ServerSocket1ClientConnect
OnClientDisconnect = ServerSocket1ClientDisconnect
OnClientRead = ServerSocket1ClientRead
OnClientError = ServerSocket1ClientError
Left = 80
Top = 48
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -