MultiRecord_StyleSubobject.qry

Download

More scripts: Style By Script

Syntax Highlighing:

comments, key words, predefined symbols, class members & methods, functions & classes

UseStyle = 1
if ("Bc" in CLASS[*].Class) Style$ = "Bc" else
if ("DuB" in CLASS[*].Class) Style$ = "DuB" else
if ("EpF" in CLASS[*].Class) Style$ = "EpF" else
Style$ = "KaB" #styles remaining
					#polygons not covered above