oBrw:SelectRow( 0 ) // clear all i.e., select none oBrw:SelectRow( 4 ) // Select all After oBrw:CreateFromCode() For n=1 to 12 oBrw:aSelected[ n ] := ( SubStr(cMese, n, 1)) == "1" ) next Thanks Rao I tring to create a custom Class from Txbrowse can you help me give me error on ...