[VB] me.hwnd = GetActiveWindow()?

[rjsomeone]

Stel, ik heb alleen een commandbutton bij m'n bv app, en de volgende code:

code:

Private Declare Function GetActiveWindow Lib "User32" () As Integer
Private Sub Command1_Click()
MsgBox Form1.hWnd
MsgBox GetActiveWindow()
End Sub

Waarom zijn de 2 waarden niet gelijk? Als ik dit in win 98 doe lukte 't volgens mij wel altijd, maar in XP werkt 't niet meer?

[mulder]

Waarschijnlijk is Form1 niet the ActiveWindow.

Je code bijvoorbeeld zou *misschien* zo wel kunnen werken:

code:

  Private Declare Function GetActiveWindow Lib "User32" () As Integer
  Private Sub Command1_Click()
  Dim ret1 As Long
  Dim ret2 As Long
    ret1 = Form1.hWnd
    ret2 = GetActiveWindow()
    MsgBox ret1 & ":" & ret2
  End Sub

[Verwijderd]

Nee dat is het niet hij doet z'n apicall ranzig

Private Declare Function GetActiveWindow Lib "User32" () As Integer

Integer is 16 bits in VB.
dus maak daar maar long van..
problem solved.

[rjsomeone]

Op woensdag 28 november 2001 19:09 schreef Yarvieh het volgende:
Nee dat is het niet hij doet z'n apicall ranzig

Private Declare Function GetActiveWindow Lib "User32" () As Integer

Integer is 16 bits in VB.
dus maak daar maar long van..
problem solved.

Yepp.. thanx man! 't werkt.. ik heb die apicall overgenomen van een foute site..

[Verwijderd]

Op woensdag 28 november 2001 19:13 schreef rjsomeone het volgende:
ik heb die apicall overgenomen van een foute site..

Bij vb zit bij de add-ins zo'n mooie api viewer, ook niet geheel foutloos maar opzekers stukken beter dan dit.