DesktopX script debugging
Friday, February 13, 2004 by scottsh | Discussion: Skinning
Reply #2 Saturday, February 21, 2004 7:39 PM
sub debugadd(texttoadd,clear)
if clear=true then
control.text=""
else
control.Text = Control.text & Vbcrlf & texttoadd
end if
end sub
then in any object I use something like:
DesktopX.ScriptObject("debugbox").debugadd("val1 = " & val1,False)
if val1 = 3 then
' do something
else
' do something else
end if
which would put :
val1 = 3
in the edit control
Remember to set the edit control to multiline first though or it'll be a mess
This method is a lot less problematic than msgboxes and you can look at the results of a long loop and even copy text from the edit control and plonk it in notepad and compare what you got to what you expected.
[Message Edited]
Please login to comment and/or vote for this skin.
Welcome Guest! Please take the time to register with us.
There are many great features available to you once you register, including:
- Richer content, access to many features that are disabled for guests like commenting on the forums and downloading skins.
- Access to a great community, with a massive database of many, many areas of interest.
- Access to contests & subscription offers like exclusive emails.
- It's simple, and FREE!







Reply #1 Friday, February 13, 2004 6:37 PM
You can always check in the stardock newsgroups in desktopx section and usually you will receive help if your code isn't working right.