PDA

Vollständige Version anzeigen : Alles in den Vordergrund


Benedict
30.05.2001, 17:28
Hallo!
Ich möchte, dass meine Form immer im Vordergrund bleibt. Also so ,dass man keine anderen Fenster davor plazieren kann.
Danke im Vorraus!!!!
Benedict

Stefan Kulpa
31.05.2001, 05:53
<font face="Verdana" size="2">Hallo,

das geht wie folgt:</font>

<PRE><FONT SIZE=1 FACE=Courier New><FONT COLOR=#000080>Private</FONT> <FONT COLOR=#000080>Declare</FONT> <FONT COLOR=#000080>Function</FONT> SetWindowPos <FONT COLOR=#000080>Lib</FONT> "user32" _
(<FONT COLOR=#000080>ByVal</FONT> hwnd <FONT COLOR=#000080>As</FONT> <FONT COLOR=#000080>Long</FONT>, _
<FONT COLOR=#000080>ByVal</FONT> hWndInsertAfter <FONT COLOR=#000080>As</FONT> <FONT COLOR=#000080>Long</FONT>, _
<FONT COLOR=#000080>ByVal</FONT> x <FONT COLOR=#000080>As</FONT> <FONT COLOR=#000080>Long</FONT>, _
<FONT COLOR=#000080>ByVal</FONT> y <FONT COLOR=#000080>As</FONT> <FONT COLOR=#000080>Long</FONT>, _
<FONT COLOR=#000080>ByVal</FONT> cx <FONT COLOR=#000080>As</FONT> <FONT COLOR=#000080>Long</FONT>, _
<FONT COLOR=#000080>ByVal</FONT> cy <FONT COLOR=#000080>As</FONT> <FONT COLOR=#000080>Long</FONT>, _
<FONT COLOR=#000080>ByVal</FONT> wFlags <FONT COLOR=#000080>As</FONT> <FONT COLOR=#000080>Long</FONT>) <FONT COLOR=#000080>As</FONT> <FONT COLOR=#000080>Long</FONT>

<FONT COLOR=#000080>Private</FONT> <FONT COLOR=#000080>Const</FONT> SWP_NOSIZE = &H1
<FONT COLOR=#000080>Private</FONT> <FONT COLOR=#000080>Const</FONT> SWP_NOMOVE = &H2
<FONT COLOR=#000080>Private</FONT> <FONT COLOR=#000080>Const</FONT> HWND_TOPMOST = -1
<FONT COLOR=#808080><HR></FONT>

<FONT COLOR=#000080>Private</FONT> <FONT COLOR=#000080>Sub</FONT> Command1_Click()

<FONT COLOR=#000080>Call</FONT> SetWindowPos(Me.hwnd, HWND_TOPMOST, 0, 0, 0, 0, _
SWP_NOSIZE <FONT COLOR=#000080>Or</FONT> SWP_NOMOVE)

<FONT COLOR=#000080>End</FONT> <FONT COLOR=#000080>Sub</FONT>

</FONT></PRE>

<font face="Verdana" size="2">Es kann sein, das dies in der IDE nicht immer 100% funktioniert; spätestens in der EXE sollte es aber so sein ...

Gruß</font>

Benedict
31.05.2001, 14:33
Vielen Dank Stefan !!!