mainunit.dfm

这是一个使用UDP协议通信的例子程序

object MainForm: TMainForm
  Left = 433
  Top = 463
  Width = 201
  Height = 306
  Caption = #23458#25143#31471#27979#35797
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object StaticText1: TStaticText
    Left = 4
    Top = 8
    Width = 58
    Height = 16
    Caption = #26381#21153#22120'IP:'
    TabOrder = 0
  end
  object StaticText2: TStaticText
    Left = 28
    Top = 32
    Width = 34
    Height = 16
    Caption = #31471#21475':'
    TabOrder = 1
  end
  object IPEdit: TEdit
    Left = 64
    Top = 4
    Width = 125
    Height = 20
    TabOrder = 2
  end
  object PortEdit: TEdit
    Left = 64
    Top = 32
    Width = 125
    Height = 20
    TabOrder = 3
    Text = '10000'
  end
  object SendButton: TButton
    Left = 115
    Top = 56
    Width = 75
    Height = 21
    Caption = #21457#36865
    TabOrder = 4
    OnClick = SendButtonClick
  end
  object Memo: TMemo
    Left = 4
    Top = 84
    Width = 185
    Height = 193
    ScrollBars = ssBoth
    TabOrder = 5
  end
  object GameTimer: TTimer
    Interval = 0
    OnTimer = GameTimerTimer
    Left = 136
    Top = 8
  end
end