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;
...
Um etwas Neues zu schaffen muss man seine Ohren vor den Nein-sagern verschliessen um seinen Geist öffnen zu können.
(George Lukas)