Wie liste ich Dateien mit IdftpServer

[delpher]

Hi leute,

Mich würde interessieren wie ich mit der Indy Komponente "IdFtpserver" meine gesamten Files auf der Platte freigeben kann so das ich sie mit einem Client laden löschen kann.
Habe bis jetzt folgendes gemacht:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  IDFTPSERVER1.Active:=TRUE;
end;

procedure TForm1.IdFTPServer1ListDirectory(ASender: TIdFTPServerThread;
  const APath: String; ADirectoryListing: TIdFTPListItems);
var
  list : TIdFTPListItem;
begin
  list := ADirectoryListing.Add;
  list.Size             := 0;
  list.ModifiedDate     := now;
  list.FileName         := 'C:\';
  list.ItemType         := ditDirectory;
end;

Jetzt listet er mir aber nicht C:\ sondern nur ne Verzeichniss was so heisst :-( will aber alles sehen weiss jemand was ???

Bin für jeden tip dankbar!

[edit=SirThornberry]Delphi-Tag geschlossen - Mfg, SirThornberry[/edit]

[manuel]

Hi,

das kannst du an deinem FTP-Server einstellen, was angezeigt wird.
ob man eine ganze Platte freigeben kann, weiss ich allerdings nicht...

manuel

[delpher]

Das ist ja meine frage wo kann man das einstellen??? Ich will ja den Server schreiben und nicht den clienten

[manuel]

Tja, wer lesen kann ist klar im vorteil :oops:
Da hab ich wohl nicht richtig aufgepasst.
dazu kann ich leider auch nix sagen.
irgendwie hab ich client gelesen :wall:

sorry

manuel

[delpher]

:-D Nicht schlimm, passiert ich bin schon Stundenlang am suchen und finde nix zu dem thema und bei den Indy Demos ist auch nix dabei :?