GARANTIR DESCONTO

Fórum Copiar arquivos sem deixá-los como ´read only´ #258642

16/11/2004

0

Delphi

Boa tarde!
Em um aplicativo que estou fazendo, necessito copiar algumas fotos para diretórios diferentes. Contudo, a cópia dos arquivos acabam saindo apenas como leitura...
O código q utilizo é simplesmente:

If Not CopyFile(PChar(FrmIncluir.EdtFoto2.Text),
          PChar(FrmIncluir.EdtFot2.Text), True) Then
            ShowMessage(´Imagem 2 não gravada!´);


Desta forma, ocorre o q já expliquei. Existe alguma forma de fazer a cópia e deixar o dado como ´arquivo´, e não como ´apenas leitura´?!

Valeu!!!!!!!!!!!


Pedro Bugim

Pedro Bugim

Responder

Posts

16/11/2004

Gandalf.nho

Por acaso esses arquivos são copiados a partir de um CD?


Responder

Gostei + 0

16/11/2004

Pedro Bugim

Poxa, o pior é q não... é do próprio pc. Simplesmente troco os dados de uma pasta para outra...


Responder

Gostei + 0

16/11/2004

Keitarosan

Bom, como a Gandalf.nho perguntou, vem de um CD??
Porque se vier, é comum vir como somente leitura, porém, você pode alterar os atributos do mesmo arquivo, assim que ele for copiado...

com: function FileSetAttr(const FileName: string; Attr: Integer): Integer;

Assim você tira o atributo de Read-Only...
Pra ver mais informacoes, da uma olhada no Help do Delphi kra


Responder

Gostei + 0

16/11/2004

Pedro Bugim

:D Caraca! show de bola! Funcionou perfeitamente!
Valeu mesmo galera!
Abraços,
Pedro Bugim :D


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar