procedure TForm10.dwn1DoneFile(Sender: TObject; UserData: Integer;
  FileName: String; FileSize: Integer; Url: String);
begin try
self.anim1.Active :=false;
if go_code=false then begin
   Label4.Caption :='Download terminated by the user !';
   job_update:=false;
   FlatButton1.Visible :=false;
   FlatButton3.Visible :=true;
   Label4.Font.Color :=clRed;
   Label4.Font.Style :=[fsBold];
   Caption:='Download terminated !';
   SetForegroundWindow(Handle);
end else begin
   Label4.Caption :='Successfully Downloaded';
   Label4.Font.Style :=[fsBold];
   Label4.refresh;
   job_update:=true;
   FlatButton1.Visible :=CheckBox1.Checked;
   FlatButton3.Visible := not FlatButton1.Visible;
   self.end_sec1.Enabled :=true;
end;
except end;End;