Al
Please ensure that autoscroll property of the form is set to True.
(This will add scrollbars automatically as soon as SIP is enabled)
Regards,
Bipin Kesharwani
(Developer)
Palewar Techno Solutions
Pocket PC & Mobile Software Development
Nagpur, India
Al
"Bipin_Expert" <bi...@palewar.com> wrote in message
news:1153806831....@b28g2000cwb.googlegroups.com...
MessageBox.Show(Me.Height)
Me.Height = 150
MessageBox.Show(Me.Height)
End Sub
Both Message Boxes produce 268.
I tried to play with Lock and some other properties of the form with no
success.
Al
"Bipin_Expert" <bi...@palewar.com> wrote in message
news:1153806831....@b28g2000cwb.googlegroups.com...
> Hi,
1) Take a Panel and put all the controls of the form on it.
2) Take a scrollbar control (vertical) on form.
3) On SIP EnableChanged event change size of scrollbar as well as panel
, and on Scollbar's ValueChanged event change the Top property of
controls inside the Panel, so when you will scroll down controls will
appear moving up. However this will require some accurate calculations.
I hope you can try this and leave a comment whether it worked.
Private PanelOriginalHeight As Integer
And assign them
PanelOriginalHeight = Panel1.Height ' In Form_Load event
and the second one in InputPanel1_EnabledChanged event:
Private Sub InputPanel1_EnabledChanged(ByVal sender As System.Object, ByVal
e As System.EventArgs) Handles InputPanel1.EnabledChanged
VisibleRect = InputPanel1.VisibleDesktop
If InputPanel1.Enabled = False Then
Panel1.Height = PanelOriginalHeight
Panel1.AutoScroll = False
Else
Panel1.Height = VisibleRect.Height
Panel1.AutoScroll = True
End If
End Sub
That's it. Panel.Locked should be set to false
Al
"Bipin_Expert" <bi...@palewar.com> wrote in message
news:1153890804.2...@m79g2000cwm.googlegroups.com...
"Al" <a...@newsgroups.com> wrote in message
news:eRv4MoNs...@TK2MSFTNGP04.phx.gbl...