Unit3.dfm

   1 object Form3: TForm3
   2   Left = 0
   3   Top = 0
   4   Caption = 'Form3'
   5   ClientHeight = 299
   6   ClientWidth = 635
   7   Color = clBtnFace
   8   Font.Charset = DEFAULT_CHARSET
   9   Font.Color = clWindowText
  10   Font.Height = -11
  11   Font.Name = 'Tahoma'
  12   Font.Style = []
  13   OldCreateOrder = False
  14   OnDestroy = FormDestroy
  15   PixelsPerInch = 96
  16   TextHeight = 13
  17   object ListBox1: TListBox
  18     Left = 0
  19     Top = 82
  20     Width = 635
  21     Height = 217
  22     Align = alClient
  23     ItemHeight = 13
  24     TabOrder = 0
  25   end
  26   object Panel1: TPanel
  27     Left = 0
  28     Top = 0
  29     Width = 635
  30     Height = 41
  31     Align = alTop
  32     Caption = 'Panel1'
  33     TabOrder = 1
  34     object Label1: TLabel
  35       Left = 1
  36       Top = 1
  37       Width = 558
  38       Height = 39
  39       Align = alClient
  40       Caption = 'Label1'
  41       ExplicitWidth = 31
  42       ExplicitHeight = 13
  43     end
  44     object Button2: TButton
  45       Left = 559
  46       Top = 1
  47       Width = 75
  48       Height = 39
  49       Align = alRight
  50       Caption = #25509#32154
  51       TabOrder = 0
  52       OnClick = Button2Click
  53     end
  54   end
  55   object Panel2: TPanel
  56     Left = 0
  57     Top = 41
  58     Width = 635
  59     Height = 41
  60     Align = alTop
  61     Caption = 'Panel2'
  62     TabOrder = 2
  63     object Edit1: TEdit
  64       Left = 1
  65       Top = 1
  66       Width = 558
  67       Height = 39
  68       Align = alClient
  69       TabOrder = 0
  70       Text = 'Edit1'
  71       ExplicitHeight = 21
  72     end
  73     object Button1: TButton
  74       Left = 559
  75       Top = 1
  76       Width = 75
  77       Height = 39
  78       Align = alRight
  79       Caption = #36865#20449
  80       TabOrder = 1
  81       OnClick = Button1Click
  82     end
  83   end
  84   object IdUDPServer1: TIdUDPServer
  85     BroadcastEnabled = True
  86     Bindings = <
  87       item
  88         IP = '127.0.0.1'
  89         Port = 80
  90       end>
  91     DefaultPort = 80
  92     OnUDPRead = IdUDPServer1UDPRead
  93     Left = 528
  94     Top = 96
  95   end
  96   object IdTCPServer1: TIdTCPServer
  97     Active = True
  98     Bindings = <
  99       item
 100         IP = '127.0.0.1'
 101         Port = 80
 102       end>
 103     DefaultPort = 80
 104     OnExecute = IdTCPServer1Execute
 105     Left = 528
 106     Top = 160
 107   end
 108   object IdTCPClient1: TIdTCPClient
 109     ConnectTimeout = 0
 110     IPVersion = Id_IPv4
 111     Port = 0
 112     ReadTimeout = -1
 113     Left = 400
 114     Top = 168
 115   end
 116   object Timer1: TTimer
 117     OnTimer = Timer1Timer
 118     Left = 400
 119     Top = 120
 120   end
 121 end