How To: Delay the drawing of themes in an ArcView view
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.
- Open a new script window. A. Activate the Project window.
B. Click the Scripts icon.
C. Click New.
- Copy the code below into the new script window.
'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)
- Compile the script by clicking the compile button.
- Run the script by clicking the run button.