From: <cod...@go...> - 2008-09-18 14:26:37
|
Author: M0...@gm... Date: Thu Sep 18 14:26:13 2008 New Revision: 171 Modified: branches/iVL/MdlNetConf.module Log: - Added checkbox to enable / disable interfaces (meaning will get started at boot) Modified: branches/iVL/MdlNetConf.module ============================================================================== --- branches/iVL/MdlNetConf.module (original) +++ branches/iVL/MdlNetConf.module Thu Sep 18 14:26:13 2008 @@ -40,6 +40,7 @@ DIM tl AS TextLabel DIM tb AS TextBox DIM cb AS ComboBox + DIM bCb AS CheckBox DIM i, ii, y, x, cbwidth AS Integer DIM pTabPic AS picture @@ -95,7 +96,7 @@ .Height = 21 .Alignment = Align.Normal .Width = MdlObjSizer.get_object_width(.text) - y = .top + .Height + 4 + 'y = .top + .Height + 4 END WITH tb = NEW TextBox(FrmNetConf.TSNetDevices) AS "txtDevAddresses" ' MAC Address box WITH tb @@ -108,7 +109,7 @@ cbwidth = .Width END WITH - + tl = NEW TextLabel(FrmNetConf.TSNetDevices) AS "DevTYpeLbl" WITH tl .Move(x + tb.Width + 8, tb.top) @@ -127,6 +128,22 @@ .tag = sDev END WITH + 'add a box here to enable/disable the interface + bCb = NEW CheckBox(FrmNetConf.TSNetDevices) AS "bEnableInterface" ' enable/disable interface box + WITH bCb + .Move(4, tb.top + tb.Height + 4) + .text = "Enabled" + .Value = TRUE + .Height = 21 + .Width = MdlObjSizer.get_object_width(.text) + 36 + .tag = sDev + y = .top + .Height + 8 + END WITH + + + + + tl = NEW TextLabel(FrmNetConf.TSNetDevices) AS "ConfModeLbl" WITH tl .Move(4, y) @@ -176,7 +193,7 @@ .Move(ileft, itop + 8) .text = "Settings for Static Method" .Width = .Parent.Width - (.left * 2.5) - .Height = 180 + .Height = 130 .tag = LAST.tag END WITH objFrames.Add(frmDetails) |