Macro progress/status window

[Gintaras]

Macro MacroProgressWindow help

Code:

Copy      Help

;Creates small window that displays macro name, time and user-defined text.
;Closes the window when macro ends.

;EXAMPLE

#compile "__MacroProgressWindow"
MacroProgressWindow x.Create(1 -1 -1 170 70)
x.SetText("macro[]info")
3
x.SetText("updated info" 0x0000ff)
3

keywords: dialog

[ssimop]

Very nice routine. However if one increases the holding time from 3 sec, as in the above example, to something more than 4 min, then when at 3:34:00 it starts counting down. I am investigating this case. Any advice is welcome.

[Gintaras]

Bug:
timeGetTime-t_time+100*10000 expression type is int, and it overflows.

in MPW_WndProc replace

str s=TimeSpanToStr(timeGetTime-t_time+100*10000)

to

str s=TimeSpanToStr(timeGetTime-t_time+100*10000L)