# Gambas Form File 2.0

{ Form Form
  MoveScaled(34,23.75,48.625,57)
  Text = ("Client socket example ")
  Border = Window.Fixed
  { Button1 Button
    MoveScaled(31,7,17,3)
    Text = ("Connect")
  }
  { TextArea1 TextArea
    MoveScaled(1,41,47,15)
    Text = ("")
    ReadOnly = True
  }
  { Timer1 #Timer
    #X = 320
    #Y = 128
    Delay = 10
  }
  { Button2 Button
    MoveScaled(31,10,17,3)
    Enabled = False
    Text = ("Close")
  }
  { TextBox1 TextBox
    MoveScaled(11,7,18,3)
    Text = ("localhost")
  }
  { Label1 Label
    MoveScaled(1,7,9,3)
    Text = ("Host :")
  }
  { Label2 Label
    MoveScaled(1,10,9,3)
    Text = ("Port :")
  }
  { TextBox2 TextBox
    MoveScaled(11,10,18,3)
    Text = ("7")
  }
  { TextLabel1 TextLabel
    MoveScaled(1,37,47,3)
    Text = ("Data Received :")
  }
  { TextArea2 TextArea
    MoveScaled(1,24,47,6)
    Enabled = False
    Text = ("")
  }
  { Button3 Button
    MoveScaled(13,31,23,4)
    Enabled = False
    Text = ("Send Data")
  }
  { Label4 Label
    MoveScaled(1,21,47,2)
    Text = ("Write here data to send, then press \"Send Data\"")
  }
  { Label5 Label
    MoveScaled(1,1,17,3)
    Text = ("Select protocol :")
  }
  { CmbProtocol ComboBox
    MoveScaled(20,1,19,3)
    Text = (" ")
    ReadOnly = True
    List = [("TCP"), ("UNIX")]
  }
  { MySock #Socket
    #X = 312
    #Y = 248
    Port = 7
  }
  { Label3 TextLabel
    MoveScaled(1,14,47,6)
    Font = Font["Bold"]
    Text = ("")
    Alignment = Align.Center
    Border = Border.Sunken
  }
}
