Fórum Renomeiar nome do arquivo! Buscar nome do arq sem extensão! #264539
07/01/2005
0
Boa tarde:
Como faço para renomeiar um arquivo via delphi!
E também como faço para buscar o nome do arquivo sem extensão. Ex.: Preciso do nome ´teste´ ao invés de ´teste.txt´
Como faço para renomeiar um arquivo via delphi!
E também como faço para buscar o nome do arquivo sem extensão. Ex.: Preciso do nome ´teste´ ao invés de ´teste.txt´
Leandroamaral
Curtir tópico
+ 0
Responder
Posts
07/01/2005
Massuda
Como faço para renomeiar um arquivo via delphi!
Use a função RenameFile da unit SysUtils.
E também como faço para buscar o nome do arquivo sem extensão. Ex.: Preciso do nome ´teste´ ao invés de ´teste.txt´
Não testei, mas para obter apenas o nome do arquivo sem a extensão, você pode fazer algo deste tipo...
uses SysUtils; function NomeDeArquivoSemExtensao(S: string): string; var Ext: string N: Integer; begin // determina qual a extensão Ext := ExtractFileExt(S); // localiza a extensão no nome N := Pos(Ext, S); // exclui a extensão se for preciso if N > 0 then Delete(S, N, Length(Ext)); Result := S; end;
Responder
Gostei + 0
10/01/2005
Leandroamaral
Valeu, o código acima funcionou perfeitamente!
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)