ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

Verificar se Arquivo já exite ... [RESOLVIDO]

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
Lippi
Membro Junior
Membro Junior


Registrado: Terça-Feira, 25 de Novembro de 2008
Mensagens: 372

MensagemEnviada: Ter Ago 27, 2019 7:45 pm    Assunto: Verificar se Arquivo já exite ... [RESOLVIDO] Responder com Citação

Senhores, boa noite.


Preciso verificar se um determinado arquivo já existe e não estou conseguindo.

Já li várias dicas e, no entanto, não encontrei dica específica para meu caso:

Trata-se de verificar se existe um arquivo, sendo que este tem nome+variável.

Exempo: preciso saber se o Arquivo "ContratoSysLippi_00382' já existe.
A variável aqui é o "00382", que está num Componente Editt e que pode ser qualquer outro número (alfa).

Vejam o meu código:

Código:
          AArq:=('C:\Setor\SysLippi\Contratos\ContratoSysLippi_'+(Edit_BAScodcli.Text));
          If FileExists(AArq) then
            ShowMessage('Já existe o Arquivo!')
          else
            begin


O fato é que este arquivo existe e o sistema gera (sobrepõe) novo arquivo, ou seja, o meu código não está correto, pois não reconhece o arquivo existente.

Como devo corrigir?

Desde já, obrigado.
Lippi.
_________________
Longo e difícil é o caminho que, das trevas, nos leva à luz.


Editado pela última vez por Lippi em Qua Ago 28, 2019 4:19 pm, num total de 1 vez
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Enviar E-mail MSN Messenger
imex
Moderador
Moderador


Registrado: Sexta-Feira, 7 de Janeiro de 2011
Mensagens: 11313

MensagemEnviada: Ter Ago 27, 2019 8:40 pm    Assunto: Responder com Citação

Boa noite,

O nome do arquivo tem uma extensão? Se por acaso tiver está faltando acrescentar a extensão.

_________________
Assinatura: http://www.imoveisemexposicao.com.br
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Lippi
Membro Junior
Membro Junior


Registrado: Terça-Feira, 25 de Novembro de 2008
Mensagens: 372

MensagemEnviada: Qua Ago 28, 2019 11:05 am    Assunto: Responder com Citação

Imex, bom dia.

Não, o arquivo não tem extensão.
_________________
Longo e difícil é o caminho que, das trevas, nos leva à luz.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Enviar E-mail MSN Messenger
joemil
Moderador
Moderador


Registrado: Quinta-Feira, 25 de Março de 2004
Mensagens: 8913
Localização: Sinop-MT

MensagemEnviada: Qua Ago 28, 2019 11:43 am    Assunto: Responder com Citação

e qual a funcao desse arquivo? nao abre ele em nenhum lugar?
_________________
<b>SEMPRE COLOQUE [RESOLVIDO] NO SEU POST</b>
Enviar imagens: http://tinypic.com/
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Lippi
Membro Junior
Membro Junior


Registrado: Terça-Feira, 25 de Novembro de 2008
Mensagens: 372

MensagemEnviada: Qua Ago 28, 2019 2:53 pm    Assunto: Sim, abre normalmente. Responder com Citação

Na realidade ele abre, sim. Ocorre que o problema é que o comando não está conseguindo "enxergar" que ele já existe e sempre grava novo arquivo por cima (sobrepõe).

Trata-se de um arquivo do Microsoft Word 97-2003, sem extensão. Ele é utilizado para gerar contrato de prestação de serviços.

Este arquivo (do word) já contém cláusulas e os dados são complementados através do meu BD, que é Fb 2,5 e utilizo o D7.
_________________
Longo e difícil é o caminho que, das trevas, nos leva à luz.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Enviar E-mail MSN Messenger
joemil
Moderador
Moderador


Registrado: Quinta-Feira, 25 de Março de 2004
Mensagens: 8913
Localização: Sinop-MT

MensagemEnviada: Qua Ago 28, 2019 3:06 pm    Assunto: Responder com Citação

mas se ele abre pelo Word, tem q ter uma extensao: .doc ou .docx ou .rtf geralmente
_________________
<b>SEMPRE COLOQUE [RESOLVIDO] NO SEU POST</b>
Enviar imagens: http://tinypic.com/
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Lippi
Membro Junior
Membro Junior


Registrado: Terça-Feira, 25 de Novembro de 2008
Mensagens: 372

MensagemEnviada: Qua Ago 28, 2019 4:14 pm    Assunto: Perdão pela ignorância Responder com Citação

Caro Joemil,


Ao consultar a extensão do arquivo, pelo Explorador de Arquivos, não aparece extensão, motivo pelo qual afirmei não existir.

Acrescentei na linha de comando o ".doc" e deu certo.

Eu ainda aprendo (rsrsrs).

Muito obrigado.
Abraço.
_________________
Longo e difícil é o caminho que, das trevas, nos leva à luz.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Enviar E-mail MSN Messenger
jheckson
Novato
Novato


Registrado: Domingo, 30 de Outubro de 2016
Mensagens: 17

MensagemEnviada: Qua Ago 28, 2019 5:26 pm    Assunto: Re: Perdão pela ignorância Responder com Citação

Lippi escreveu:
Caro Joemil,


Ao consultar a extensão do arquivo, pelo Explorador de Arquivos, não aparece extensão, motivo pelo qual afirmei não existir.

Acrescentei na linha de comando o ".doc" e deu certo.

Eu ainda aprendo (rsrsrs).

Muito obrigado.
Abraço.


Possivelmente teu sistema esta ocultando a extensão.

Para resolver, você pode ir nas configurações de pasta e analisar.



Só desmarcar se estiver marcado.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB