hallöle
ich lade mit folgender funktion eine datei runter:
Delphi-Quellcode:
function DownloadFile(SourceFile, DestFile: string): Boolean;
begin
try
Result := UrlDownloadToFile(nil, PChar(SourceFile), PChar(DestFile), 0, nil) = 0;
except
Result := False;
end;
end;
Aufruf:
Delphi-Quellcode:
if DownloadFile(SourceFile, DestFile) then
begin
showmessage('Download wurde erfolgreich abgeschlossen!!');
end
else
showmessage('Fehler');
end;
allerding friert das programm immer ein wenn ich den download starte und 'taut' erst nach dessen ende wieder auf.
der download funktioniert einbahnfrei genau so wie ich es mit wünsche aber, es ist mir unrecht dass das programm einfriert.
Application.ProcessMessages;
kenn ich natürlich, weiß aber nicht wie ich es in diesem falle einbringen soll, alles was ich bis jetzt versucht hab ist wirkungslos
danke im vorraus