Also ich hab hier mal den Code
Delphi-Quellcode:
procedure TForm1.IdHTTPServer1CommandGet(AContext: TIdContext;
ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
var
Stream: TFilestream;
begin
Stream := TfileStream.Create('
HTML/index.htm',fmopenread);
AResponseInfo.ContentStream := Stream;
ARequestInfo.Document := '
/test.jpg'
end;
Und er funktioniert
Nun möchte ich noch die Bilder anzeigen lassen.
Wie kann ich das tun?