Fórum Pegar o nome do diretório #180765
08/09/2003
0
Pessoal !!!
Como faço para pegar o nome do diretório... Tem alguma função ???
Rogério
Como faço para pegar o nome do diretório... Tem alguma função ???
Rogério
Roger_prog
Curtir tópico
+ 0
Responder
Posts
08/09/2003
Marconi
Coloque a ferramenta FileListBox ou DirectoryListBox que está na aba Win 3.1.
Voce recupera o nome do diretório na propriedade directory de qualquer uma das duas.
O nome vem com o path completo. Mas voce pode utilizar as funções
Extract para recuperar os detalhes. Vide os métodos dos mesmos no Help.
arquivo:=ExtractFileName(FileListBox1);
Marconi
Voce recupera o nome do diretório na propriedade directory de qualquer uma das duas.
O nome vem com o path completo. Mas voce pode utilizar as funções
Extract para recuperar os detalhes. Vide os métodos dos mesmos no Help.
arquivo:=ExtractFileName(FileListBox1);
Marconi
Responder
Gostei + 0
08/09/2003
Marconi
:oops:
Corrija a linha
arquivo:=ExtractFileName(FileListBox1.directory);
:wink:
Marconi
Corrija a linha
arquivo:=ExtractFileName(FileListBox1.directory);
:wink:
Marconi
Responder
Gostei + 0
08/09/2003
Marconi
Outra Maneira é utilizar a função
var Diretório:string
begin
GetDir(0,diretorio);
ShowMessage(diretorio);
end;
utilize
0 => diretorio corrente
1 => drive A
2 => drive B
3 => drive C
... e assim por diante
Marconi
var Diretório:string
begin
GetDir(0,diretorio);
ShowMessage(diretorio);
end;
utilize
0 => diretorio corrente
1 => drive A
2 => drive B
3 => drive C
... e assim por diante
Marconi
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)