| View previous topic :: View next topic |
| Author |
Message |
tim6389 Professional Member


Joined: 01 Aug 2002 Posts: 790
|
Posted: Sun Apr 27, 2003 11:25 pm Post subject: evloop not working right not sure why |
|
|
hello all
yes other evloop problem I have played with this for hours i don't get any errors when i run this BUT it just hangs when you try to d/l a file..i'am thinking i have the else statments wrong or something theses loopes within loops are hard for me to follow
here it is
| Code: |
:EVLOOP
if %%download
WAIT EVENT, 1
else
WAIT EVENT
if @EQUAL(%%About,Open)
wait event
PARSE "%e;%d", @event(d)
else
end
wait event
end
end
goto @event()
|
thanks _________________ Have a nice day  |
|
| Back to top |
|
 |
Hortalonus Valued Contributor


Joined: 15 Mar 2002 Posts: 344 Location: Western USA
|
Posted: Mon Apr 28, 2003 2:28 am Post subject: |
|
|
I assume you're wanting to use the timer routine if a download is in progress, and you want to check for the dialog ID if the About box is open. Try this...
| Code: | :EVLOOP
IF %%download
WAIT EVENT,1
ELSE
WAIT EVENT
END
PARSE "%e;%d",@EVENT(D)
GOTO %e |
Then, anytime you want to see if the About box is the dialog that created the event, just check the value of %d. _________________ "ah, come take my hand... we're ridin' out tonight to face the promised land"
Get a free iPod mp3 player... |
|
| Back to top |
|
 |
tim6389 Professional Member


Joined: 01 Aug 2002 Posts: 790
|
Posted: Mon Apr 28, 2003 5:39 am Post subject: |
|
|
Hortalonus - thanks that seems to help i still have a about button problem when i click on exit the if i close the main window i get a error ...i'am going to play with it to see if i can firgure it out...
thanks again _________________ Have a nice day  |
|
| Back to top |
|
 |
Skit3000 Admin Team

Joined: 11 May 2002 Posts: 2166 Location: The Netherlands
|
|
| Back to top |
|
 |
Serge Professional Member


Joined: 04 Mar 2002 Posts: 1480 Location: Australia
|
Posted: Mon Apr 28, 2003 9:30 am Post subject: |
|
|
tim,
can i suggest that you write your code like the following...makes it easier to follow...
| Code: |
:EVLOOP
if %%download
WAIT EVENT, 1
else
WAIT EVENT
if @EQUAL(%%About,Open)
wait event
PARSE "%e;%d", @event(d)
else
end
wait event
end
end
goto @event()
|
you can see then that there is a problem with your if's and end's: there is an end that you don't need and there is a else also that you don't need
Serge _________________
|
|
| Back to top |
|
 |
FreezingFire Admin Team

Joined: 23 Jun 2002 Posts: 3508
|
Posted: Mon Apr 28, 2003 7:07 pm Post subject: |
|
|
| Skit3000 wrote: | | Try to debug the script line by line. Maybe you can see where it get stuck... |
In case you don't know, set the cursor at the top of the script and use the
F8 key to move line by line through your script.  _________________ FreezingFire
VDSWORLD.com
Site Admin Team |
|
| Back to top |
|
 |
tim6389 Professional Member


Joined: 01 Aug 2002 Posts: 790
|
Posted: Tue Apr 29, 2003 5:46 pm Post subject: |
|
|
well i know what the problem is BUT not sure how to fix it.... if i have a ok button on that about box then if i click the ok button then exit the program i get a error in my close label....BUT if i don't hit the ok button and just close the about box then close the main window it works fine...i guess i could just take out the ok button and just close the about box BUT that is like taking a shortcut in my book....
i'am going to play with it a bit more then if i can't get it i will paste my ok button code and my close label code maybe you guys will see what i'am doing worng...
thanks _________________ Have a nice day  |
|
| Back to top |
|
 |
Skit3000 Admin Team

Joined: 11 May 2002 Posts: 2166 Location: The Netherlands
|
|
| Back to top |
|
 |
tim6389 Professional Member


Joined: 01 Aug 2002 Posts: 790
|
Posted: Tue Apr 29, 2003 5:59 pm Post subject: |
|
|
hummmmm yea i don't have that commad in my code would that go under the ok button label?
thanks _________________ Have a nice day  |
|
| Back to top |
|
 |
Skit3000 Admin Team

Joined: 11 May 2002 Posts: 2166 Location: The Netherlands
|
|
| Back to top |
|
 |
tim6389 Professional Member


Joined: 01 Aug 2002 Posts: 790
|
Posted: Tue Apr 29, 2003 6:28 pm Post subject: |
|
|
thanks Skit3000 i will give that a try..... _________________ Have a nice day  |
|
| Back to top |
|
 |
Skit3000 Admin Team

Joined: 11 May 2002 Posts: 2166 Location: The Netherlands
|
|
| Back to top |
|
 |
tim6389 Professional Member


Joined: 01 Aug 2002 Posts: 790
|
Posted: Tue Apr 29, 2003 6:48 pm Post subject: |
|
|
hheheeh sorry ok thanks Skit  _________________ Have a nice day  |
|
| Back to top |
|
 |
Skit3000 Admin Team

Joined: 11 May 2002 Posts: 2166 Location: The Netherlands
|
|
| Back to top |
|
 |
|