Cómo saber si un fichero esta marcado de sólo lectura ?

[[David]]

Hola

Hay alguna forma de comprobar que un fichero esta marcado de sólo lectura ?

si hay alguna función, supongo que antes habría que pasarle el FileExists, para comprobar que el fichero exista, lo digo, porque igual la función podría detectar también esto.

Cuidado, busco una función que me diga si un fichero esta de sólo lectura, NO , que me lo cambie a escritura en caso de estarlo.

Un saludo

[[duilioisola]]

Mira el help de Delphi de:

function FileGetAttr(const FileName: string): Integer;

Description

FileGetAttr returns the attributes of the file as a string of bits. This value is the same as the Attr field of a TSearchRec record. Check for individual attributes with code such as the following:

Attrs := FileGetAttr('MyFile.sys');

if Attrs and faHidden <> 0 then
FileSetAttr('MyFile.sys', Attrs – faHidden);

A return value of -1 indicates that an error occurred.

El atributo serña faReadOnly

[[Fenareth]]

Hola David !

Revisa éste enlace...

Creo que te puede ayudar de muchísimo...

Saludos...