Einzelnen Beitrag anzeigen

Benutzerbild von rollstuhlfahrer
rollstuhlfahrer

Registriert seit: 1. Aug 2007
Ort: Ludwigshafen am Rhein
1.529 Beiträge
 
Delphi 7 Professional
 
#16

Re: TCP-Server als Web-Server (Datein senden)

  Alt 11. Mai 2010, 17:14
Zitat von mb1996:
Mit [img]Bild.jpg[/img] sendet man ja ein Bild hoch.
Einspruch. Damit fordert man den Webbrowser auf, ein Bild nachzuladen. Mehr nicht.

Wie bietet man ein Bild zum Download an?
Delphi-Quellcode:
AResponseInfo.ContentType := 'image/jpeg';
FileStream := TFileStream.Create(FILENAME, mfOpenRead);
AResponseInfo.ContentLength := FileStream.Size;
AResponseInfo.ContentStream := FileStream;
Bernhard
Bernhard
Iliacos intra muros peccatur et extra!
  Mit Zitat antworten Zitat