**************************************
=SQLEXEC(thisform.pconx,"select * from MyTable","cMyCursor")

thisform.AddProperty('myArray('+STR(RECCOUNT())+',1)') && Dimension for my array

COPY TO ARRAY thisform.myArray FIELDS "name"        && Copy my sql Results to the array

thisform.combo1.RowSourcetype= 5                                 && Type 5, Array
thisform.combo1.RowSource="thisform.myArray"	
************************************************************