Huhu!!
Hab da folgende Probleme:
wie unterbreche ich WÄHREND des downloads ein IdHTTP?
und wie gebe ich diese datei dann frei und kann sie DANN löschen
BZW --->>> Mein Programm löscht die gedownloadete datei , dass der Benutzer keine Probleme hat , diese von Hand zu löschen
Zum downloaden so
Delphi-Quellcode:
Button1.Enabled := false;
Edit1.Enabled := false;
Edit2.Enabled := false;
Button2.Enabled := true;
Ziel := Edit2.text;
Datei:=TFileStream.create(Ziel,fmCreate);
IdHttp1.Get(Edit1.Text,Datei);
Datei.Free;
zum löschen so:
Delphi-Quellcode:
function DeleteFile(const AFile: string): boolean;
var
sh: SHFileOpStruct;
begin
ZeroMemory(@sh, sizeof(sh));
with sh do
begin
Wnd := Application.Handle;
wFunc := fo_Delete;
pFrom := PChar(AFile +#0);
fFlags := fof_Silent or fof_NoConfirmation;
end;
result := SHFileOperation(sh) = 0;
end;
Datei.Free;
Button1.Enabled := true;
Edit1.Enabled := true;
Edit2.Enabled := true;
Button2.Enabled := false;
DeleteFile(Ziel);
Aber wie gehts richtig?
