ARM专辑-152M-pdf.zip
源代码在线查看： unit1.dfm
object Form1: TForm1
Left = 296
Top = 137
Width = 552
Height = 467
Caption = 'DP系列实验仪 UDP 演示程序'
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 Label1: TLabel
Left = 21
Top = 21
Width = 84
Height = 12
Caption = '远程主机地址：'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 21
Top = 62
Width = 72
Height = 12
Caption = '远程端口号：'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 285
Top = 21
Width = 72
Height = 12
Caption = '本地端口号：'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 25
Top = 250
Width = 72
Height = 12
Caption = '接收到的数据'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object GroupBox2: TGroupBox
Left = 288
Top = 102
Width = 250
Height = 130
Caption = '发送用户数据报流'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 9
end
object GroupBox1: TGroupBox
Left = 8
Top = 102
Width = 250
Height = 130
Caption = '发送用户数据报消息'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 5
object Label4: TLabel
Left = 18
Top = 39
Width = 60
Height = 12
Caption = '输入消息：'
end
end
object Edit1: TEdit
Left = 112
Top = 17
Width = 150
Height = 21
TabOrder = 0
Text = '192.168.0.94'
end
object Edit3: TEdit
Left = 368
Top = 17
Width = 150
Height = 21
TabOrder = 1
Text = '1011'
end
object Edit2: TEdit
Left = 112
Top = 57
Width = 150
Height = 21
TabOrder = 2
Text = '1025'
end
object Edit4: TEdit
Left = 28
Top = 165
Width = 200
Height = 21
TabOrder = 3
Text = 'asd'
end
object Edit5: TEdit
Left = 312
Top = 166
Width = 200
Height = 21
TabOrder = 4
end
object btnSendMsg: TButton
Left = 168
Top = 198
Width = 65
Height = 25
Caption = '发送'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 6
OnClick = btnSendMsgClick
end
object btnSendStr: TButton
Left = 448
Top = 198
Width = 65
Height = 25
Caption = '发送'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 7
OnClick = btnSendStrClick
end
object btnLoad: TButton
Left = 312
Top = 131
Width = 49
Height = 25
Caption = '载入'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 8
OnClick = btnLoadClick
end
object StatusBar1: TStatusBar
Left = 0
Top = 415
Width = 544
Height = 25
Panels =
SimplePanel = True
end
object RichEdit1: TMemo
Left = 9
Top = 274
Width = 529
Height = 137
Lines.Strings = (
'')
TabOrder = 11
end
object Button1: TButton
Left = 449
Top = 242
Width = 65
Height = 25
Caption = '清空'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 12
OnClick = Button1Click
end
object NMUDP1: TNMUDP
RemotePort = 0
LocalPort = 0
ReportLevel = 1
OnDataReceived = NMUDP1DataReceived
OnDataSend = NMUDP1DataSend
OnStatus = NMUDP1Status
OnInvalidHost = NMUDP1InvalidHost
OnStreamInvalid = NMUDP1StreamInvalid
OnBufferInvalid = NMUDP1BufferInvalid
Left = 392
Top = 49
end
object OpenDialog1: TOpenDialog
Left = 472
Top = 49
end
end
