¿Como crear un algoritmo en delphi para mostrar un texto reduciendo 1 carácter cada vez, usando function? ejem: hola mundo hola mund hola mun hola mu hola m hola hol ho h