Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Otros entornos y lenguajes > C++ Builder
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 14-09-2005
JuanErasmo JuanErasmo is offline
Miembro
 
Registrado: ago 2005
Posts: 544
Poder: 19
JuanErasmo Va por buen camino
Como convertir un archivo a solo lectura

Buenas tardes, necesito convertir un archivo a solo lectura despues de una modificacion. con ofstream, no me funciona. Hay alguna manera de hacerlo para que el archivo quede inmodificable desde Builder?

Gracias.
Responder Con Cita
  #2  
Antiguo 14-09-2005
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Poder: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Una forma podría ser utilizar la función "FileSetReadOnly". Otra puede ser utilizar la función "SetFileAttributes".

Código Delphi [-]
  FileSetReadOnly('C:\archivo.txt', true);
Código Delphi [-]
  var
    atributos: Cardinal;
  begin
    atributos := GetFileAttributes(PChar('C:\archivo.txt'));
    SetFileAttributes(PChar('C:\archivo.txt'), atributos + faReadOnly);
  end;
__________________
David Esperalta
www.decsoftutils.com

Última edición por dec fecha: 14-09-2005 a las 19:40:41. Razón: Corrección del texto.
Responder Con Cita
  #3  
Antiguo 14-09-2005
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Poder: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Otra vez... que no me fijé en que se hablaba de C++ Builder... ¡Esta vez yo mismo traduzco el código propuesto por mí mismo!

Código:
 // C++ Builder
 FileSetReadOnly("C:\\archivo.txt", true);
Código:
 // C++ Builder
 Cardinal atributos = GetFileAttributesA("C:\\archivo.txt");
 SetFileAttributesA("C:\\archivo.txt", atributos + faReadOnly);
No crean... ha costado lo suyo
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita
  #4  
Antiguo 14-09-2005
JuanErasmo JuanErasmo is offline
Miembro
 
Registrado: ago 2005
Posts: 544
Poder: 19
JuanErasmo Va por buen camino
No me funcionó

Hola amigo, te cuento que copié las lineas que me dijiste y no me funcionó.
Gracias por tu ayuda.
Responder Con Cita
  #5  
Antiguo 14-09-2005
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Poder: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Cita:
Empezado por JuanErasmo
Hola amigo, te cuento que copié las lineas que me dijiste y no me funcionó.
Hombre, ya lo siento, pero, ¿qué es lo que no te funcionó? ¿se produjo algún error? En caso afirmativo, ¿qué error se produjo?
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita
  #6  
Antiguo 14-09-2005
JuanErasmo JuanErasmo is offline
Miembro
 
Registrado: ago 2005
Posts: 544
Poder: 19
JuanErasmo Va por buen camino
Hola dec

Dec el archivo me desapareció de C:\\archivo.txt.
Quedó como oculto. yo necesito que se vea pero que cuando se le dé guardar despues de modificarlo, saque un error.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 18:00:55.


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
Copyright 1996-2007 Club Delphi