Hi !
Ich schreibe gerade an einem kleinen Http Server. klappt zum Teil auch schon ganz gut.
mit
Delphi-Quellcode:
procedure TForm1.IdHTTPServer1CommandGet(AContext: TIdContext;
ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
Var
Stream: TFilestream;
TheString : String;
begin
if ARequestInfo.Document = '/' then begin
AResponseInfo.ContentType := 'image/jpeg';
IF fileexists('test.jpg') = true then ARequestInfo.Document := 'test.jpg';
end;
Stream := TfileStream.Create('Login/test.jpg', fmOpenRead or fmShareDenyWrite );
AResponseInfo.ContentStream := Stream;
setlength(TheString, stream.size);
stream.Read(TheString[1], stream.size);
end;
kann ich das Bild per
http://127.0.0.1 aufrufen und übers netzwerk - nicht aber übers Internet, also über die externe
IP !
Was mache ich falsch ?
EDIT // Problem glöst. habe allerdings schon ein neues
und zwar will ich eine
HTML seite anzeigen. das geht auch. doch ich will machen, dass der user bei mir einen prozess ausführen kann. soll heissen er klickt auf einen link auf meiner bereitgestellten
HTML seite und bei mir wird vom server aus ein programm gestartet. Wie kann ich das realisieren ?
THX