Upload per FTP

[Delphi08]

hab ich eben versucht, aber der Fehler tritt immer noch auf.
Delphi kann wohl das Programm nicht beenden, muss immer erst komplett aus Delphi raus.

Hab es mal als Konsolenanwendung ausgelagert.
Ruf ich es nach dem Absturz erneut auf, bekomm ich nur noch den schwarzen Kasten, keinen Error mehr, sondern das Programm hängt sich einfach auf.

Gehe ich mit dem Debugger durch das Programm, so muss der Fehler wohl in dieser Zeile liegen:

  hconnect := InternetConnect(hopen, pchar(server), port, pchar(username), pchar(password), INTERNET_SERVICE_FTP, INTERNET_FLAG_PASSIVE, 0); Denn ab hier geht nichts mehr.

Mein Aufruf sieht wie folgt aus:

putfile('meinserver.de', 'meinBenutzer', 'dasPasswort', 'C:\loewe.jpg', '/Test/loewe.jpg'); Verzeichnis "Test" existiert auf dem Server, und nach dem 1. ausführen ist es auch dort zu finden. Also dürfen die Parameter eigentlich stimmen.