Preventing new form from stealing focus

[M O J O]

Hi,

I need to create a popup form what will not steal focus. I've searched
the net and I managed to put some code together.

Below is the result of my code, but I have a single question .... how
can I prevent form2 to show in taskbar? I've tried to set the
ShowInTaskBar to false, but then an exception is thrown.

Here's my code:

Form1 (master form):

Private Sub Button1_Click(B yVal sender As System.Object, ByVal e
As_
System.EventArg s) Handles Button1.Click
Dim frm2 As New Form2
frm2.Show()
End Sub

Form2 (popup form):

Protected Overrides ReadOnly Property CreateParams() As_
System.Windows. Forms.CreatePar ams
Get
Dim cp As CreateParams = MyBase.CreatePa rams
cp.Style = cp.Style Or &H56000000
Return cp
End Get
End Property

How can I prevent the form to be shown in the taskbar?

Thank you in advance!!

M O J O

[Peter Huang]

Hi Mojo,

I want to make a clarify that the setparent API, is used to set the parent
of a window, not the owner. And I did not make a clear test on my code.

Here is an article about parent and owner of a window.
http://support.dundas.com/Articles/A...?ArticleID=577

It seems that you want to make an app like the combo box.

I think you may try to set the form's style as follows.
Protected Overrides ReadOnly Property CreateParams() As
System.Windows. Forms.CreatePar ams
Get
Dim cp As CreateParams = MyBase.CreatePa rams
cp.Style = cp.Style Or &H40000000
cp.ExStyle = cp.ExStyle Or &H8000000
cp.ExStyle = cp.ExStyle And (Not &H40000)
Return cp
End Get
End Property

I also has sent a sample to you.

If you have any concern on this issue please post here.

Regards,
Peter Huang
Microsoft Online Partner Support
Get Secure! www.microsoft.com/security
This posting is provided "as is" with no warranties and confers no rights.

[M O J O]

Dear Peter,

Than you for your example, but it doesn't work :o( ....

It seams like this line 'cp.Style = cp.Style Or &H40000000' blocks the
listbox, so I cannot chose ane values.

Any ideas??

Thanks again! :o)

M O J O

Peter Huang wrote:

Hi Mojo,

I want to make a clarify that the setparent API, is used to set the parent
of a window, not the owner. And I did not make a clear test on my code.

Here is an article about parent and owner of a window.
http://support.dundas.com/Articles/A...?ArticleID=577

It seems that you want to make an app like the combo box.

I think you may try to set the form's style as follows.
Protected Overrides ReadOnly Property CreateParams() As
System.Windows. Forms.CreatePar ams
Get
Dim cp As CreateParams = MyBase.CreatePa rams
cp.Style = cp.Style Or &H40000000
cp.ExStyle = cp.ExStyle Or &H8000000
cp.ExStyle = cp.ExStyle And (Not &H40000)
Return cp
End Get
End Property

I also has sent a sample to you.

If you have any concern on this issue please post here.

Regards,
Peter Huang
Microsoft Online Partner Support
Get Secure! www.microsoft.com/security
This posting is provided "as is" with no warranties and confers no rights.

[Peter Huang]

Hi Mojo,

You may try to handle the MouseMove and Click event of listbox.

Private Sub ListBox1_MouseM ove(ByVal sender As Object, ByVal e As
System.Windows. Forms.MouseEven tArgs) Handles ListBox1.MouseM ove
ListBox1.Select edIndex = ListBox1.IndexF romPoint(New Point(e.X,
e.Y))
End Sub

Private Sub ListBox1_Click( ByVal sender As Object, ByVal e As
System.EventArg s) Handles ListBox1.Click
Console.WriteLi ne(ListBox1.Sel ectedItem)
End Sub

Since the ListBox can not get focus, the stuff should be down by yourself.

Regards,
Peter Huang
Microsoft Online Partner Support
Get Secure! www.microsoft.com/security
This posting is provided "as is" with no warranties and confers no rights.

[M O J O]

Perfect THANKS!!!!!!!!! !!!!!!!!!!!!!

Have a nice weekend!!!!!

:o)

M O J O

Peter Huang wrote:

Hi Mojo,

You may try to handle the MouseMove and Click event of listbox.

Private Sub ListBox1_MouseM ove(ByVal sender As Object, ByVal e As
System.Windows. Forms.MouseEven tArgs) Handles ListBox1.MouseM ove
ListBox1.Select edIndex = ListBox1.IndexF romPoint(New Point(e.X,
e.Y))
End Sub

Private Sub ListBox1_Click( ByVal sender As Object, ByVal e As
System.EventArg s) Handles ListBox1.Click
Console.WriteLi ne(ListBox1.Sel ectedItem)
End Sub

Since the ListBox can not get focus, the stuff should be down by yourself.

Regards,
Peter Huang
Microsoft Online Partner Support
Get Secure! www.microsoft.com/security
This posting is provided "as is" with no warranties and confers no rights.