Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Countdown start Error
#1
Function TimerTest
Code:
Copy      Help
\Dialog_Editor
function# hDlg message wParam lParam
if(hDlg) goto messages

str controls = "4"
str e4
if(!ShowDialog("TimerTest" &TimerTest &controls)) ret

;BEGIN DIALOG
;0 "" 0x90C80AC8 0x0 0 0 192 106 "Timer test"
;3 Button 0x54032000 0x0 8 28 48 14 "Time(Test)"
;13 Button 0x54032000 0x0 8 48 48 14 "KILL(Test)"
;23 Static 0x54000000 0x0 60 32 48 10 "CLOSED"
;4 Edit 0x54030080 0x200 60 8 24 12 ""
;5 Static 0x54000200 0x0 8 8 48 12 "Time"
;6 Button 0x54032000 0x0 8 72 48 14 "macro"
;END DIALOG
;DIALOG EDITOR: "" 0x2040108 "*" "" "" ""
ret
;messages
sel message
,case WM_INITDIALOG
,str gettime.getwintext(id(4 hDlg))
,int- TimeMax=val(gettime)
,out TimeMax

,case WM_TIMER
,sel wParam
,,case [3]
,,out F"{wParam} Expired"
,,_s="ALARM"
,,_s.setwintext(id(wParam+20 hDlg))
,,,goto runmac

,case WM_DESTROY
,case WM_COMMAND goto messages2
ret
;messages2
sel wParam
,case [3]
,SetTimer hDlg wParam TimeMax 0
,_s="OPEN"
,_s.setwintext(id(wParam+20 hDlg))

,case [13]
,KillTimer hDlg wParam-10
,_s="CLOSED"
,_s.setwintext(id(wParam+10 hDlg))

,case [6]
,;runmac
,out "run macro"

,case IDOK
,case IDCANCEL
ret 1
if e4 text box = 5000
input times 5000 at the str e4
but reseult -> 0
how can i should do?
#2
e4=5000
before ShowDialog


Forum Jump:


Users browsing this thread: 1 Guest(s)