Martin:

One side-effect of the problem was that when I ran the new builder against a sub-classed grid in a library, changed the name of the grid in the Builders textbox control and clicked the [OK] button, the builder didn't change the "name" of the grid, but it did change the objectlist references of the columns, headers and texts. When I saved the class, recompiled the library and tried to make further changes to the class, I got an error telling me that there was an error in Record xxxx. I had to go back to my last version in VSS. Fortunately I hadn't made any other changes.

Thanks again for trying to help!

Mike

Here is cleanup.prg that we wrote to correct the problem I described.

lparameter tcFile

use (tcFile)

local latemp[1]
local lcLine
scan for '= (' $ properties
alines(latemp, properties, .t.)
for each lcLine in laTemp
if '= (' $ lcLine
lcOrigLine = lcLine

lcLine = strtran(lcLine, '= (', '= ')
lcLine = left(lcLine, len(lcLine)-1)

lcLine = strtran(lcLine, '[', '"')
lcLine = strtran(lcLine, ']', '"')

replace properties with strtran(properties, lcOrigLine, lcLine, 1)
endif

endfor
endscan

use