Zitat von
marabu:
Du musst dir kein eigenes Format ausdenken, wenn dir das Standardformat genügt. Bei den
Indy-Demos ist ein
FTP-Server dabei, den solltest du dir mal anschauen. Du arbeitest eigentlich nur mit der Collection und ihren Items, das passende Format wird ohne dein Zutun vor der Übertragung hergestellt.
Delphi-Quellcode:
procedure TForm1.FTPServerListDirectory(ASender: TIdFTPServerContext;
const APath: string; ADirectoryListing: TIdFTPListOutput; const ACmd,
ASwitches: string);
var st:TStrings;
aq:TIdFTPListOutputItem;
begin
ShowMessage('TEST');
end;
Das erste Problem ist, dass TEST nicht angezeigt wird, was heißt das der Code nicht ausgeführt wird.
Das zweite Problem ist, dass ADirectoryListing scheinbar eine TCollection oder ein TCollectionItem benötigt um mit Daten befüllt zu werden.
Leider weiß ich absolut nicht was ich machen soll.
Wär echt gut wenn mir das jemand erklären könnte.