Is This Content Helpful?
We're glad to know this article was helpful.
This document provides Avenue code which will delay drawspeed of individual themes in a view.
The following script must be run on an active theme which is not turned on.
'This script assumes a view is the active document
theView = av.GetActiveDoc
theThemeList = theView.GetThemes
themeCount = theThemeList.Count
themeStart = themeCount - 1
for each t in themeStart .. 0 'To draw from the bottom up
theTheme = theThemeList.Get(t)
' Experiment with this for the delay
numDelay = 3 'In seconds
numStart = Date.Now.AsSeconds
while (( Date.Now.AsSeconds - numStart ) < numDelay)