use myform.scx >*W*A*R*N*I*N*G MAKE SURE YOU HAVE BACKUP OF PROJECT >go top >SCAN >lnATLINE=ATLINE("ToolTipText =",myform.properties) * had to fix this one, sorry, checkin for less than 2 quotes if lnATLINE>0 and occurs(["],mline(myform.properties,lnALINE))<2 > * We have a prospect, move it to an array > ALINE(arTmp,myform.properties) > lcFixLine=substr(arTmp[lnATLINE],14,1000) && First char after the equal > lcFixLine=["]+strtran(lcFixLine,["],[ ])+["] && Bye Bye and hello > arTmp[lnATLINE]="ToolTipText ="+lcFixLine > replace myform.properties with "" && Empty it out > lcFixLine="" > for c=1 to alen(arTmp) && Build replacement string > lcFixLine=lcFixLine+arTmp[c]+chr(13) > endfor > replace myform.properties with lcFixLine >else >endif >ENDSCAN>