Dll question

[torels]

Hi there

I have this vb6 code

Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long

I tried to bring it to autoit (nearly guessing all the thing) and I got this:

Func PostMessage($hwnd,$wMsg,$wParam,$lParam)
    DllCall("user32.dll", "Long", "PostMessageA", "Long", $hwnd, "Long", $wMsg, "Long", $wParam, "Long", $lParam)
EndFunc

Is this right ?

'cause it is't working

thanks in advance

Edited October 8, 2008 by torels

[Pain]

$aResult = DllCall("User32.dll", "int", "PostMessageA", "hwnd", $hWnd, "int", $iMsg, "int", $iwParam, "int", $ilParam)

Return $aResult[0]

[zorphnog]

I don't see a definition for PostMessageA in the Win32 API, only one for PostMessage. http://msdn.microsoft.com/en-us/library/ms644944(VS.85).aspx

[torels]

why does Long become Int ???

[Pain]

You can use long if you like but I'm using int because you can use it for basically everything.

int a 32 bit integer

long a 32 bit integer

The problem was type "hwnd".

@ zorphnog

A stands for ANSI.

From the helpfile:

By default, AutoIt tries to use the ANSI version of a function name, i.e. MessageBoxA is attempted when MessageBox is given as the function name. To call the unicode version use MessageBoxW.

Edited October 8, 2008 by Pain

[torels]

Thanks

And... are there right ?

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Func FindWindow($Classname,$windowname)
    $dc = DllCall("User32.dll", "Long", "FindWindow", "String", $Classname, "String", $windowname)
    MsgBox(0,"",$dc[0])
    Return $dc[0]
EndFunc

?

thanks in advance

[Pain]

Seems right but there is no type called "string", try with "str".

DllCall("user32.dll", "long", "FindWindow", "str", $Classname, "str", $windowname)