GetDir + FTP

[japetos]

Folgedes habe ich:

Code:

procedure TForm1.Button6Click(Sender: TObject);
var
  Node: TTreeNode;
  Path: string;
  Dir, s: string;
begin
  Dir := 'C:\d7\';
  Screen.Cursor := crHourGlass;
  TreeView1.Items.BeginUpdate;
  try
    TreeView1.Items.Clear;
    GetDirectories(TreeView1, Dir, nil, True);
  finally
    Screen.Cursor := crDefault;
    TreeView1.Items.EndUpdate;
  end;
end;

wie bekomme ich nun einen Folder wenn idFTP1 verbunden ist. Spruch die OrdnerListe des FTP Servers und nicht die von meinem Rechner?