Fórum Adquirir Nomes dos Arquivos - Urgente #156734
29/04/2003
0
Preciso entrar em um diretório e saber o nome dos arquivos que há nele e depois pegar o nome de cada um dos arquivos e colocar em uma variável (matriz).
Quais são os comandos para que eu possa fazer isso
Obrigado
Quais são os comandos para que eu possa fazer isso
Obrigado
Ricardo Barbosa
Curtir tópico
+ 0
Responder
Posts
30/04/2003
Crash
Você pode usar o componente TFileListBox como uma variavel TStringList
ou TStrings, mas em outro caso:
Use o componente TFileListBox e o TDirectoryListBox ligados.
Especifique o Diretório ao TDirectoryListBox e faça um laço no TFileListBox:
var
I: Integer;
Variavel: TIPO;
beign
for I:= 0 to FileListBox1.Items.Count - 1 do
Variavel:= FileListBox1.FileName;
end;
Isso grava o nome completo do arquivo na variavel, inclusive o caminho do diretorio.
flws
ou TStrings, mas em outro caso:
Use o componente TFileListBox e o TDirectoryListBox ligados.
Especifique o Diretório ao TDirectoryListBox e faça um laço no TFileListBox:
var
I: Integer;
Variavel: TIPO;
beign
for I:= 0 to FileListBox1.Items.Count - 1 do
Variavel:= FileListBox1.FileName;
end;
Isso grava o nome completo do arquivo na variavel, inclusive o caminho do diretorio.
flws
Responder
Gostei + 0
18/09/2003
L!nk!n
CrasH, e se eu quiser pegar separadamente o nome dos arquivos e o caminho da pasta onde os arquivos estão gravados???
Valew!!!
Valew!!!
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)