Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   API de Windows (https://www.clubdelphi.com/foros/forumdisplay.php?f=7)
-   -   Modificar los permisos de un archivo (https://www.clubdelphi.com/foros/showthread.php?t=66590)

radge 02-03-2010 09:36:12

Modificar los permisos de un archivo
 
Buenas soy usuario de delphi 5 y tengo un trozo de código que intento borrar un archivo

try
deletefile(...)
except
...
end;

Si no puede borrar el archivo porqué esta en modo SOLO LECTURA no salta la excepción , así que he mirado a ver si podria modificarle los permisos al archivo desde delphi pero no encuentro el como...

Gracias por adelantado,

radge

radge 03-03-2010 12:58:06

Alguien se le ocurre algo ? o alguna web dodne buscar o similar ? en san google ya no se como buscar....

gracias , radge

Ñuño Martínez 03-03-2010 14:00:29

Si fuera POSIX (Linux, MacOS, AIX, BSD, ...) aún te podría decir, pero en Windows ni idea.:confused:

BrunoBsso 03-03-2010 15:15:54

Tomá, esto lo necesité hace tiempo y mirando la ayuda en Delphi 2010 lo encontré, es fácil de usar:
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  Archivo:PWideChar;
begin
  Archivo:='C:\CarpetaX\ArchivoX.extensionX'; //es común para todos los tipos de archivos
  if SetFileAttributes(Archivo,FILE_ATTRIBUTE_NORMAL) then //1º parámetro: path (en PWideChar) - 2º parámetro: atributo (hay más)
    ShowMessage('Ahora está normal');
  if SetFileAttributes(Archivo,FILE_ATTRIBUTE_READONLY) then
    ShowMessage('Ahora es de sólo lectura');
end;
Saludos!


La franja horaria es GMT +2. Ahora son las 09:23:44.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi