idFTP - anderer Port als 21

[DRPEnc]

Es funktioniert ja, bis auf den port.

Ich dachte, ich verändere die demo um es mir leichter
zu machen.

Ich kann ja noch dazulernen. Kannst Du mir einen
link zu der tematik geben.

[p0w3r5tr34m3r]

LOL muckl...

also DRPEnc:
der grund wieso nur der untere nicht geht is einleuchtent... Du fragst ab od er connected is aber du gibst keine initialisierung das er überhaupt connecten soll ^^

Delphi-Quellcode:

begin
  idftp:=TIdftp.Create(Self);
  idftp.Username:= UserIDEdit.Text;
  idftp.Password:= PasswordEdit.Text;
  idftp.Port:=StrToInt(PortEdit.text);
  idftp.Host:= FtpServerEdit.Text;
//begin
  ConnectButton.Enabled := false;
  if IdFTP1.Connected then try

da fehlt das Connect()


Müsste eigentlich klappen wenn du das noch einbaust


Powerstreamer

[SirThornberry]

@p0w3r5tr34m3r: DAs connect fehlt nicht. Wenn connected ist muss ja nicht nochmal connected werden und im ELSE-Zweig ist das Connect vorhanden

[p0w3r5tr34m3r]

ja aber sollte man nich erstmal connecten bevor man abfragt ob er connected is ?

[SirThornberry]

@p0w3r5tr34m3r: No - Bei diesem Beispiel scheint der Connect und Disconnect-Button das gleiche zu sein. Du klickst also drauf und er ruft "connect" auf weil "connected=False". Wenn du dann verbunden bist und wieder den Button klickst wird ist "connected = True" und somit wird die Verbindung getrennt.

[DRPEnc]

Delphi-Quellcode:

procedure TMainForm.ConnectButtonClick(Sender: TObject);
var idftp:Tidftp;
begin
  idftp:=TIdftp.Create(Self);
  idftp.Username:= UserIDEdit.text;
  idftp.Password:= PasswordEdit.Text;
  idftp.Port:=StrToInt(Portedit.Text);
  idftp.Host:= FtpServerEdit.text;
  try
  idFTP1.Connect;
except
       showmessage('überprüfe Angaben!!!');
    end;
end;

bekomme immer socket 10061 fehler.