The following code was working upto FWH 2.7 June 2006 Build. When I updated my FWH 2.7 June build with FWH 2.7 July build, I started getting
errors as under. I am using the latest xHarbour supplied with FWH 2.7 July 2006.
- Ramesh Babu P
#include "fivewin.ch"
FUNCTION taskbar_on(ison, lFree)
LOCAL hwnd := FindWndByClass("Shell_TrayWnd", "")
IF ison
ShowWindow(hwnd,5)
ELSE
ShowWindow(hwnd,0)
ENDIF
IF lFree
FreeLib32("user32.dll")
ENDIF
RETURN Nil
**********
DLL32 Function ShowWindow(hwnd as LONG, nCmdShow as LONG) AS LONG ;
PASCAL FROM "ShowWindow" Lib "user32.dll"
DLL32 Function FindWndByClass(wndClass AS LPSTR,WndName as LPSTR) AS LONG ;
PASCAL FROM "FindWindowA" LIB "user32.dll"
**********
