[Answers] Timer

Q:
In a custom VFP section, I have sub-classed timer.
Like so

Code:

---

define class mytimer as timer
interval = 0
        proc timer()
                if      customdba.east.fixedwidth  < 200
                        customdba.east.fixedwidth  =customdba.east.fixedwidth +25
                else
                        customdba.otimer.interval = 0
                endif
        endproc
enddefine

---

I have a container named east in my customdba namespace.
I am using a timer to slide the container.
I have the main container called viewport, and I add the timer.

Code:

---

viewport.addObject("oTimer","mytimer")

---

Lastly, I add a button to kick off the timer and cause the slide to occur.

Code:

---

define class slidebutton as commandbutton
proc click()
oTimer.interval = 100
endproc
enddefine

---

It is working as expected and the container slides out nicely. Now I want it to slide back into place, but I don't want to add a second timer to the section if I can help it.
I would like to send a parameter to proc timer(direction)
A:
in your customdba namespace, add a var cDirection, with suggested values of "in" and "out" -- then your logic can handle it in the one timer.

The button (presumably) the same one can test whether it's out, set the var, and you're good to go.
Animation methods are available for all custom objects.
this is for UI elements. For containers, I think I need to control those manually.

---

---

​All topics in [Answers] alphabetically:http://www.lianja.com/community/showthread.php?2717-Answers