Hi
The following routines for creating and updateing a progress
bar work fine in Windows98 but not in Windows98.Any insight would
be appreciated.
Eddie
SUB progress_init(hParent AS LONG,hInstance AS LONG,PBYPOS AS LONG)
DIM LPARAM AS LONG
LPARAM=6553600
HPROGRESSBAR=CREATEWINDOWEX(0,"MSCTLS_PROGRESS32","PROGRESSBAR",%WS_CHILD OR %WS_VISIBLE,_
40,PBYPOS,300,30,hParent,%NULL,hInstance,BYVAL %NULL)
SENDMESSAGE HPROGRESSBAR,%PBM_SETPOS, 0,0
SENDMESSAGE HPROGRESSBAR,%PBM_SETRANGE,0,LPARAM
SENDMESSAGE HPROGRESSBAR,%PBM_SETSTEP, 1,0
END SUB
SUB progress_step
SENDMESSAGE HPROGRESSBAR,%PBM_STEPIT,0,0
END SUB
SUB progress_reset
SENDMESSAGE HPROGRESSBAR,%PBM_SETPOS,0,0
SHOWWINDOW HPROGRESSBAR,%SW_SHOW
END SUB
SUB progress_hide
SHOWWINDOW HPROGRESSBAR,%SW_HIDE
END SUB
------------------
The following routines for creating and updateing a progress
bar work fine in Windows98 but not in Windows98.Any insight would
be appreciated.
Eddie
SUB progress_init(hParent AS LONG,hInstance AS LONG,PBYPOS AS LONG)
DIM LPARAM AS LONG
LPARAM=6553600
HPROGRESSBAR=CREATEWINDOWEX(0,"MSCTLS_PROGRESS32","PROGRESSBAR",%WS_CHILD OR %WS_VISIBLE,_
40,PBYPOS,300,30,hParent,%NULL,hInstance,BYVAL %NULL)
SENDMESSAGE HPROGRESSBAR,%PBM_SETPOS, 0,0
SENDMESSAGE HPROGRESSBAR,%PBM_SETRANGE,0,LPARAM
SENDMESSAGE HPROGRESSBAR,%PBM_SETSTEP, 1,0
END SUB
SUB progress_step
SENDMESSAGE HPROGRESSBAR,%PBM_STEPIT,0,0
END SUB
SUB progress_reset
SENDMESSAGE HPROGRESSBAR,%PBM_SETPOS,0,0
SHOWWINDOW HPROGRESSBAR,%SW_SHOW
END SUB
SUB progress_hide
SHOWWINDOW HPROGRESSBAR,%SW_HIDE
END SUB
------------------
Comment