>> with .Grid1 as my_Grid of my_class.vcx >> .recordsource='Language' >> .colID.controlsource='Language.LanguageID' >> .colEntryType.controlsource = 'Language.EntryType' >> .column1.controlsource = 'Language.LookupVal' >> .colLanguage00.controlsource = 'Language.Language00' >> with .colEntryType >> .removeobject('text1') >> .newobject('cboEntryType','my_combobox','my_class.vcx') >> .cboEntryType.rowsourcetype = 5 >> .cboEntryType.rowsource = 'thisform.aEntryTypes' >> .cboEntryType.columncount = 1 >> .cboEntryType.boundcolumn = 2 >> .cboEntryType.boundto = .t. >> .cboEntryType.Requery() >> .cboEntryType.visible = .t. >> endwith >> endwith >>>>