Code

var aa as string
var name as string
var loop as int
var cnt as int

aa = @StringArrayElementList()
cnt = @CountStringArray(aa)

for loop = 1 to cnt
	  name = @AccessStringArray(aa, loop)
	  SetThisElement(name)
	  // The 2 in the line below means - read only but not grayed out
	  ReadOnly(ThisElement, 2)
next
UnSetThisElement()
 

Code

Var vStr as String
Var vCnt as Int
Var vLoop as Int
Var VName as String

vStr = @StringArrayElementList()
vCnt = @CountStringArray(vStr)
vLoop = 1

While vLoop <= vCnt
{
 vName = @AccessStringArray(vStr, vLoop)
 SetThisElement(vName)
 If((@ElementType(ThisElement) <> 1017) And (@ElementType(ThisElement) <> 1016)) Then
 {
  ReadOnly(ThisElement, 0)
  ReadOnly(ThisElement, 2)
 }
 vLoop = vLoop + 1
}
UnSetThisElement()