Download af filer

Bruger "Tråde"

TDownloadThread = class(TThread)
private
  fFileUri : string;
  fLocalDest : string;
public
  procedure Execute; override;
  constructor Create(const aFileUri, aLocalDest : string);
end;

constructor TDownloadThread.Create(const aFileUri, aLocalDest : string);
begin
  inherited Create(true);
  fFileUri := aFileUri;
  fLocalDest := aLocalDest;
  FreeOnTerminate := true;
end;

procedure TDownloadThread.Execute;
begin
  // Hent den her og gem fil fLocalDest;
end;

Det var det. Det eneste du behøver i dit program er:

  TDownloadThread.Create(Uri,'c:\akshdk\asælkdaæs.txt').Resume;

så passer den sig selv og du kan i teorien fyre ligeså mange afsted som du har lyst.

Hej
Bla. ved hjælp af jeres svar fik jeg løst problemet.
Læg lige svar begge to.

Det var godt at du kom videre.