RE: [delphi-br] Descobrir o tamanho do arquivo
Já olhou no help do Delphi a função FileSize()? Sds. From: willer [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Descobrir o tamanho do arquivo Date: Wed, 17 Jan 2007 12:00:20 -0200 Aguém sabe como se faz para descobrir o tamanho do arquivo? Pode ser em bytes, Kbytes... Eu estou implementando uma rotina de exportação de dados. Os dados são enviados para um servidor de FTP, mas gostaria de informar quanto já foi enviado e quanto ainda falta para enviar, pois is arquivos são grandes e podem demorar um pouco. Tenho um arquivo chamado 'c:\db.dat', e gostaria de saber o tamanho dele, que pode variar de acordo com o conteúdo. Qualquer dica é bem vinda. Agradeço desde já. [As partes desta mensagem que não continham texto foram removidas] _ MSN Busca: fácil, rápido, direto ao ponto. http://search.msn.com.br
Re: [delphi-br] Descobrir o tamanho do arquivo
Dá uma olhada nessas dicas dos links que estou te passando e ve se já te ajudam: Tamanho do arquivo: * http://www.swissdelphicenter.ch/torry/showcode.php?id=172 * Copiar um arquivo usando uma progressbar: http://www.swissdelphicenter.ch/torry/showcode.php?id=330 []'s Ricardo. willer [EMAIL PROTECTED] escreveu: Aguém sabe como se faz para descobrir o tamanho do arquivo? Pode ser em bytes, Kbytes... Eu estou implementando uma rotina de exportação de dados. Os dados são enviados para um servidor de FTP, mas gostaria de informar quanto já foi enviado e quanto ainda falta para enviar, pois is arquivos são grandes e podem demorar um pouco. Tenho um arquivo chamado 'c:\db.dat', e gostaria de saber o tamanho dele, que pode variar de acordo com o conteúdo. Qualquer dica é bem vinda. Agradeço desde já. [As partes desta mensagem que não continham texto foram removidas] __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Descobrir o tamanho do arquivo
Willer, achei essa funcao em um arq. PAS que baixei na net em 2004, sem referencias de autor. Nunca usei portanto nao garanto que funciona. Testa ai ok?! Abraco! uses Windows, Classes, Forms, Dialogs, SysUtils, FileCtrl, ShellAPI, ShlObj; Interface function getFileSize(const FileName: string): LongInt; implementation function getFileSize(const FileName: string): LongInt; var SearchRec: TSearchRec; sgPath : String; inRetval : Integer; begin sgPath := ExpandFileName(FileName); try inRetval := FindFirst(ExpandFileName(FileName), faAnyFile, SearchRec); If inRetval = 0 then Result := SearchRec.Size else Result := -1; finally SysUtils.FindClose(SearchRec); end; end; -- Atenciosamente, Vinicius S. L. Ribeiro [EMAIL PROTECTED] GNU/Linux User #293209. Get counted: http://counter.li.org/ willer escreveu: Aguém sabe como se faz para descobrir o tamanho do arquivo? Pode ser em bytes, Kbytes... Eu estou implementando uma rotina de exportação de dados. Os dados são enviados para um servidor de FTP, mas gostaria de informar quanto já foi enviado e quanto ainda falta para enviar, pois is arquivos são grandes e podem demorar um pouco. Tenho um arquivo chamado 'c:\db.dat', e gostaria de saber o tamanho dele, que pode variar de acordo com o conteúdo. Qualquer dica é bem vinda. Agradeço desde já. [As partes desta mensagem que não continham texto foram removidas] ___ Yahoo! Mail - Sempre a melhor opção para você! Experimente já e veja as novidades. http://br.yahoo.com/mailbeta/tudonovo/
Re: [delphi-br] Descobrir o tamanho do arquivo
Acabei de conseguir. Eu havia tentado isso, mas meu arquivo era to tipo TextFile e a função FileSize me trazia o número de Registros. Agora estou abrindo o arquivo como outro tipo qualquer e a função está me trazendo os dados corretamente agora. Mas valeu pela ajuda. Willer - Original Message - From: Rubem Nascimento da Rocha To: delphi-br@yahoogrupos.com.br Sent: Wednesday, January 17, 2007 3:08 PM Subject: RE: [delphi-br] Descobrir o tamanho do arquivo Já olhou no help do Delphi a função FileSize()? Sds. From: willer [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Descobrir o tamanho do arquivo Date: Wed, 17 Jan 2007 12:00:20 -0200 Aguém sabe como se faz para descobrir o tamanho do arquivo? Pode ser em bytes, Kbytes... Eu estou implementando uma rotina de exportação de dados. Os dados são enviados para um servidor de FTP, mas gostaria de informar quanto já foi enviado e quanto ainda falta para enviar, pois is arquivos são grandes e podem demorar um pouco. Tenho um arquivo chamado 'c:\db.dat', e gostaria de saber o tamanho dele, que pode variar de acordo com o conteúdo. Qualquer dica é bem vinda. Agradeço desde já. [As partes desta mensagem que não continham texto foram removidas] __ MSN Busca: fácil, rápido, direto ao ponto. http://search.msn.com.br __ Informação do NOD32 IMON 1984 (20070117) __ Esta mensagem foi verificada pelo NOD32 sistema antivírus http://www.eset.com.br [As partes desta mensagem que não continham texto foram removidas]