>LPARAMETERS oDataObject, nEffect >LOCAL aValues, i, nSelected > >DIMENSION aValues[9] >aValues[1] = subs(THIS.SELECTEDITEM.TEXT, 1, 3) >aValues[2] = subs(THIS.SELECTEDITEM.TEXT, 1, 3) >aValues[3] = subs(THIS.SELECTEDITEM.TEXT, 1, 3) >aValues[4] = subs(THIS.SELECTEDITEM.TEXT, 1, 3) >aValues[5] = subs(THIS.SELECTEDITEM.TEXT, 1, 3) >aValues[6] = subs(THIS.SELECTEDITEM.TEXT, 1, 3) >aValues[7] = subs(THIS.SELECTEDITEM.TEXT, 1, 3) >aValues[8] = subs(THIS.SELECTEDITEM.TEXT, 1, 3) >aValues[9] = subs(THIS.SELECTEDITEM.TEXT, 1, 3) > >oDataObject.SetData(@aValues,"OLE Variant Array") >thanks for you response!