By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
455,694 Members | 1,288 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 455,694 IT Pros & Developers. It's quick & easy.

Activate a window to forground using API

P: n/a
I developed this module, examples on the internet seem to be much longer..
Can someone explain to me why my solution doesn't work?

Module modAPI

Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd As Long) As
Long

Public Sub ActivateAppWindow()

SetForegroundWindow(fMain.Handle.ToInt32)

End Sub

End Module
Nov 21 '05 #1
Share this Question
Share on Google+
18 Replies


P: n/a
Hi,

API declare is wrong. Types have changed since vb6. Use integer
instead of long. In this case i would use intptr.

Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd As intptr) As
integer

Public Sub ActivateAppWindow()

SetForegroundWindow(fMain.Handle)

End Sub
Ken
----------------

"D Witherspoon" <dw**********@noway.org> wrote in message
news:un**************@TK2MSFTNGP14.phx.gbl...
I developed this module, examples on the internet seem to be much longer..
Can someone explain to me why my solution doesn't work?

Module modAPI

Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd As Long) As
Long

Public Sub ActivateAppWindow()

SetForegroundWindow(fMain.Handle.ToInt32)

End Sub

End Module

Nov 21 '05 #2

P: n/a
Module Module1
Public Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd As
Integer) As Integer

Public Sub SetForeground(ByVal iHandle As Integer)
SetForegroundWindow(iHandle)
End Sub
End Module

Usage:
-------

SetForeground (frm.Handle.Int32)

'frm' is the Form to set as the foreground window

Example:
---------

Declaration:
------------

Dim frm As New Form2

Behind Button1 (for example):
------------------------------

frm.Show()

Behind Button2 (for example):
------------------------------

SetForeground (frm.Handle.Int32)

Crouchie1998
BA (HONS) MCP MCSE
Nov 21 '05 #3

P: n/a
"Ken Tucker [MVP]" <vb***@bellsouth.net> schrieb:
API declare is wrong. Types have changed since vb6. Use integer
instead of long. In this case i would use intptr.

Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd As intptr)
As
integer

Public Sub ActivateAppWindow()

SetForegroundWindow(fMain.Handle)


Note that this will only work as long as your application is the active
application. Otherwise 'AttachThreadInput' is needed too. In other words,
it's not as easy (and not recommended) to "steal" the focus from another
application.

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>

Nov 21 '05 #4

P: n/a
"Crouchie1998" <cr**********@spamcop.net> schrieb:
Public Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd As
Integer) As Integer


I prefer this declaration/usage, although your code should work:

\\\
Public Declare Function SetForegroundWindow Lib "user32.dll" ( _
ByVal hWnd As IntPtr _
) As Boolean
..
..
..
Dim Success As Boolean = SetForegroundWindow(frm.Handle)
///

Just my 2 Euro cents...

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>

Nov 21 '05 #5

P: n/a
D,

These questions make me forever curious.

Although as Herfried already said have I the same opinion that you should
avoid this kind of instruction.

Why not just
me.topmost = true

Cor
Nov 21 '05 #6

P: n/a
Cor,

"Cor Ligthert" <no************@planet.nl> schrieb:
Although as Herfried already said have I the same opinion that you should
avoid this kind of instruction.

Why not just
me.topmost = true


I doubt that a topmost window is a viable solution in this situation...

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>

Nov 21 '05 #7

P: n/a
> "Cor Ligthert" <no************@planet.nl> schrieb:
Although as Herfried already said have I the same opinion that you should
avoid this kind of instruction.

Why not just
me.topmost = true


I doubt that a topmost window is a viable solution in this situation...

After that I had sent this message I thought,
me.topmost = true
me.topmost = false

Maybe does that the job that is asked, however I am more interested in that
statusbar problem, but the information from the OP is to few and I think
that this is a on the border solution.

Cor
Nov 21 '05 #8

P: n/a
Me.TopMost will make a form the topmost in the application but not over
other applications.

When you refer to the status bar problem are you talking about my problem
with the app not showing up in the taskbar.

It's tricky and yes, is the only reason I have to resort to trying to bring
the app window into the foreground. Unfortunatly no luck yet with the
status bar thing.

"Cor Ligthert" <no************@planet.nl> wrote in message
news:%2****************@tk2msftngp13.phx.gbl...
"Cor Ligthert" <no************@planet.nl> schrieb:
Although as Herfried already said have I the same opinion that you
should avoid this kind of instruction.

Why not just
me.topmost = true


I doubt that a topmost window is a viable solution in this situation...

After that I had sent this message I thought,
me.topmost = true
me.topmost = false

Maybe does that the job that is asked, however I am more interested in
that statusbar problem, but the information from the OP is to few and I
think that this is a on the border solution.

Cor

Nov 21 '05 #9

P: n/a
Not recommended as in technically or morally ?
"Herfried K. Wagner [MVP]" <hi***************@gmx.at> wrote in message
news:%2****************@TK2MSFTNGP14.phx.gbl...
"Ken Tucker [MVP]" <vb***@bellsouth.net> schrieb:
API declare is wrong. Types have changed since vb6. Use integer
instead of long. In this case i would use intptr.

Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd As intptr)
As
integer

Public Sub ActivateAppWindow()

SetForegroundWindow(fMain.Handle)


Note that this will only work as long as your application is the active
application. Otherwise 'AttachThreadInput' is needed too. In other
words, it's not as easy (and not recommended) to "steal" the focus from
another application.

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>

Nov 21 '05 #10

P: n/a
D,
Me.TopMost will make a form the topmost in the application but not over
other applications.

Than I have probably another system. When I use topmost = true I get the
form only from my screen when I minimalize it.

Cor
Nov 21 '05 #11

P: n/a
"D Witherspoon" <dw**********@noway.org> schrieb:
Not recommended as in technically or morally ?


Morally -- I doubt that the application will pass the Windows Logo test when
it's stealing the focus.

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>

Nov 21 '05 #12

P: n/a
Cor,

"Cor Ligthert" <no************@planet.nl> schrieb:
Me.TopMost will make a form the topmost in the application but not over
other applications.


Than I have probably another system. When I use topmost = true I get the
form only from my screen when I minimalize it.


ACK. MSDN:

| A topmost form is a form that overlaps all the other (non-topmost)
| forms even if it is not the active or foreground form. Topmost forms
| are always displayed at the highest point in the Z-order of the
| windows on the desktop.

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>
Nov 21 '05 #13

P: n/a
Thats a good point.

But until I can find out why it deosn't show up in the task (when it first
opens) bar I will have to do this.

"Herfried K. Wagner [MVP]" <hi***************@gmx.at> wrote in message
news:%2****************@TK2MSFTNGP10.phx.gbl...
"D Witherspoon" <dw**********@noway.org> schrieb:
Not recommended as in technically or morally ?


Morally -- I doubt that the application will pass the Windows Logo test
when it's stealing the focus.

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>

Nov 21 '05 #14

P: n/a
It works now without even requiring 'AttachThreadInput'. I changed the
declare to return an Interger instead of a Long. Seemed to fix it and
return 1 as the return code instead of a crazy long number.

Even if it isn't the active application it still works, 'AttachThreadInput'
doesn't seem to be required.
"D Witherspoon" <dw**********@noway.org> wrote in message
news:u6**************@TK2MSFTNGP10.phx.gbl...
Thats a good point.

But until I can find out why it deosn't show up in the task (when it first
opens) bar I will have to do this.

"Herfried K. Wagner [MVP]" <hi***************@gmx.at> wrote in message
news:%2****************@TK2MSFTNGP10.phx.gbl...
"D Witherspoon" <dw**********@noway.org> schrieb:
Not recommended as in technically or morally ?


Morally -- I doubt that the application will pass the Windows Logo test
when it's stealing the focus.

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>


Nov 21 '05 #15

P: n/a
"D Witherspoon" <dw**********@noway.org> schrieb:
It works now without even requiring 'AttachThreadInput'. I changed the
declare to return an Interger instead of a Long. Seemed to fix it and
return 1 as the return code instead of a crazy long number.

Even if it isn't the active application it still works,
'AttachThreadInput' doesn't seem to be required.


What Windows version are you using?

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>

Nov 21 '05 #16

P: n/a
XP Pro SP2

"Herfried K. Wagner [MVP]" <hi***************@gmx.at> wrote in message
news:eS****************@TK2MSFTNGP09.phx.gbl...
"D Witherspoon" <dw**********@noway.org> schrieb:
It works now without even requiring 'AttachThreadInput'. I changed the
declare to return an Interger instead of a Long. Seemed to fix it and
return 1 as the return code instead of a crazy long number.

Even if it isn't the active application it still works,
'AttachThreadInput' doesn't seem to be required.


What Windows version are you using?

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>

Nov 21 '05 #17

P: n/a
"D Witherspoon" <dw**********@noway.org> schrieb:
XP Pro SP2


Mhm... Normally your application's taskbar button should flash when calling
'SetForegroundWindow' when the application is not the active application.

MSDN on 'SetForegroundWindow':

| With this change, an application cannot force a window to
| the foreground while the user is working with another window.

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>

Nov 21 '05 #18

P: n/a
That's interesting.

I also tried FlashWindow API as well to see if I could just flash the
taskbar instead, but still because on startup there is no item for the
window showing up in the taskbar this doesn't work. When calling
SetForegroundWindow the window will pop to the front when the window is done
loading and it will show up on the taskbar. It's unfortunate that we have
to do it this way, but it's an application that runs within our office
enviroment, so I've made a decision that it's fine.

I would love to find out why it doesn't show up in the taskbar. Could it be
partly due to the 3rd party infragistics controls we're using, or that it's
MDI, or that it's being launched as a no ntouch deployment app frmo IE? I
have no idea. Uunfortunatly in IT, you never have enough time to find out
why these bugs are they. Either fix it or find a workaround... and move
on... unfortunatly..

"Herfried K. Wagner [MVP]" <hi***************@gmx.at> wrote in message
news:uS**************@TK2MSFTNGP09.phx.gbl...
"D Witherspoon" <dw**********@noway.org> schrieb:
XP Pro SP2


Mhm... Normally your application's taskbar button should flash when
calling 'SetForegroundWindow' when the application is not the active
application.

MSDN on 'SetForegroundWindow':

| With this change, an application cannot force a window to
| the foreground while the user is working with another window.

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>

Nov 21 '05 #19

This discussion thread is closed

Replies have been disabled for this discussion.