📄 unit1.dfm
字号:
object Form1: TForm1
Left = 121
Top = 145
AutoScroll = False
Caption = 'IP Sender'
ClientHeight = 110
ClientWidth = 186
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Label2: TLabel
Left = 24
Top = 32
Width = 75
Height = 24
Caption = '127.0.0.1'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label1: TLabel
Left = 64
Top = 8
Width = 48
Height = 13
Caption = 'Your IP is:'
end
object Label3: TLabel
Left = 40
Top = 64
Width = 3
Height = 13
end
object Label4: TLabel
Left = 16
Top = 88
Width = 3
Height = 13
end
object WebBrowser1: TWebBrowser
Left = 208
Top = 96
Width = 9
Height = 1
TabOrder = 0
ControlData = {
4C000000EE0000001A0000000000000000000000000000000000000000000000
000000004C000000000000000000000001000000E0D057007335CF11AE690800
2B2E12620A000000000000004C0000000114020000000000C000000000000046
8000000000000000000000000000000000000000000000000000000000000000
00000000000000000100000000000000000000000000000000000000}
end
object ClientSocket1: TClientSocket
Active = False
ClientType = ctNonBlocking
Port = 54320
OnConnecting = ClientSocket1Connect
OnDisconnect = ClientSocket1Disconnect
OnRead = ClientSocket1Read
OnError = ClientSocket1Error
Left = 8
Top = 56
end
object Timer1: TTimer
OnTimer = IPInterval
Left = 152
Top = 80
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -