IdHttp - defekte Zeilenumbrüche (0A statt 0D0A) bei Text

[moelski]

Moin !

Ich lade Dateien mit IdHTTP von einem Server. Der Code sieht im Prinzip so aus:

Delphi-Quellcode:

  lStream := TFileStream.Create(TargetFolder + Filename, fmCreate or fmShareDenyNone);
  lStream.Position := 0;

  repeat
    // Damit sich das Programm nicht aufhängt
    Application.ProcessMessages;

    //Hier wird gebrüft ob die restlichen Bytes größer sind als cFileSplitSize
    if (BytesInsgesamt-BytesKopiert) > cFileSplitSize then
      //Hier wird einmal die cFileSplitSize eingestellt
      IdHttp.Request.Range := Format('%d-%d', [BytesKopiert, (BytesKopiert+cFileSplitSize-1)])
    else
      IdHttp.Request.Range := Format('%d-'  , [BytesKopiert]);

    Application.ProcessMessages;

      //Den eingesttelten Teil herunterladen und ihn die Datei speichern
      IdHTTP.Get(FileToLoad , lStream);
      BytesKopiert := BytesKopiert+cFileSplitSize;

    Application.ProcessMessages;
  until (BytesKopiert >= BytesInsgesamt); //Schleife beenden wenn datei fertig

  if Assigned(lStream) then lStream.Free; //FileStream freigeben wenn gesetzt

Das funzt auch ganz gut soweit. Die Dateien werden in Blöcken geladen.
Nun habe ich aber z.B. bei Textdateien das Problem das die Zeilenumbrüche nicht 0D0A sind sondern auf 0A gestutzt werden.
Andere Dateien hingegen werden allerdings problemlos geladen. Wenn ich z.B. eine EXE übertrage ist alles ok.

Nun stellt sich mir die Frage ... Liegt das an TFileStream oder an IdHTTP? Und was kann ich dagegen tun?
Muss ich ggf. beim Stream Create einen zusätzlichen Parameter angeben?
Braucht IdHttp evtl. eine spezielle Einstellung?

Im Grunde will ich ja nur Dateien als Binärstream downloaden.

@Mod: Sollte das eher an IdHTTP liegen, bitte ins Internet Forum verschieben - Sorry.