home *** CD-ROM | disk | FTP | other *** search
/ Delphi Anthology / aDELPHI.iso / Runimage / Delphi50 / Demos / FastNet / Msg / msgdem.dfm / msgdem.txt
Text File  |  1999-08-11  |  2KB  |  119 lines
  1. object Form1: TForm1
  2.   Left = 200
  3.   Top = 108
  4.   Width = 435
  5.   Height = 315
  6.   Caption = 'Msg Demo'
  7.   Color = clBtnFace
  8.   Font.Charset = DEFAULT_CHARSET
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   OldCreateOrder = True
  14.   PixelsPerInch = 96
  15.   TextHeight = 13
  16.   object Panel1: TPanel
  17.     Left = 0
  18.     Top = 184
  19.     Width = 427
  20.     Height = 85
  21.     Align = alBottom
  22.     BevelInner = bvLowered
  23.     BevelOuter = bvLowered
  24.     TabOrder = 0
  25.     OnResize = Panel1Resize
  26.     object Label1: TLabel
  27.       Left = 8
  28.       Top = 12
  29.       Width = 59
  30.       Height = 13
  31.       Caption = 'Your Name: '
  32.     end
  33.     object Label2: TLabel
  34.       Left = 200
  35.       Top = 12
  36.       Width = 28
  37.       Height = 13
  38.       Caption = 'Host: '
  39.     end
  40.     object Label3: TLabel
  41.       Left = 13
  42.       Top = 34
  43.       Width = 211
  44.       Height = 13
  45.       Caption = 'Type your message here and press [ENTER]'
  46.     end
  47.     object Edit1: TEdit
  48.       Left = 8
  49.       Top = 50
  50.       Width = 266
  51.       Height = 21
  52.       TabOrder = 0
  53.       OnKeyPress = Edit1KeyPress
  54.     end
  55.     object Edit2: TEdit
  56.       Left = 67
  57.       Top = 8
  58.       Width = 121
  59.       Height = 21
  60.       TabOrder = 1
  61.       Text = 'NetMasters'
  62.     end
  63.     object Edit3: TEdit
  64.       Left = 232
  65.       Top = 8
  66.       Width = 121
  67.       Height = 21
  68.       TabOrder = 2
  69.       Text = '127.0.0.1'
  70.     end
  71.   end
  72.   object Memo1: TMemo
  73.     Left = 0
  74.     Top = 0
  75.     Width = 427
  76.     Height = 184
  77.     Align = alClient
  78.     TabOrder = 1
  79.   end
  80.   object StatusBar1: TStatusBar
  81.     Left = 0
  82.     Top = 269
  83.     Width = 427
  84.     Height = 19
  85.     Panels = <>
  86.     SimplePanel = True
  87.   end
  88.   object NMMsg1: TNMMsg
  89.     Port = 6711
  90.     ReportLevel = 0
  91.     OnDisconnect = NMMsg1Disconnect
  92.     OnConnect = NMMsg1Connect
  93.     OnInvalidHost = NMMsg1InvalidHost
  94.     OnHostResolved = NMMsg1HostResolved
  95.     OnStatus = NMMsg1Status
  96.     OnConnectionFailed = NMMsg1ConnectionFailed
  97.     FromName = 'Netmasters'
  98.     OnMessageSent = NMMsg1MessageSent
  99.     Left = 312
  100.     Top = 232
  101.   end
  102.   object NMMSGServ1: TNMMSGServ
  103.     Port = 6711
  104.     ReportLevel = 0
  105.     OnStatus = NMMSGServ1Status
  106.     OnClientContact = NMMSGServ1ClientContact
  107.     OnMSG = NMMSGServ1MSG
  108.     Left = 344
  109.     Top = 232
  110.   end
  111.   object ClientSocket1: TClientSocket
  112.     Active = False
  113.     ClientType = ctNonBlocking
  114.     Port = 0
  115.     Left = 384
  116.     Top = 208
  117.   end
  118. end
  119.