então, da uma olhada no Help, FileOpen() tem um exemplo interessante.
Att, ....................................................... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 9961-7095 MSN: eduardo....@gmail.com Site: http://www.drdsistemas.com.br/ ....................................................... 2009/7/30 Marcos Abreu Ferreira <m.abreuferre...@hotmail.com> > > > Eduardo, > > estou abrindo o arquivo com os comando abaixo. Gostaria de saber antes se > ele esta aberto por outra aplicação. > > var F: TextFile; > > begin > AssignFile(F, 'arquivo.@@@'); > Rewrite(F); > Writeln(F, 'Just created file with this text in it...'); > CloseFile(F); > end; > > Att, > > Marcos Ferreira > --- Em delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br>, > Eduardo Silva dos Santos <eduardo....@...> escreveu > > > > > tenta abrir o arquivo em modo exclusico usando a função FileOpen() > > > > Att, > > ....................................................... > > Eduardo Silva dos Santos > > DRD SISTEMAS > > (27) 3218-4201 > > (27) 9961-7095 > > MSN: eduardo....@... > > Site: http://www.drdsistemas.com.br/ > > ....................................................... > > > > > > 2009/7/30 Marcos Abreu Ferreira <m.abreuferre...@...> > > > > > > > > > > > Pessoal, > > > > > > preciso saber se um arquivo txt está disponível ou não para gravação, > se > > > tem algum outro editor com ele em aberto. Alguém saberia me dizer como > fazer > > > isso no Delphi 7? > > > > > > Att, > > > > > > Marcos Ferreira > > > > > > > > > > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > [As partes desta mensagem que não continham texto foram removidas]