lcFrase = " Este es una Gran Titulo » "
lcString = ""
FOR i=1 TO 10
lcSTring = m.lcSTring + lcFrase
NEXT
lcResult = PADR(ALLTRIM(lcString),80," ")
MESSAGEBOX("Len(lcString)="+TRANSFORM(LEN(m.lcString))+CHR(13);
+"Len(lcResult)="+TRANSFORM(LEN(lcResult)))