Ohne Deine Hilfe hätte ich das nicht geschafft !
Gern geschehen.
Eine Frage habe ich jedoch:
Delphi-Quellcode:
var
hConnect: HINTERNET;
begin
...
if not Assigned(hConnect) then
Exit
else
...
end;
Ist
HINTERNET
als Zeiger definiert? Ansonsten ist
Assigned
falsch und du solltest stattdessen auf 0 überprüfen.
Gruß,
Sven