Cambiar la extensión a un fichero

Artículo por Club Developers · 31 December 2005

5046 vistas

Puede ser interesante cambiar la extensión de un fichero en un momento dado para, por ejemplo, poderlo enviar por correo y que no nos lo bloquee el antivirus

Para ello vamos a usar la función ChangeFileExt definida en la unit SysUtils



delphi
  1. var 
  2.   Fichero: string;
  3. begin 
  4.   Fichero := ChangeFileExt('archivo.txt', '.htm')
  5. end;