frmclient.form

来自「Gambas is a graphical development enviro」· FORM 代码 · 共 70 行

# Gambas Form File 1.0

{ FrmClient Form
  Move(347,211,478,344)
  Text = ("Client")
  Border = Window.Fixed
  { Panel2 Panel
    Move(0,0,480,344)
    Background = &H4F87E7&
    { Label3 Label
      Move(0,8,232,24)
      Font = Font["Bold"]
      Background = &H4F87E7&
      Foreground = &HFFFF7F&
      Text = ("Client Side")
      Alignment = Align.Center
    }
    { Label4 Label
      Move(8,40,96,24)
      Font = Font["Bold"]
      Background = &H4F87E7&
      Foreground = &HFFFF7F&
      Text = ("Host IP")
      Alignment = Align.Center
    }
    { Label5 Label
      Move(8,64,96,24)
      Font = Font["Bold"]
      Background = &H4F87E7&
      Foreground = &HFFFF7F&
      Text = ("Port")
      Alignment = Align.Center
    }
    { TxtIP TextBox
      Move(112,40,112,24)
      Text = ("127.0.0.1")
    }
    { TxtPort TextBox
      Move(112,64,64,24)
      Text = ("32340")
    }
    { Button2 Button
      Move(280,40,88,24)
      Text = ("Start !")
    }
    { TxtData TextBox
      Move(16,152,336,24)
      Enabled = False
      Text = ("")
    }
    { Button3 Button
      Move(376,152,80,24)
      Enabled = False
      Text = ("Send Data")
    }
    { TxtRecClient TextArea
      Move(16,192,448,136)
      Text = ("")
      ReadOnly = True
    }
    { Label1 Label
      Move(16,120,424,16)
      Font = Font["Bold"]
      Background = &H4F87E7&
      Foreground = &HFFFF00&
      Text = ("Write Here data to send then press \"Send Data\"")
    }
  }
}