Sistema FTP

[Diego Gonçalves 0]

Boa noite, pessoal.

 

Estou desenvolvendo um sistema ftp, está quase pronto diga-se de passagem. Meu sistema falta apena uma coisa, quando ele conecta no servidor ele exibe os diretórios normalmente, porém, eu não consigo navegar por eles.

 

Estou utilizando um listbox para listar a estrutura do meu site. Eu preciso fazer uma forma que quando eu desse dois cliques no diretório ele abrisse o que possui dentro dele, seja outro diretório ou os arquivos.

 

 

Se alguém puder me ajudar, eu agradeço.

[Diego Gonçalves 0]

Alguém ae sabe qual seria o camando para que eu possa navegar pelos diretórios através do listbox ?

 

Obrigado!!!

[Chrnos 30]

Na aba win3.1 (delphi 5), você tem os componentes DirectoryListBox e FileListBox... talvez com eles você possa controlar mais fácil a navegação e visualização de pastas e arquivos no seu aplicativo... em todo caso, sem ver seu código fica meio complicado ajudar a resolver seu problema....

 

[]'s

[Diego Gonçalves 0]

Chrnos, segue o código.

Uma coisa que acho que esqueci de falar é que estou utilizando o componente Idftp da Indy.

 

//conecta no servidor 
procedure TF_FTP.Button1Click(Sender: TObject);
begin

Ftp.Disconnect;
ftp.Host:= edit1.Text;
Ftp.Username:= Edit2.Text;
ftp.Password:= edit3.Text;
Ftp.Connect;
Ftp.List(Listbox1.Items,'',false);
Memo1.Lines:= Ftp.Greeting.Text;
ShowMessage('Conectado...');

Também tentei utilizando os componentes DirectoryListBox e FileListBox, mas não mudou nada. necessita do comando para habilitar a navegação pelos diretórios do servidor.

 

Caso possa me ajudar eu agradeço.

[Paulo do Brasil 0]

* Tudo pronto:

 

arquivos de programas

borland

delphi6

Demos

Indy

FTPDemo

FTPDemo.dpr