Hi
1. Okay, sorry
2. Indy: 9, Delphi: 0. benutze BCB, werde wenn mir jemand geholfen hat den code nach BCB portieren.
3. Es gibt leider kein server beispiel. lediglich ein client.
4. Naja...
5. Keine.
Okay. wie bereits gesagt geht es um das listen von dateien/ordner. dies tut nicht. der code sieht erstmal nur soweit aus das der server aktiviert wird also active = true. dann das ein benutzer auch access hat, zum dementsprechenden HomeDir. dies sieht wie folgt aus:
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
| void __fastcall TForm1::FormCreate(TObject *Sender)
{
ftp->Active = true;
}
void __fastcall TForm1::ftpUserLogin(TIdFTPServerThread *ASender,
const AnsiString AUsername, const AnsiString APassword,
bool &AAuthenticated)
{
if(AUsername == "test" && APassword == "12345")
{
AAuthenticated = true;
ASender->HomeDir = "C:\\";
ASender->CurrentDir = "C:\\";
}
} |
weicht nicht sehr von delphi ab. sollte verständlich sein
okay, soweit so gut. wenn ich nun den server starte und mit einem ftp client versuche zu connecten klappt das alles auch bis auf das listen von dateien und ordner. (hier also "C:").
habe gelesen das man irgendwas im event "ListDirectory" machen muss, blos was genau?
