Wird Callback Routine an richtiger Stelle aufgerufen?

[Mackhack]

Hallo DPler,

ich habe mit hilfe der WinInet Unit einen Dateiuploader geschrieben. Darin versuche ich auch mit einer Callback Routine den Status abzufragen und anzuzeigen. Nun meine eigentliche Frage:

Ist der Aufruf der Callback Routine an der richtigen Stelle?

Delphi-Quellcode:

...
  // Open an Internet Session
  try
    hNet := InternetOpen('WebUploader', INTERNET_OPEN_TYPE_PRECONFIG, Nil, Nil, 0);
    if ( Assigned(hNet) ) then
    try
      InternetSetStatusCallback(hNet, @StatusCallback);
      //Open FTP Server
      hFTP := InternetConnect(hNet, PChar(aHost), aPort, PChar(aUser), PChar(aPassword), INTERNET_SERVICE_FTP, 0, 0);
    except
      GetServerStatus;
    end;
  except
    GetServerStatus;
  end;
...

[Luckie]

Was heißt, "an der richtigen Stelle"? Da ein Handle benötigt wird, welches unter anderem von InternetOpen geliefert wird, kann das Setzen nur irgendwo danach mit InternetSetStatusCallback erfolgen.

Allerdings, was deine try-except-Blöcke angeht, Win-API Funktionen werfen in der Regel keine Exceptions. Guck lieber im PSDK noch mal nach, was im Fehlerfall dort passiert.

[Mackhack]

Luckie ich habe gesehen dass du hier im Board auch diese Callback Procedure mal gezeigt hast.

Hier zu finden

Wie verwendest du diese denn? Ich meine wie kommt das was in S gespeichert ist denn auf den Bildschirm?

Danke!

[Sunlight7]

Moin!

hFTP := InternetConnect(hNet, PChar(aHost), aPort, PChar(aUser), PChar(aPassword), INTERNET_SERVICE_FTP, 0, AllesAusserNull); Der letzte Parameter darf net 0 sein.