Muestra fragmentos de texto

Esta función permite, dada una cadena y una longitud "n" mostrar fragmentos de ella (sin cortar palabras) siempre que la longitud no exceda de "n". La función permite además añadir caracteres u otra cadena al final de la cadena original.

Ejemplo: CropSentence("Astalaweb.com - Rutinas para programadores",14,"-cadena final")
Resultado: Astalaweb.com-cadena final