Indy HTTP Server zeigt keine Bilder an ?

[Calimero]

Wenn ich versuche eine Seite mit Bildern aufzurufen zeigt er mir keine Bilder an oder nur die hälfte eines Bildes ! Mime Type ist auch richtig ! Warum will er nicht ?
Habe folgenden Programm Code benutzt bez. geschrieben.

Code:

procedure TForm1.IdHTTPServer1CommandGet(AThread: TIdPeerThread;
  ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
Var
  Stream: TFilestream;
  begin

if ARequestInfo.Document = '/' then begin
IF  fileexists(DocumentRoot + 'index.html') = true then ARequestInfo.Document := 'index.html';
IF  fileexists(DocumentRoot + 'index.htm') = true then ARequestInfo.Document := 'index.htm';
IF  fileexists(DocumentRoot + 'index.php') = true then ARequestInfo.Document := 'index.php';
end;

Stream := TfileStream.Create(DocumentRoot + ARequestInfo.Document, fmOpenRead or fmShareDenyWrite );
AResponseInfo.ContentStream := Stream; 
end;