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) if lnATLINE>0 and occurs(["],myform.properties)<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 ENDSCANP.S.