Forum: Netzwerke
Delphi
by SirThornberry,
11. Jan 2008
an dem Pfad alleine kann es nicht liegen. Schließlich sind beides absolute Pfade und das Handling ist dem Programmierer überlassen, sprich die Pfade müssen nicht real existieren.
Forum: Netzwerke
Delphi
by SirThornberry,
11. Jan 2008
Irgendwie kann ich die Logic noch nicht nachvollziehen:
procedure TForm1.IdFTPServer1UserLogin(ASender: TIdFTPServerContext;
const AUsername, APassword: string; var AAuthenticated: Boolean);
begin
if idftpserver1.active = true then
begin
AAuthenticated := False;
if ('test' = AUsername) and ('test' = APassword) then
begin