Ich habe ein komisches Problem mit Idhttpserver, und zwar wird eine
html Seite ohne CSS angezeigt obwohl die Dateien geladen werden.
Hier mal der Servercode
Delphi-Quellcode:
procedure TForm2.IdHTTPServer1CommandGet(AContext: TIdContext;
ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
Var
Module : TStringList;
i : Longint;
isLogin : Boolean;
HTMLPage : THTMLPage;
Module1 : String;
SubModule : String;
Buffer : String;
Stream : TFileStream;
begin
Buffer:=ARequestInfo.Document;
If Copy(Buffer,1,1)='/' then
Delete(Buffer,1,1);
Buffer:=StringReplace(Buffer,'/','\',[rfReplaceAll]);
Buffer:=ProgPath+'res\'+Buffer;
If FileExists(Buffer) then
Begin
AResponseInfo.ResponseNo:=200;
AResponseInfo.ContentStream:=TFileStream.Create(Buffer,fmOpenRead or fmShareDenyNone);
AResponseInfo.WriteContent;
End;
Die Dateien liegen im Irdner RES wenn ich da die
HTML mit Firefox Starte sieht alles gut aus nur wenn ich das dann über den HTTPServer laden fehlt anscheinend die CSS
Was kann das sein.