lo = CREATEOBJECT("Form") >CREATE CURSOR c_example (oData g) >INSERT INTO c_example (oData) VALUES(lo) > >SCAN > c_examples.oData.BackColor = RGB(255,255,0) >ENDSCAN >>
lo = CREATEOBJECT("Form") >CREATE CURSOR c_example (cDataObj c(20)) > >lcName = SYS(2015) >PUBLIC &lcName >&lcName = lo >INSERT INTO c_example (cDataObj) VALUES(lcName) > >SCAN > lcObj = ALLTRIM(cDataObj) > &lcObj..BackColor = RGB(255,255,0) >ENDSCAN>