Como abrir arquivos abertos / arquivos de log?

26/02/2003

0

Oi!

Eu sou o coordenador do Notes [url]http://notes.codigolivre.org.br[/url], um editor de textos de código livre feito em Delphi.

Estou tendo problemas ao abrir arquivos de log. Principalmente arquivos de log do IIS, pois pelo que parece o arquivo já está aberto...

O código que uso para abrir os arquivos é basicamente da biblioteca JCL:

function nFileToStr(const nArq: TFileName): string;
var
fs: TFileStream;
len: Integer;
begin
fs := TFileStream.Create(nArq, fmOpenRead or fmShareDenyWrite);
try
len := fs.Size;
SetLength(Result, len);
if len > 0 then
fs.ReadBuffer(Result[1], len);
finally
fs.Free;
end;
end;

Se alguém quiser todo o código pode pegar no site, ok?!

Por favor, me ajudem! E se alguém quiser participar do projeto,
me avise. O Notes está ficando famoso (quase 3000 downloads em pouco mais de 2 meses) mas eu continuo sendo o único programador...
(Existem pessoas que ajudam em outras áreas, mas não na programação...)

Abraço à todos,
Anderson


Notesnr

Notesnr

Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

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

Aceitar