Copiar fichero con atributos

[dec]

Hola,

Puedes usar la función "SetFileAttributes()":

Código Delphi [-]
SetFileAttributes('C:\archivo.txt', faReadOnly);

[[cHackAll]]

Como comentario... faReadOnly es un parámetro utilizado por funciones menos abstractas como la SysUtils.FindFirst. Utilizando la API que nombra Dec, lo correcto sería familizarizarce con constantes como FILE_ATTRIBUTE_READONLY, puede que tengan los mismos valores pero al acostumbrarse se podrían cometer errores lógicos en éstos casos; faSymLink, faAnyFile, FILE_ATTRIBUTE_OFFLINE y FILE_ATTRIBUTE_TEMPORARY.


PD: GetFileAttributes
Saludos