DCGET COMBO and DATA {||array}

[slobodan1949]

Dear Roger,
why COMBO DATA {|| aarray }
returns only the first letter of each member of the string

aarray = {"COBA","VANJA","MARKO","ANA"}
DATA aarray = {"COBA","VANJA","MARKO","ANA"}
DATA {|| aarray } = {"C","V","M","A"}

Where am I wrong in the attached code ?

* ---
PUBLIC aa:=1
PUBLIC aarray:=bbb(GetList) // aarray:= {"COBA","VANJA","MARKO","ANA"}

@ 01,01 DCGET TEST->NAMES GETSIZE 30,1 ;
TABSTOP ;
COMBO ;
HEIGHT 8.7 ;
WIDTH 30 ;
DATA {|| aarray } ; // aarray:= {"C","V","M","A"}
ELEMENT 1 ;
RETURN {|n| aarray[n] } ;
GOTFOCUS {|| msgbox(var2char(aarray)),; // aarray:= {"COBA","VANJA","MARKO","ANA"}
DC_Getrefresh(GetList)}

* ---
function bbb()
if aa:=1
aarray:= {"COBA","VANJA","MARKO","ANA"}
else
aarray:= {"LONDON","PARIS","BERLIN","NEWYORK"}
endif
DC_GetRefresh(GetList)
return aarray
* ---

[Tom]

Use a 2-dim-array.

[rdonnay]

Code: Select all

aArray := {"COBA","VANJA","MARKO","ANA"}
FOR i := 1 TO Len(aArray)
  aArray[i] := {aArray[i]}
NEXT