ApplicationEvents - StartupNextInstance Issue????

[=?Utf-8?B?ZG90bmV0bWU=?=]

VB.net (VS 2005)

I have an application using single instance setting in "My Project", Having
some issuses with code I put in "StartupNextInstance" in
"ApplicationEvents"... What works is if I minimize the running application
and then try to start a 2nd instance of the application if it will restore
the minimized running application instead of loading a 2nd instance,Perfect
works as planned!! (code below)

But what doesn't work is if I add code to hide the application and put it in
the taskbar and the try to start a 2nd instance of the application it still
does't allow the 2nd instance but it fails(nothing happens, no errors) to
restore the application to the desktop and give it focus. is this because I
hide the window when it is minimized??? I would like to keep it in the
taskbar is there a solution to make it work? (code below)

Thanks for your help in advance....

dotnetme

'~~~~~~~~~~~~~~~~~~~~
'"ApplicationEvents"
Private Sub MyApplication_StartupNextInstance(ByVal sender As Object, ByVal
e As Microsoft.VisualBasic.ApplicationServices.StartupN extInstanceEventArgs)
Handles Me.StartupNextInstance

Dim RunningProcesses As Process() =
Process.GetProcessesByName("Single Instance")
' SW_HIDE = 0
' SW_SHOWNORMAL = 1
' SW_NORMAL = 1
' SW_SHOWMINIMIZED = 2
' SW_SHOWMAXIMIZED = 3
' SW_MAXIMIZE = 3
' SW_SHOWNOACTIVATE = 4
' SW_SHOW = 5
' SW_MINIMIZE = 6
' SW_SHOWMINNOACTIVE = 7
' SW_SHOWNA = 8
' SW_RESTORE = 9
' SW_SHOWDEFAULT = 10
' SW_FORCEMINIMIZE = 11
' SW_MAX = 11
If (RunningProcesses.Length 1) Then

ShowWindowAsync(RunningProcesses(0).MainWindowHand le, 1)

ShowWindowAsync(RunningProcesses(0).MainWindowHand le, 9)

End If

End Sub
'~~~~~~~~~~~~~~~~~~~~~~

'"Form1" - hide window and put in taskbar
Private Sub Form1_Resize(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.Resize
If (Me.WindowState = FormWindowState.Minimized) Then
Me.Hide()
taskbar1.Visible = True
taskbar1.Text = "Single Instance"
End If
End Sub

[=?Utf-8?B?ZG90bmV0bWU=?=]

When I say Taskbar I really mean System tray in the task bar...

"dotnetme" wrote:

VB.net (VS 2005)

I have an application using single instance setting in "My Project", Having
some issuses with code I put in "StartupNextInstance" in
"ApplicationEvents"... What works is if I minimize the running application
and then try to start a 2nd instance of the application if it will restore
the minimized running application instead of loading a 2nd instance,Perfect
works as planned!! (code below)

But what doesn't work is if I add code to hide the application and put it in
the taskbar and the try to start a 2nd instance of the application it still
does't allow the 2nd instance but it fails(nothing happens, no errors) to
restore the application to the desktop and give it focus. is this because I
hide the window when it is minimized??? I would like to keep it in the
taskbar is there a solution to make it work? (code below)

Thanks for your help in advance....

dotnetme

'~~~~~~~~~~~~~~~~~~~~
'"ApplicationEvents"
Private Sub MyApplication_StartupNextInstance(ByVal sender As Object, ByVal
e As Microsoft.VisualBasic.ApplicationServices.StartupN extInstanceEventArgs)
Handles Me.StartupNextInstance

Dim RunningProcesses As Process() =
Process.GetProcessesByName("Single Instance")
' SW_HIDE = 0
' SW_SHOWNORMAL = 1
' SW_NORMAL = 1
' SW_SHOWMINIMIZED = 2
' SW_SHOWMAXIMIZED = 3
' SW_MAXIMIZE = 3
' SW_SHOWNOACTIVATE = 4
' SW_SHOW = 5
' SW_MINIMIZE = 6
' SW_SHOWMINNOACTIVE = 7
' SW_SHOWNA = 8
' SW_RESTORE = 9
' SW_SHOWDEFAULT = 10
' SW_FORCEMINIMIZE = 11
' SW_MAX = 11
If (RunningProcesses.Length 1) Then

ShowWindowAsync(RunningProcesses(0).MainWindowHand le, 1)

ShowWindowAsync(RunningProcesses(0).MainWindowHand le, 9)

End If

End Sub
'~~~~~~~~~~~~~~~~~~~~~~

'"Form1" - hide window and put in taskbar
Private Sub Form1_Resize(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.Resize
If (Me.WindowState = FormWindowState.Minimized) Then
Me.Hide()
taskbar1.Visible = True
taskbar1.Text = "Single Instance"
End If
End Sub

[Bill McCarthy]

Hi,

The StartupNextInstance event occurs in your original application, at which
point you can use My.Forms.... etc.

"dotnetme" <do******@discussions.microsoft.comwrote in message
news:49**********************************@microsof t.com...

VB.net (VS 2005)

I have an application using single instance setting in "My Project",
Having
some issuses with code I put in "StartupNextInstance" in
"ApplicationEvents"... What works is if I minimize the running
application
and then try to start a 2nd instance of the application if it will restore
the minimized running application instead of loading a 2nd
instance,Perfect
works as planned!! (code below)

But what doesn't work is if I add code to hide the application and put it
in
the taskbar and the try to start a 2nd instance of the application it
still
does't allow the 2nd instance but it fails(nothing happens, no errors) to
restore the application to the desktop and give it focus. is this because
I
hide the window when it is minimized??? I would like to keep it in the
taskbar is there a solution to make it work? (code below)

Thanks for your help in advance....

dotnetme

'~~~~~~~~~~~~~~~~~~~~
'"ApplicationEvents"
Private Sub MyApplication_StartupNextInstance(ByVal sender As Object,
ByVal
e As
Microsoft.VisualBasic.ApplicationServices.StartupN extInstanceEventArgs)
Handles Me.StartupNextInstance

Dim RunningProcesses As Process() =
Process.GetProcessesByName("Single Instance")
' SW_HIDE = 0
' SW_SHOWNORMAL = 1
' SW_NORMAL = 1
' SW_SHOWMINIMIZED = 2
' SW_SHOWMAXIMIZED = 3
' SW_MAXIMIZE = 3
' SW_SHOWNOACTIVATE = 4
' SW_SHOW = 5
' SW_MINIMIZE = 6
' SW_SHOWMINNOACTIVE = 7
' SW_SHOWNA = 8
' SW_RESTORE = 9
' SW_SHOWDEFAULT = 10
' SW_FORCEMINIMIZE = 11
' SW_MAX = 11
If (RunningProcesses.Length 1) Then

ShowWindowAsync(RunningProcesses(0).MainWindowHand le, 1)

ShowWindowAsync(RunningProcesses(0).MainWindowHand le, 9)

End If

End Sub
'~~~~~~~~~~~~~~~~~~~~~~

'"Form1" - hide window and put in taskbar
Private Sub Form1_Resize(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.Resize
If (Me.WindowState = FormWindowState.Minimized) Then
Me.Hide()
taskbar1.Visible = True
taskbar1.Text = "Single Instance"
End If
End Sub

[=?Utf-8?B?ZG90bmV0bWU=?=]

Ohhh Very cool... I didn't realize that... dam that makes it easy... I
like this feature!

dotnetme

"Bill McCarthy" wrote:

Hi,

The StartupNextInstance event occurs in your original application, at which
point you can use My.Forms.... etc.

"dotnetme" <do******@discussions.microsoft.comwrote in message
news:49**********************************@microsof t.com...

VB.net (VS 2005)

I have an application using single instance setting in "My Project",
Having
some issuses with code I put in "StartupNextInstance" in
"ApplicationEvents"... What works is if I minimize the running
application
and then try to start a 2nd instance of the application if it will restore
the minimized running application instead of loading a 2nd
instance,Perfect
works as planned!! (code below)

But what doesn't work is if I add code to hide the application and put it
in
the taskbar and the try to start a 2nd instance of the application it
still
does't allow the 2nd instance but it fails(nothing happens, no errors) to
restore the application to the desktop and give it focus. is this because
I
hide the window when it is minimized??? I would like to keep it in the
taskbar is there a solution to make it work? (code below)

Thanks for your help in advance....

dotnetme

'~~~~~~~~~~~~~~~~~~~~
'"ApplicationEvents"
Private Sub MyApplication_StartupNextInstance(ByVal sender As Object,
ByVal
e As
Microsoft.VisualBasic.ApplicationServices.StartupN extInstanceEventArgs)
Handles Me.StartupNextInstance

Dim RunningProcesses As Process() =
Process.GetProcessesByName("Single Instance")
' SW_HIDE = 0
' SW_SHOWNORMAL = 1
' SW_NORMAL = 1
' SW_SHOWMINIMIZED = 2
' SW_SHOWMAXIMIZED = 3
' SW_MAXIMIZE = 3
' SW_SHOWNOACTIVATE = 4
' SW_SHOW = 5
' SW_MINIMIZE = 6
' SW_SHOWMINNOACTIVE = 7
' SW_SHOWNA = 8
' SW_RESTORE = 9
' SW_SHOWDEFAULT = 10
' SW_FORCEMINIMIZE = 11
' SW_MAX = 11
If (RunningProcesses.Length 1) Then

ShowWindowAsync(RunningProcesses(0).MainWindowHand le, 1)

ShowWindowAsync(RunningProcesses(0).MainWindowHand le, 9)

End If

End Sub
'~~~~~~~~~~~~~~~~~~~~~~

'"Form1" - hide window and put in taskbar
Private Sub Form1_Resize(ByVal sender As Object, ByVal e As
System.EventArgs) Handles Me.Resize
If (Me.WindowState = FormWindowState.Minimized) Then
Me.Hide()
taskbar1.Visible = True
taskbar1.Text = "Single Instance"
End If
End Sub

[dgk]

On Thu, 17 Jan 2008 19:59:44 +1100, "Bill McCarthy" <Bi**@NOSPAM.com>
wrote:

>Hi,

The StartupNextInstance event occurs in your original application, at which
point you can use My.Forms.... etc.

What a coincidence. Some guy named Bill McCarthy had an article on why
not to use the built-in single instance checkbox:

http://www1.visualstudiomagazine.com...torialsid=2331
Great stuff in there on named pipes.

[Bill McCarthy]

"dgk" <dg*@somewhere.comwrote in message
news:rs********************************@4ax.com...

On Thu, 17 Jan 2008 19:59:44 +1100, "Bill McCarthy" <Bi**@NOSPAM.com>
wrote:

>>Hi,

The StartupNextInstance event occurs in your original application, at
which
point you can use My.Forms.... etc.

What a coincidence. Some guy named Bill McCarthy had an article on why
not to use the built-in single instance checkbox:

http://www1.visualstudiomagazine.com...torialsid=2331
Great stuff in there on named pipes.

Thanks :)

[=?Utf-8?B?ZG90bmV0bWU=?=]

Thanks for the tip on Bills article, I saw an article similar on another
site... but my application is small and it runs on a users local machine,
not on a server and not remoting... really if they open more then one it
will not harm anything but I felt it looks better then having multiples open
or poping up a msgbox saying it is aready running, plus it was a good
learning experince for me... it is much cleaner now that it is a single
instance... I will consider try to get the changes Bills sugguest for 2005
to run for a learning experince as well... I enjoy it...

Thanks

"dgk" wrote:

On Thu, 17 Jan 2008 19:59:44 +1100, "Bill McCarthy" <Bi**@NOSPAM.com>
wrote:

Hi,

The StartupNextInstance event occurs in your original application, at which
point you can use My.Forms.... etc.

What a coincidence. Some guy named Bill McCarthy had an article on why
not to use the built-in single instance checkbox:

http://www1.visualstudiomagazine.com...torialsid=2331
Great stuff in there on named pipes.