GreyRandall
asked on
Resize proportions for buttons, labels and picture boxes in a panel.
This one is really puzzling me. I'm in the process of creating a tool for our hydrologists to use, allowing them to browse multiple graphs on various water sources. Here is what I have: A windows form divided into two parts. On the left hand side are the controls allowing the user to select which water source they want to view. These controls consist of a combo box, a label, a checked list box, and three buttons (display graphs, clear data display, and quit application) The data display is the part with which I am having the problem. It has been requested that this form be able to display on screens of varying resolution settings. The original form was created at 640 x 480. When the screen is maximized to match mine (1280 x 1024) the controls resize perfectly. However, the data display is causing me problems.
Data Display.
I've tried this with a panel and a group box, but still can't get these to resize correctly. At 640 x 480, the panel/group box were both 438 x 420. The picture boxes are as follows: Top left 212 x 144, top right 212 x 144, bottom left 212 x 144, bottom middle 102 x 144, bottom right 102 x 144. Each picture box has a centered label on top of them (labels are 24 pixels tall) At the bottom of the panel are two buttons, which are used to navigate back and forth between selcted water sources. I have tried every possible anchor combination available. No matter which is selected, the pictures do not resize proportionally. Either the labels vanish, the buttons overlap each other, or one picture box in particular expands to fill the entire panel.
What, if anything, am I doing wrong here, and how in the world can I get the picture boxes on this form to match the size of the screen?
Currently, the only button that I have functioning is the quit button. I really need to nail down the resizing before anything else can be done with the application.
Code behind the form:
Public Class frmMainMenu
Inherits System.Windows.Forms.Form
#Region " Windows Form Designer generated code "
Public Sub New()
MyBase.New()
'This call is required by the Windows Form Designer.
InitializeComponent()
'Add any initialization after the InitializeComponent() call
End Sub
'Form overrides dispose to clean up the component list.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
'Required by the Windows Form Designer
Private components As System.ComponentModel.ICon tainer
'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
Friend WithEvents MainMenu1 As System.Windows.Forms.MainM enu
Friend WithEvents sbrStatusBar As System.Windows.Forms.Statu sBar
Friend WithEvents MenuItem1 As System.Windows.Forms.MenuI tem
Friend WithEvents MenuItem2 As System.Windows.Forms.MenuI tem
Friend WithEvents MenuItem3 As System.Windows.Forms.MenuI tem
Friend WithEvents MenuItem4 As System.Windows.Forms.MenuI tem
Friend WithEvents MenuItem5 As System.Windows.Forms.MenuI tem
Friend WithEvents MenuItem6 As System.Windows.Forms.MenuI tem
Friend WithEvents MenuItem7 As System.Windows.Forms.MenuI tem
Friend WithEvents MenuItem8 As System.Windows.Forms.MenuI tem
Friend WithEvents lblDataType As System.Windows.Forms.Label
Friend WithEvents ComboBox1 As System.Windows.Forms.Combo Box
Friend WithEvents CheckedListBox1 As System.Windows.Forms.Check edListBox
Friend WithEvents Button1 As System.Windows.Forms.Butto n
Friend WithEvents Button2 As System.Windows.Forms.Butto n
Friend WithEvents Button3 As System.Windows.Forms.Butto n
Friend WithEvents lblDescriptor As System.Windows.Forms.Label
Friend WithEvents Panel1 As System.Windows.Forms.Panel
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents Label5 As System.Windows.Forms.Label
Friend WithEvents pbxSFCLT As System.Windows.Forms.Pictu reBox
Friend WithEvents pbxSFMTS As System.Windows.Forms.Pictu reBox
Friend WithEvents pbxSFIPTS As System.Windows.Forms.Pictu reBox
Friend WithEvents Label4 As System.Windows.Forms.Label
Friend WithEvents Label3 As System.Windows.Forms.Label
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents btnStreamflowNext As System.Windows.Forms.Butto n
Friend WithEvents btnStreamflowPrevious As System.Windows.Forms.Butto n
Friend WithEvents pbxFlowDuration As System.Windows.Forms.Pictu reBox
Friend WithEvents pbxSeasonal As System.Windows.Forms.Pictu reBox
<System.Diagnostics.Debugg erStepThro ugh()> Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceM anager = New System.Resources.ResourceM anager(Get Type(frmMa inMenu))
Me.MainMenu1 = New System.Windows.Forms.MainM enu
Me.MenuItem1 = New System.Windows.Forms.MenuI tem
Me.MenuItem3 = New System.Windows.Forms.MenuI tem
Me.MenuItem4 = New System.Windows.Forms.MenuI tem
Me.MenuItem5 = New System.Windows.Forms.MenuI tem
Me.MenuItem6 = New System.Windows.Forms.MenuI tem
Me.MenuItem7 = New System.Windows.Forms.MenuI tem
Me.MenuItem8 = New System.Windows.Forms.MenuI tem
Me.MenuItem2 = New System.Windows.Forms.MenuI tem
Me.sbrStatusBar = New System.Windows.Forms.Statu sBar
Me.lblDataType = New System.Windows.Forms.Label
Me.ComboBox1 = New System.Windows.Forms.Combo Box
Me.CheckedListBox1 = New System.Windows.Forms.Check edListBox
Me.Button1 = New System.Windows.Forms.Butto n
Me.Button2 = New System.Windows.Forms.Butto n
Me.Button3 = New System.Windows.Forms.Butto n
Me.lblDescriptor = New System.Windows.Forms.Label
Me.Panel1 = New System.Windows.Forms.Panel
Me.Label1 = New System.Windows.Forms.Label
Me.pbxFlowDuration = New System.Windows.Forms.Pictu reBox
Me.pbxSeasonal = New System.Windows.Forms.Pictu reBox
Me.Label5 = New System.Windows.Forms.Label
Me.pbxSFCLT = New System.Windows.Forms.Pictu reBox
Me.pbxSFMTS = New System.Windows.Forms.Pictu reBox
Me.pbxSFIPTS = New System.Windows.Forms.Pictu reBox
Me.Label4 = New System.Windows.Forms.Label
Me.Label3 = New System.Windows.Forms.Label
Me.Label2 = New System.Windows.Forms.Label
Me.btnStreamflowNext = New System.Windows.Forms.Butto n
Me.btnStreamflowPrevious = New System.Windows.Forms.Butto n
Me.Panel1.SuspendLayout()
Me.SuspendLayout()
'
'MainMenu1
'
Me.MainMenu1.MenuItems.Add Range(New System.Windows.Forms.MenuI tem() {Me.MenuItem1, Me.MenuItem7, Me.MenuItem2})
'
'MenuItem1
'
Me.MenuItem1.Index = 0
Me.MenuItem1.MenuItems.Add Range(New System.Windows.Forms.MenuI tem() {Me.MenuItem3, Me.MenuItem6})
Me.MenuItem1.Text = "File"
'
'MenuItem3
'
Me.MenuItem3.Index = 0
Me.MenuItem3.MenuItems.Add Range(New System.Windows.Forms.MenuI tem() {Me.MenuItem4, Me.MenuItem5})
Me.MenuItem3.Text = "Export"
'
'MenuItem4
'
Me.MenuItem4.Index = 0
Me.MenuItem4.Text = "To Word Document"
'
'MenuItem5
'
Me.MenuItem5.Index = 1
Me.MenuItem5.Text = "To PowerPoint Presentation"
'
'MenuItem6
'
Me.MenuItem6.Index = 1
Me.MenuItem6.Text = "Quit"
'
'MenuItem7
'
Me.MenuItem7.Index = 1
Me.MenuItem7.MenuItems.Add Range(New System.Windows.Forms.MenuI tem() {Me.MenuItem8})
Me.MenuItem7.Text = "Interface"
'
'MenuItem8
'
Me.MenuItem8.Index = 0
Me.MenuItem8.Text = "New Comparison"
'
'MenuItem2
'
Me.MenuItem2.Index = 2
Me.MenuItem2.Text = "Help"
'
'sbrStatusBar
'
Me.sbrStatusBar.Location = New System.Drawing.Point(0, 429)
Me.sbrStatusBar.Name = "sbrStatusBar"
Me.sbrStatusBar.Size = New System.Drawing.Size(632, 22)
Me.sbrStatusBar.TabIndex = 0
'
'lblDataType
'
Me.lblDataType.Font = New System.Drawing.Font("Futur a Bk BT", 9.75!, System.Drawing.FontStyle.R egular, System.Drawing.GraphicsUni t.Point, CType(0, Byte))
Me.lblDataType.Location = New System.Drawing.Point(8, 8)
Me.lblDataType.Name = "lblDataType"
Me.lblDataType.Size = New System.Drawing.Size(176, 23)
Me.lblDataType.TabIndex = 2
Me.lblDataType.Text = "Data Type to Display"
Me.lblDataType.TextAlign = System.Drawing.ContentAlig nment.Midd leCenter
'
'ComboBox1
'
Me.ComboBox1.Anchor = CType(((System.Windows.For ms.AnchorS tyles.Top Or System.Windows.Forms.Ancho rStyles.Bo ttom) _
Or System.Windows.Forms.Ancho rStyles.Le ft), System.Windows.Forms.Ancho rStyles)
Me.ComboBox1.Font = New System.Drawing.Font("Futur a Bk BT", 9.75!, System.Drawing.FontStyle.R egular, System.Drawing.GraphicsUni t.Point, CType(0, Byte))
Me.ComboBox1.Items.AddRang e(New Object() {"Stream Flows", "Wells", "Wetlands"})
Me.ComboBox1.Location = New System.Drawing.Point(8, 40)
Me.ComboBox1.Name = "ComboBox1"
Me.ComboBox1.Size = New System.Drawing.Size(176, 24)
Me.ComboBox1.TabIndex = 3
Me.ComboBox1.Text = "Select Data Type"
'
'CheckedListBox1
'
Me.CheckedListBox1.Anchor = CType(((System.Windows.For ms.AnchorS tyles.Top Or System.Windows.Forms.Ancho rStyles.Bo ttom) _
Or System.Windows.Forms.Ancho rStyles.Le ft), System.Windows.Forms.Ancho rStyles)
Me.CheckedListBox1.Font = New System.Drawing.Font("Futur a Bk BT", 9.75!, System.Drawing.FontStyle.R egular, System.Drawing.GraphicsUni t.Point, CType(0, Byte))
Me.CheckedListBox1.Locatio n = New System.Drawing.Point(8, 120)
Me.CheckedListBox1.Name = "CheckedListBox1"
Me.CheckedListBox1.Size = New System.Drawing.Size(176, 202)
Me.CheckedListBox1.TabInde x = 4
'
'Button1
'
Me.Button1.Anchor = CType((System.Windows.Form s.AnchorSt yles.Botto m Or System.Windows.Forms.Ancho rStyles.Le ft), System.Windows.Forms.Ancho rStyles)
Me.Button1.Font = New System.Drawing.Font("Futur a Bk BT", 9.75!, System.Drawing.FontStyle.R egular, System.Drawing.GraphicsUni t.Point, CType(0, Byte))
Me.Button1.Location = New System.Drawing.Point(8, 368)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(176, 24)
Me.Button1.TabIndex = 5
Me.Button1.Text = "Clear Data Display"
'
'Button2
'
Me.Button2.Anchor = CType((System.Windows.Form s.AnchorSt yles.Botto m Or System.Windows.Forms.Ancho rStyles.Le ft), System.Windows.Forms.Ancho rStyles)
Me.Button2.Font = New System.Drawing.Font("Futur a Bk BT", 9.75!, System.Drawing.FontStyle.R egular, System.Drawing.GraphicsUni t.Point, CType(0, Byte))
Me.Button2.Location = New System.Drawing.Point(8, 336)
Me.Button2.Name = "Button2"
Me.Button2.Size = New System.Drawing.Size(176, 24)
Me.Button2.TabIndex = 6
Me.Button2.Text = "Display Graphs"
'
'Button3
'
Me.Button3.Anchor = CType((System.Windows.Form s.AnchorSt yles.Botto m Or System.Windows.Forms.Ancho rStyles.Le ft), System.Windows.Forms.Ancho rStyles)
Me.Button3.Font = New System.Drawing.Font("Futur a Bk BT", 9.75!, System.Drawing.FontStyle.R egular, System.Drawing.GraphicsUni t.Point, CType(0, Byte))
Me.Button3.Location = New System.Drawing.Point(8, 400)
Me.Button3.Name = "Button3"
Me.Button3.Size = New System.Drawing.Size(176, 24)
Me.Button3.TabIndex = 7
Me.Button3.Text = "Quit"
'
'lblDescriptor
'
Me.lblDescriptor.BorderSty le = System.Windows.Forms.Borde rStyle.Fix edSingle
Me.lblDescriptor.Font = New System.Drawing.Font("Futur a Bk BT", 9.75!, System.Drawing.FontStyle.R egular, System.Drawing.GraphicsUni t.Point, CType(0, Byte))
Me.lblDescriptor.Location = New System.Drawing.Point(8, 72)
Me.lblDescriptor.Name = "lblDescriptor"
Me.lblDescriptor.Size = New System.Drawing.Size(176, 40)
Me.lblDescriptor.TabIndex = 8
'
'Panel1
'
Me.Panel1.Anchor = CType((((System.Windows.Fo rms.Anchor Styles.Top Or System.Windows.Forms.Ancho rStyles.Bo ttom) _
Or System.Windows.Forms.Ancho rStyles.Le ft) _
Or System.Windows.Forms.Ancho rStyles.Ri ght), System.Windows.Forms.Ancho rStyles)
Me.Panel1.BorderStyle = System.Windows.Forms.Borde rStyle.Fix edSingle
Me.Panel1.Controls.Add(Me. Label1)
Me.Panel1.Controls.Add(Me. pbxFlowDur ation)
Me.Panel1.Controls.Add(Me. pbxSeasona l)
Me.Panel1.Controls.Add(Me. Label5)
Me.Panel1.Controls.Add(Me. pbxSFCLT)
Me.Panel1.Controls.Add(Me. pbxSFMTS)
Me.Panel1.Controls.Add(Me. pbxSFIPTS)
Me.Panel1.Controls.Add(Me. Label4)
Me.Panel1.Controls.Add(Me. Label3)
Me.Panel1.Controls.Add(Me. Label2)
Me.Panel1.Controls.Add(Me. btnStreamf lowNext)
Me.Panel1.Controls.Add(Me. btnStreamf lowPreviou s)
Me.Panel1.Location = New System.Drawing.Point(192, 4)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(438, 420)
Me.Panel1.TabIndex = 9
'
'Label1
'
Me.Label1.AccessibleRole = System.Windows.Forms.Acces sibleRole. None
Me.Label1.Anchor = CType((System.Windows.Form s.AnchorSt yles.Top Or System.Windows.Forms.Ancho rStyles.Bo ttom), System.Windows.Forms.Ancho rStyles)
Me.Label1.BorderStyle = System.Windows.Forms.Borde rStyle.Fix edSingle
Me.Label1.Location = New System.Drawing.Point(217, 12)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(1, 362)
Me.Label1.TabIndex = 14
Me.Label1.Text = "Label1"
'
'pbxFlowDuration
'
Me.pbxFlowDuration.Accessi bleRole = System.Windows.Forms.Acces sibleRole. None
Me.pbxFlowDuration.Anchor = CType(((System.Windows.For ms.AnchorS tyles.Bott om Or System.Windows.Forms.Ancho rStyles.Le ft) _
Or System.Windows.Forms.Ancho rStyles.Ri ght), System.Windows.Forms.Ancho rStyles)
Me.pbxFlowDuration.Image = CType(resources.GetObject( "pbxFlowDu ration.Ima ge"), System.Drawing.Image)
Me.pbxFlowDuration.Locatio n = New System.Drawing.Point(326, 229)
Me.pbxFlowDuration.Name = "pbxFlowDuration"
Me.pbxFlowDuration.Size = New System.Drawing.Size(102, 144)
Me.pbxFlowDuration.SizeMod e = System.Windows.Forms.Pictu reBoxSizeM ode.Stretc hImage
Me.pbxFlowDuration.TabInde x = 23
Me.pbxFlowDuration.TabStop = False
'
'pbxSeasonal
'
Me.pbxSeasonal.AccessibleR ole = System.Windows.Forms.Acces sibleRole. None
Me.pbxSeasonal.Anchor = CType(((System.Windows.For ms.AnchorS tyles.Bott om Or System.Windows.Forms.Ancho rStyles.Le ft) _
Or System.Windows.Forms.Ancho rStyles.Ri ght), System.Windows.Forms.Ancho rStyles)
Me.pbxSeasonal.Image = CType(resources.GetObject( "pbxSeason al.Image") , System.Drawing.Image)
Me.pbxSeasonal.Location = New System.Drawing.Point(222, 229)
Me.pbxSeasonal.Name = "pbxSeasonal"
Me.pbxSeasonal.Size = New System.Drawing.Size(102, 144)
Me.pbxSeasonal.SizeMode = System.Windows.Forms.Pictu reBoxSizeM ode.Stretc hImage
Me.pbxSeasonal.TabIndex = 22
Me.pbxSeasonal.TabStop = False
'
'Label5
'
Me.Label5.AccessibleRole = System.Windows.Forms.Acces sibleRole. None
Me.Label5.Anchor = CType(((System.Windows.For ms.AnchorS tyles.Top Or System.Windows.Forms.Ancho rStyles.Le ft) _
Or System.Windows.Forms.Ancho rStyles.Ri ght), System.Windows.Forms.Ancho rStyles)
Me.Label5.Font = New System.Drawing.Font("Futur a Bk BT", 9.75!, System.Drawing.FontStyle.B old, System.Drawing.GraphicsUni t.Point, CType(0, Byte))
Me.Label5.Location = New System.Drawing.Point(222, 196)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(208, 26)
Me.Label5.TabIndex = 21
Me.Label5.Text = "Seasonal Discharge and Flow Duration"
Me.Label5.TextAlign = System.Drawing.ContentAlig nment.Midd leCenter
'
'pbxSFCLT
'
Me.pbxSFCLT.AccessibleRole = System.Windows.Forms.Acces sibleRole. None
Me.pbxSFCLT.Anchor = CType((((System.Windows.Fo rms.Anchor Styles.Top Or System.Windows.Forms.Ancho rStyles.Bo ttom) _
Or System.Windows.Forms.Ancho rStyles.Le ft) _
Or System.Windows.Forms.Ancho rStyles.Ri ght), System.Windows.Forms.Ancho rStyles)
Me.pbxSFCLT.Image = CType(resources.GetObject( "pbxSFCLT. Image"), System.Drawing.Image)
Me.pbxSFCLT.Location = New System.Drawing.Point(4, 220)
Me.pbxSFCLT.Name = "pbxSFCLT"
Me.pbxSFCLT.Size = New System.Drawing.Size(212, 146)
Me.pbxSFCLT.SizeMode = System.Windows.Forms.Pictu reBoxSizeM ode.Stretc hImage
Me.pbxSFCLT.TabIndex = 20
Me.pbxSFCLT.TabStop = False
'
'pbxSFMTS
'
Me.pbxSFMTS.AccessibleRole = System.Windows.Forms.Acces sibleRole. None
Me.pbxSFMTS.Anchor = CType(((System.Windows.For ms.AnchorS tyles.Bott om Or System.Windows.Forms.Ancho rStyles.Le ft) _
Or System.Windows.Forms.Ancho rStyles.Ri ght), System.Windows.Forms.Ancho rStyles)
Me.pbxSFMTS.Image = CType(resources.GetObject( "pbxSFMTS. Image"), System.Drawing.Image)
Me.pbxSFMTS.Location = New System.Drawing.Point(220, 32)
Me.pbxSFMTS.Name = "pbxSFMTS"
Me.pbxSFMTS.Size = New System.Drawing.Size(212, 144)
Me.pbxSFMTS.SizeMode = System.Windows.Forms.Pictu reBoxSizeM ode.Stretc hImage
Me.pbxSFMTS.TabIndex = 19
Me.pbxSFMTS.TabStop = False
'
'pbxSFIPTS
'
Me.pbxSFIPTS.AccessibleRol e = System.Windows.Forms.Acces sibleRole. None
Me.pbxSFIPTS.Anchor = CType(((System.Windows.For ms.AnchorS tyles.Bott om Or System.Windows.Forms.Ancho rStyles.Le ft) _
Or System.Windows.Forms.Ancho rStyles.Ri ght), System.Windows.Forms.Ancho rStyles)
Me.pbxSFIPTS.Image = CType(resources.GetObject( "pbxSFIPTS .Image"), System.Drawing.Image)
Me.pbxSFIPTS.Location = New System.Drawing.Point(4, 32)
Me.pbxSFIPTS.Name = "pbxSFIPTS"
Me.pbxSFIPTS.Size = New System.Drawing.Size(212, 144)
Me.pbxSFIPTS.SizeMode = System.Windows.Forms.Pictu reBoxSizeM ode.Stretc hImage
Me.pbxSFIPTS.TabIndex = 18
Me.pbxSFIPTS.TabStop = False
'
'Label4
'
Me.Label4.AccessibleRole = System.Windows.Forms.Acces sibleRole. None
Me.Label4.Anchor = CType(((System.Windows.For ms.AnchorS tyles.Top Or System.Windows.Forms.Ancho rStyles.Le ft) _
Or System.Windows.Forms.Ancho rStyles.Ri ght), System.Windows.Forms.Ancho rStyles)
Me.Label4.Font = New System.Drawing.Font("Futur a Bk BT", 9.75!, System.Drawing.FontStyle.B old, System.Drawing.GraphicsUni t.Point, CType(0, Byte))
Me.Label4.Location = New System.Drawing.Point(6, 196)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(208, 26)
Me.Label4.TabIndex = 17
Me.Label4.Text = "Cumulative"
Me.Label4.TextAlign = System.Drawing.ContentAlig nment.Midd leCenter
'
'Label3
'
Me.Label3.AccessibleRole = System.Windows.Forms.Acces sibleRole. None
Me.Label3.Anchor = System.Windows.Forms.Ancho rStyles.To p
Me.Label3.Font = New System.Drawing.Font("Futur a Bk BT", 9.75!, System.Drawing.FontStyle.B old, System.Drawing.GraphicsUni t.Point, CType(0, Byte))
Me.Label3.Location = New System.Drawing.Point(220, 0)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(212, 24)
Me.Label3.TabIndex = 16
Me.Label3.Text = "Monthly Time Series"
Me.Label3.TextAlign = System.Drawing.ContentAlig nment.Midd leCenter
'
'Label2
'
Me.Label2.AccessibleRole = System.Windows.Forms.Acces sibleRole. None
Me.Label2.Anchor = System.Windows.Forms.Ancho rStyles.To p
Me.Label2.Font = New System.Drawing.Font("Futur a Bk BT", 9.75!, System.Drawing.FontStyle.B old, System.Drawing.GraphicsUni t.Point, CType(0, Byte))
Me.Label2.Location = New System.Drawing.Point(4, 0)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(212, 24)
Me.Label2.TabIndex = 15
Me.Label2.Text = "Integration Period Time Series"
Me.Label2.TextAlign = System.Drawing.ContentAlig nment.Midd leCenter
'
'btnStreamflowNext
'
Me.btnStreamflowNext.Acces sibleRole = System.Windows.Forms.Acces sibleRole. None
Me.btnStreamflowNext.Ancho r = CType((System.Windows.Form s.AnchorSt yles.Botto m Or System.Windows.Forms.Ancho rStyles.Ri ght), System.Windows.Forms.Ancho rStyles)
Me.btnStreamflowNext.Font = New System.Drawing.Font("Futur a Bk BT", 9.75!, System.Drawing.FontStyle.R egular, System.Drawing.GraphicsUni t.Point, CType(0, Byte))
Me.btnStreamflowNext.Locat ion = New System.Drawing.Point(222, 382)
Me.btnStreamflowNext.Name = "btnStreamflowNext"
Me.btnStreamflowNext.Size = New System.Drawing.Size(208, 24)
Me.btnStreamflowNext.TabIn dex = 13
Me.btnStreamflowNext.Text = "Next Streamflow"
'
'btnStreamflowPrevious
'
Me.btnStreamflowPrevious.A ccessibleR ole = System.Windows.Forms.Acces sibleRole. None
Me.btnStreamflowPrevious.A nchor = CType((System.Windows.Form s.AnchorSt yles.Botto m Or System.Windows.Forms.Ancho rStyles.Le ft), System.Windows.Forms.Ancho rStyles)
Me.btnStreamflowPrevious.F ont = New System.Drawing.Font("Futur a Bk BT", 9.75!, System.Drawing.FontStyle.R egular, System.Drawing.GraphicsUni t.Point, CType(0, Byte))
Me.btnStreamflowPrevious.L ocation = New System.Drawing.Point(6, 382)
Me.btnStreamflowPrevious.N ame = "btnStreamflowPrevious"
Me.btnStreamflowPrevious.S ize = New System.Drawing.Size(208, 24)
Me.btnStreamflowPrevious.T abIndex = 12
Me.btnStreamflowPrevious.T ext = "Previous Streamflow"
'
'frmMainMenu
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(632, 451)
Me.Controls.Add(Me.Panel1)
Me.Controls.Add(Me.lblDesc riptor)
Me.Controls.Add(Me.Button3 )
Me.Controls.Add(Me.Button2 )
Me.Controls.Add(Me.Button1 )
Me.Controls.Add(Me.Checked ListBox1)
Me.Controls.Add(Me.ComboBo x1)
Me.Controls.Add(Me.lblData Type)
Me.Controls.Add(Me.sbrStat usBar)
Me.Icon = CType(resources.GetObject( "$this.Ico n"), System.Drawing.Icon)
Me.Name = "frmMainMenu"
Me.Text = "Tampa Bay Water Hydrology Data Display"
Me.WindowState = System.Windows.Forms.FormW indowState .Maximized
Me.Panel1.ResumeLayout(Fal se)
Me.ResumeLayout(False)
End Sub
#End Region
Private Sub MenuItem3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem3.Click
End Sub
Private Sub MenuItem6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem6.Click
End 'Quit the application
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
End 'Quit the application
End Sub
End Class
Data Display.
I've tried this with a panel and a group box, but still can't get these to resize correctly. At 640 x 480, the panel/group box were both 438 x 420. The picture boxes are as follows: Top left 212 x 144, top right 212 x 144, bottom left 212 x 144, bottom middle 102 x 144, bottom right 102 x 144. Each picture box has a centered label on top of them (labels are 24 pixels tall) At the bottom of the panel are two buttons, which are used to navigate back and forth between selcted water sources. I have tried every possible anchor combination available. No matter which is selected, the pictures do not resize proportionally. Either the labels vanish, the buttons overlap each other, or one picture box in particular expands to fill the entire panel.
What, if anything, am I doing wrong here, and how in the world can I get the picture boxes on this form to match the size of the screen?
Currently, the only button that I have functioning is the quit button. I really need to nail down the resizing before anything else can be done with the application.
Code behind the form:
Public Class frmMainMenu
Inherits System.Windows.Forms.Form
#Region " Windows Form Designer generated code "
Public Sub New()
MyBase.New()
'This call is required by the Windows Form Designer.
InitializeComponent()
'Add any initialization after the InitializeComponent() call
End Sub
'Form overrides dispose to clean up the component list.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
'Required by the Windows Form Designer
Private components As System.ComponentModel.ICon
'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
Friend WithEvents MainMenu1 As System.Windows.Forms.MainM
Friend WithEvents sbrStatusBar As System.Windows.Forms.Statu
Friend WithEvents MenuItem1 As System.Windows.Forms.MenuI
Friend WithEvents MenuItem2 As System.Windows.Forms.MenuI
Friend WithEvents MenuItem3 As System.Windows.Forms.MenuI
Friend WithEvents MenuItem4 As System.Windows.Forms.MenuI
Friend WithEvents MenuItem5 As System.Windows.Forms.MenuI
Friend WithEvents MenuItem6 As System.Windows.Forms.MenuI
Friend WithEvents MenuItem7 As System.Windows.Forms.MenuI
Friend WithEvents MenuItem8 As System.Windows.Forms.MenuI
Friend WithEvents lblDataType As System.Windows.Forms.Label
Friend WithEvents ComboBox1 As System.Windows.Forms.Combo
Friend WithEvents CheckedListBox1 As System.Windows.Forms.Check
Friend WithEvents Button1 As System.Windows.Forms.Butto
Friend WithEvents Button2 As System.Windows.Forms.Butto
Friend WithEvents Button3 As System.Windows.Forms.Butto
Friend WithEvents lblDescriptor As System.Windows.Forms.Label
Friend WithEvents Panel1 As System.Windows.Forms.Panel
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents Label5 As System.Windows.Forms.Label
Friend WithEvents pbxSFCLT As System.Windows.Forms.Pictu
Friend WithEvents pbxSFMTS As System.Windows.Forms.Pictu
Friend WithEvents pbxSFIPTS As System.Windows.Forms.Pictu
Friend WithEvents Label4 As System.Windows.Forms.Label
Friend WithEvents Label3 As System.Windows.Forms.Label
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents btnStreamflowNext As System.Windows.Forms.Butto
Friend WithEvents btnStreamflowPrevious As System.Windows.Forms.Butto
Friend WithEvents pbxFlowDuration As System.Windows.Forms.Pictu
Friend WithEvents pbxSeasonal As System.Windows.Forms.Pictu
<System.Diagnostics.Debugg
Dim resources As System.Resources.ResourceM
Me.MainMenu1 = New System.Windows.Forms.MainM
Me.MenuItem1 = New System.Windows.Forms.MenuI
Me.MenuItem3 = New System.Windows.Forms.MenuI
Me.MenuItem4 = New System.Windows.Forms.MenuI
Me.MenuItem5 = New System.Windows.Forms.MenuI
Me.MenuItem6 = New System.Windows.Forms.MenuI
Me.MenuItem7 = New System.Windows.Forms.MenuI
Me.MenuItem8 = New System.Windows.Forms.MenuI
Me.MenuItem2 = New System.Windows.Forms.MenuI
Me.sbrStatusBar = New System.Windows.Forms.Statu
Me.lblDataType = New System.Windows.Forms.Label
Me.ComboBox1 = New System.Windows.Forms.Combo
Me.CheckedListBox1 = New System.Windows.Forms.Check
Me.Button1 = New System.Windows.Forms.Butto
Me.Button2 = New System.Windows.Forms.Butto
Me.Button3 = New System.Windows.Forms.Butto
Me.lblDescriptor = New System.Windows.Forms.Label
Me.Panel1 = New System.Windows.Forms.Panel
Me.Label1 = New System.Windows.Forms.Label
Me.pbxFlowDuration = New System.Windows.Forms.Pictu
Me.pbxSeasonal = New System.Windows.Forms.Pictu
Me.Label5 = New System.Windows.Forms.Label
Me.pbxSFCLT = New System.Windows.Forms.Pictu
Me.pbxSFMTS = New System.Windows.Forms.Pictu
Me.pbxSFIPTS = New System.Windows.Forms.Pictu
Me.Label4 = New System.Windows.Forms.Label
Me.Label3 = New System.Windows.Forms.Label
Me.Label2 = New System.Windows.Forms.Label
Me.btnStreamflowNext = New System.Windows.Forms.Butto
Me.btnStreamflowPrevious = New System.Windows.Forms.Butto
Me.Panel1.SuspendLayout()
Me.SuspendLayout()
'
'MainMenu1
'
Me.MainMenu1.MenuItems.Add
'
'MenuItem1
'
Me.MenuItem1.Index = 0
Me.MenuItem1.MenuItems.Add
Me.MenuItem1.Text = "File"
'
'MenuItem3
'
Me.MenuItem3.Index = 0
Me.MenuItem3.MenuItems.Add
Me.MenuItem3.Text = "Export"
'
'MenuItem4
'
Me.MenuItem4.Index = 0
Me.MenuItem4.Text = "To Word Document"
'
'MenuItem5
'
Me.MenuItem5.Index = 1
Me.MenuItem5.Text = "To PowerPoint Presentation"
'
'MenuItem6
'
Me.MenuItem6.Index = 1
Me.MenuItem6.Text = "Quit"
'
'MenuItem7
'
Me.MenuItem7.Index = 1
Me.MenuItem7.MenuItems.Add
Me.MenuItem7.Text = "Interface"
'
'MenuItem8
'
Me.MenuItem8.Index = 0
Me.MenuItem8.Text = "New Comparison"
'
'MenuItem2
'
Me.MenuItem2.Index = 2
Me.MenuItem2.Text = "Help"
'
'sbrStatusBar
'
Me.sbrStatusBar.Location = New System.Drawing.Point(0, 429)
Me.sbrStatusBar.Name = "sbrStatusBar"
Me.sbrStatusBar.Size = New System.Drawing.Size(632, 22)
Me.sbrStatusBar.TabIndex = 0
'
'lblDataType
'
Me.lblDataType.Font = New System.Drawing.Font("Futur
Me.lblDataType.Location = New System.Drawing.Point(8, 8)
Me.lblDataType.Name = "lblDataType"
Me.lblDataType.Size = New System.Drawing.Size(176, 23)
Me.lblDataType.TabIndex = 2
Me.lblDataType.Text = "Data Type to Display"
Me.lblDataType.TextAlign = System.Drawing.ContentAlig
'
'ComboBox1
'
Me.ComboBox1.Anchor = CType(((System.Windows.For
Or System.Windows.Forms.Ancho
Me.ComboBox1.Font = New System.Drawing.Font("Futur
Me.ComboBox1.Items.AddRang
Me.ComboBox1.Location = New System.Drawing.Point(8, 40)
Me.ComboBox1.Name = "ComboBox1"
Me.ComboBox1.Size = New System.Drawing.Size(176, 24)
Me.ComboBox1.TabIndex = 3
Me.ComboBox1.Text = "Select Data Type"
'
'CheckedListBox1
'
Me.CheckedListBox1.Anchor = CType(((System.Windows.For
Or System.Windows.Forms.Ancho
Me.CheckedListBox1.Font = New System.Drawing.Font("Futur
Me.CheckedListBox1.Locatio
Me.CheckedListBox1.Name = "CheckedListBox1"
Me.CheckedListBox1.Size = New System.Drawing.Size(176, 202)
Me.CheckedListBox1.TabInde
'
'Button1
'
Me.Button1.Anchor = CType((System.Windows.Form
Me.Button1.Font = New System.Drawing.Font("Futur
Me.Button1.Location = New System.Drawing.Point(8, 368)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(176, 24)
Me.Button1.TabIndex = 5
Me.Button1.Text = "Clear Data Display"
'
'Button2
'
Me.Button2.Anchor = CType((System.Windows.Form
Me.Button2.Font = New System.Drawing.Font("Futur
Me.Button2.Location = New System.Drawing.Point(8, 336)
Me.Button2.Name = "Button2"
Me.Button2.Size = New System.Drawing.Size(176, 24)
Me.Button2.TabIndex = 6
Me.Button2.Text = "Display Graphs"
'
'Button3
'
Me.Button3.Anchor = CType((System.Windows.Form
Me.Button3.Font = New System.Drawing.Font("Futur
Me.Button3.Location = New System.Drawing.Point(8, 400)
Me.Button3.Name = "Button3"
Me.Button3.Size = New System.Drawing.Size(176, 24)
Me.Button3.TabIndex = 7
Me.Button3.Text = "Quit"
'
'lblDescriptor
'
Me.lblDescriptor.BorderSty
Me.lblDescriptor.Font = New System.Drawing.Font("Futur
Me.lblDescriptor.Location = New System.Drawing.Point(8, 72)
Me.lblDescriptor.Name = "lblDescriptor"
Me.lblDescriptor.Size = New System.Drawing.Size(176, 40)
Me.lblDescriptor.TabIndex = 8
'
'Panel1
'
Me.Panel1.Anchor = CType((((System.Windows.Fo
Or System.Windows.Forms.Ancho
Or System.Windows.Forms.Ancho
Me.Panel1.BorderStyle = System.Windows.Forms.Borde
Me.Panel1.Controls.Add(Me.
Me.Panel1.Controls.Add(Me.
Me.Panel1.Controls.Add(Me.
Me.Panel1.Controls.Add(Me.
Me.Panel1.Controls.Add(Me.
Me.Panel1.Controls.Add(Me.
Me.Panel1.Controls.Add(Me.
Me.Panel1.Controls.Add(Me.
Me.Panel1.Controls.Add(Me.
Me.Panel1.Controls.Add(Me.
Me.Panel1.Controls.Add(Me.
Me.Panel1.Controls.Add(Me.
Me.Panel1.Location = New System.Drawing.Point(192, 4)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(438, 420)
Me.Panel1.TabIndex = 9
'
'Label1
'
Me.Label1.AccessibleRole = System.Windows.Forms.Acces
Me.Label1.Anchor = CType((System.Windows.Form
Me.Label1.BorderStyle = System.Windows.Forms.Borde
Me.Label1.Location = New System.Drawing.Point(217, 12)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(1, 362)
Me.Label1.TabIndex = 14
Me.Label1.Text = "Label1"
'
'pbxFlowDuration
'
Me.pbxFlowDuration.Accessi
Me.pbxFlowDuration.Anchor = CType(((System.Windows.For
Or System.Windows.Forms.Ancho
Me.pbxFlowDuration.Image = CType(resources.GetObject(
Me.pbxFlowDuration.Locatio
Me.pbxFlowDuration.Name = "pbxFlowDuration"
Me.pbxFlowDuration.Size = New System.Drawing.Size(102, 144)
Me.pbxFlowDuration.SizeMod
Me.pbxFlowDuration.TabInde
Me.pbxFlowDuration.TabStop
'
'pbxSeasonal
'
Me.pbxSeasonal.AccessibleR
Me.pbxSeasonal.Anchor = CType(((System.Windows.For
Or System.Windows.Forms.Ancho
Me.pbxSeasonal.Image = CType(resources.GetObject(
Me.pbxSeasonal.Location = New System.Drawing.Point(222, 229)
Me.pbxSeasonal.Name = "pbxSeasonal"
Me.pbxSeasonal.Size = New System.Drawing.Size(102, 144)
Me.pbxSeasonal.SizeMode = System.Windows.Forms.Pictu
Me.pbxSeasonal.TabIndex = 22
Me.pbxSeasonal.TabStop = False
'
'Label5
'
Me.Label5.AccessibleRole = System.Windows.Forms.Acces
Me.Label5.Anchor = CType(((System.Windows.For
Or System.Windows.Forms.Ancho
Me.Label5.Font = New System.Drawing.Font("Futur
Me.Label5.Location = New System.Drawing.Point(222, 196)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(208, 26)
Me.Label5.TabIndex = 21
Me.Label5.Text = "Seasonal Discharge and Flow Duration"
Me.Label5.TextAlign = System.Drawing.ContentAlig
'
'pbxSFCLT
'
Me.pbxSFCLT.AccessibleRole
Me.pbxSFCLT.Anchor = CType((((System.Windows.Fo
Or System.Windows.Forms.Ancho
Or System.Windows.Forms.Ancho
Me.pbxSFCLT.Image = CType(resources.GetObject(
Me.pbxSFCLT.Location = New System.Drawing.Point(4, 220)
Me.pbxSFCLT.Name = "pbxSFCLT"
Me.pbxSFCLT.Size = New System.Drawing.Size(212, 146)
Me.pbxSFCLT.SizeMode = System.Windows.Forms.Pictu
Me.pbxSFCLT.TabIndex = 20
Me.pbxSFCLT.TabStop = False
'
'pbxSFMTS
'
Me.pbxSFMTS.AccessibleRole
Me.pbxSFMTS.Anchor = CType(((System.Windows.For
Or System.Windows.Forms.Ancho
Me.pbxSFMTS.Image = CType(resources.GetObject(
Me.pbxSFMTS.Location = New System.Drawing.Point(220, 32)
Me.pbxSFMTS.Name = "pbxSFMTS"
Me.pbxSFMTS.Size = New System.Drawing.Size(212, 144)
Me.pbxSFMTS.SizeMode = System.Windows.Forms.Pictu
Me.pbxSFMTS.TabIndex = 19
Me.pbxSFMTS.TabStop = False
'
'pbxSFIPTS
'
Me.pbxSFIPTS.AccessibleRol
Me.pbxSFIPTS.Anchor = CType(((System.Windows.For
Or System.Windows.Forms.Ancho
Me.pbxSFIPTS.Image = CType(resources.GetObject(
Me.pbxSFIPTS.Location = New System.Drawing.Point(4, 32)
Me.pbxSFIPTS.Name = "pbxSFIPTS"
Me.pbxSFIPTS.Size = New System.Drawing.Size(212, 144)
Me.pbxSFIPTS.SizeMode = System.Windows.Forms.Pictu
Me.pbxSFIPTS.TabIndex = 18
Me.pbxSFIPTS.TabStop = False
'
'Label4
'
Me.Label4.AccessibleRole = System.Windows.Forms.Acces
Me.Label4.Anchor = CType(((System.Windows.For
Or System.Windows.Forms.Ancho
Me.Label4.Font = New System.Drawing.Font("Futur
Me.Label4.Location = New System.Drawing.Point(6, 196)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(208, 26)
Me.Label4.TabIndex = 17
Me.Label4.Text = "Cumulative"
Me.Label4.TextAlign = System.Drawing.ContentAlig
'
'Label3
'
Me.Label3.AccessibleRole = System.Windows.Forms.Acces
Me.Label3.Anchor = System.Windows.Forms.Ancho
Me.Label3.Font = New System.Drawing.Font("Futur
Me.Label3.Location = New System.Drawing.Point(220, 0)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(212, 24)
Me.Label3.TabIndex = 16
Me.Label3.Text = "Monthly Time Series"
Me.Label3.TextAlign = System.Drawing.ContentAlig
'
'Label2
'
Me.Label2.AccessibleRole = System.Windows.Forms.Acces
Me.Label2.Anchor = System.Windows.Forms.Ancho
Me.Label2.Font = New System.Drawing.Font("Futur
Me.Label2.Location = New System.Drawing.Point(4, 0)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(212, 24)
Me.Label2.TabIndex = 15
Me.Label2.Text = "Integration Period Time Series"
Me.Label2.TextAlign = System.Drawing.ContentAlig
'
'btnStreamflowNext
'
Me.btnStreamflowNext.Acces
Me.btnStreamflowNext.Ancho
Me.btnStreamflowNext.Font = New System.Drawing.Font("Futur
Me.btnStreamflowNext.Locat
Me.btnStreamflowNext.Name = "btnStreamflowNext"
Me.btnStreamflowNext.Size = New System.Drawing.Size(208, 24)
Me.btnStreamflowNext.TabIn
Me.btnStreamflowNext.Text = "Next Streamflow"
'
'btnStreamflowPrevious
'
Me.btnStreamflowPrevious.A
Me.btnStreamflowPrevious.A
Me.btnStreamflowPrevious.F
Me.btnStreamflowPrevious.L
Me.btnStreamflowPrevious.N
Me.btnStreamflowPrevious.S
Me.btnStreamflowPrevious.T
Me.btnStreamflowPrevious.T
'
'frmMainMenu
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(632, 451)
Me.Controls.Add(Me.Panel1)
Me.Controls.Add(Me.lblDesc
Me.Controls.Add(Me.Button3
Me.Controls.Add(Me.Button2
Me.Controls.Add(Me.Button1
Me.Controls.Add(Me.Checked
Me.Controls.Add(Me.ComboBo
Me.Controls.Add(Me.lblData
Me.Controls.Add(Me.sbrStat
Me.Icon = CType(resources.GetObject(
Me.Name = "frmMainMenu"
Me.Text = "Tampa Bay Water Hydrology Data Display"
Me.WindowState = System.Windows.Forms.FormW
Me.Panel1.ResumeLayout(Fal
Me.ResumeLayout(False)
End Sub
#End Region
Private Sub MenuItem3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem3.Click
End Sub
Private Sub MenuItem6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem6.Click
End 'Quit the application
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
End 'Quit the application
End Sub
End Class
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Hey Bob,
Basically he has a Panel that resizes to fill the right half of the form via Anchoring. Inside that Panel are four quardrants. Each quadrant has a label and a picturebox, except the bottom right quadrant, which has two pictureboxes that are side by side instead of just one. Across the bottom of the panel are two buttons. The Panel basically looks like this:
+------------------------- ---+
| Label Label |
| +----------+ +----------+ |
| | || | |
| +----------+ +----------+ |
| Label Label |
| +----------+ +---+ +---+ |
| | || | | | |
| +----------+ +---+ +---+ |
| Button Button |
+------------------------- ---+
So what GreyRandall wants is that with the exception of the buttons across the bottom, the panel is divided equally into four quadrants and the pictureboxes resize to fill their respective quardrants as the form (and consequently the panel) is resized.
I don't think you can accomplish that kind of behaviour with just anchoring/docking alone, since anchoring strives to maintain a distance from edges and not a percentage of a container.
There is probably a more efficient way to do it via code than mine however. =)
~IM
Basically he has a Panel that resizes to fill the right half of the form via Anchoring. Inside that Panel are four quardrants. Each quadrant has a label and a picturebox, except the bottom right quadrant, which has two pictureboxes that are side by side instead of just one. Across the bottom of the panel are two buttons. The Panel basically looks like this:
+-------------------------
| Label Label |
| +----------+ +----------+ |
| | || | |
| +----------+ +----------+ |
| Label Label |
| +----------+ +---+ +---+ |
| | || | | | |
| +----------+ +---+ +---+ |
| Button Button |
+-------------------------
So what GreyRandall wants is that with the exception of the buttons across the bottom, the panel is divided equally into four quadrants and the pictureboxes resize to fill their respective quardrants as the form (and consequently the panel) is resized.
I don't think you can accomplish that kind of behaviour with just anchoring/docking alone, since anchoring strives to maintain a distance from edges and not a percentage of a container.
There is probably a more efficient way to do it via code than mine however. =)
~IM
Wow, Mike, you really have a lot of time on your hands! A picture is worth a couple of thousand words. I didn't catch all that in the noise that the code was producing. I admittedly didn't run it, though, so it was a touch more difficult to decipher. Thanks for clearing that up.
Bob
Bob
Your welcome...and yes I have alot of time on my hands. Remember I'm a stay@home dad. =)
Pretty sure I interpreted what GreyRandall wanted correctly...but if I'm wrong it wouldn't be the first time. ;)
BTW, you start that new job yet?
Mike
Pretty sure I interpreted what GreyRandall wanted correctly...but if I'm wrong it wouldn't be the first time. ;)
BTW, you start that new job yet?
Mike
Bob