Имена слоев и Avenue

Question

При добавлении слоя в Вид (View) он по умолчанию получает имя, совпадающее с именем исходного файла. Соответственно, обратиться к слою можно при помощи конструкции

MyView=av.GetProject.FindDoc("view_name")
MyTheme=MyView.FindTheme("theme_filename")

Но если открыть свойства слоя и задать ему другое имя, то именно это другое имя нужно указывать в запросе FindTheme.
Собственно вопрос такой: есть ли возможность задать слою одно имя, а обращаться к нему используя имя исходного файла?

Answer 1

Вот один из вариантов

 

aThemes = aView.GetThemes

' поиск темы в виде по имени источника
for each t in aThemes

  if (t.GetSrcName.AsString = fShape.GetBaseName) then
    theTheme = t

    break
  end
end 

fShape - имя исходного файла (f.e. qwerty.shp)