Victor,
Thank you very much, only a small observation .-
---- testwmtx.prg
STATIC s_hMutex
PROCEDURE Main()
LOCAL cAppName
// It may be a random program name :)
hb_FNameSplit( hb_ProgName(), NIL, @cAppName )
s_hMutex := wapi_CreateMutex( NIL, NIL, cAppName )
IF ! Empty( s_hMutex ) .AND. wapi_GetLastError() == 0
? cAppName, "=> Hello World! OK."
WAIT
wapi_ReleaseMutex( s_hMutex )
ELSE
? cAppName, "=> Application is running. Error", wapi_GetLastError()
WAIT
ENDIF
RETURN
----
wapi_ReleaseMutex() does nothing, returns .F. because we not create the mutex
as owner.
In this case it's better, I think it would be better to remove.
Maybe now is not the moment, when the time I'd like to find a solution for
wapi_par_HANDLE and wapi_ret_HANDLE.
best regards,
Xavi
_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour
