No seu loop, voce deve usar macro substituição:
for nY := 1 to Len(aCampos)
&("SNG->("+aCampos[nY][1]+")") := (aCampos[nY][2])
ProcessMessages()
next nY
No seu loop, voce deve usar macro substituição:
for nY := 1 to Len(aCampos)
&("SNG->("+aCampos[nY][1]+")") := (aCampos[nY][2])
ProcessMessages()
next nY