Función para strings

[fidel]

Por curiosidad, a ver si lo adivino.

Coges por ejemplo el nombre de un fichero, con su ruta completa, y lo quieres presentar en un edit.

Suponiendo que el edit esté limitado a 15 caracteres, cuando la longitud del nombre del fichero pase de 15, quieres que se presente con tres puntos suspensivos y los 12 últimos caracteres

¿He acertado y tengo premio, o he dicho una tonteria?

Suponiendo que he acertado.

No se si hay algo en delphi, o si no se hace.

Si longitud variablequesea > 15 entonces
variablequesea := '...' + los12úiltimos(delavariablequsea);

if Length(TuVariable) > 15 then
TuVariable := '...' + RightStr(TuVariable,12);

Un saludo.