Delphi 7 WebModule Zeichensatz Problem

[mczero]

Frage 1 habe ich selbst beantworten können, HTMLEncode() tut den Zweck

Zu Frage 2: Ja, Requests sind ja prinzipell immer UTF8, egal, bei AJAX Requests wandle ich nun auf Delphi Seite einfach um.

Danke!! Brett vorm Kopf gehabt

[s.h.a.r.k]

Zitat von mczero:

Zu Frage 2: Ja, Requests sind ja prinzipell immer UTF8, egal, bei AJAX Requests wandle ich nun auf Delphi Seite einfach um.

Naja, immer glaube ich nicht. Würde behaupten, dass es mit dem Zeichensatz zusammenhängt, mit dem die Website ausgeliefert wird. Eine andere Basis hat der Browser ja sonst nicht und genau damit arbeitet er dann.

[mczero]

Okay,

in irgendwelchen JQuery-Foren hatte ich das mal aufgeschnappt und so interpretiert, das UTF8 meist Standard ist...
gilt wahrscheinlich für XMLHTTPRequests. Egal, ich kann das ja in Delphi mit Request.ContentEncoding vorher abfragen...

[Thom]

Du kannst Dir die manuelle Codierung sparen - das macht Delphi automatisch. Entscheident ist dabei, vor der Zuweisung des Inhaltes die Eigenschaft ContentType auf UTF-8 zu setzen:

Delphi-Quellcode:

  Response.ContentType:='text/html; charset=UTF-8';
  Response.Content:=PageProducer.Content;

Damit werden auch deutsche Umlaute, Leerzeichen und Anführungsstriche korrekt übertragen.
Beispiel:

Delphi-Quellcode:

procedure TWebModule1.WebModule1TestAction(Sender: TObject; Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
  Response.ContentType:='text/html; charset=UTF-8';
  Response.Content:='" & ß ä ö ü Ä Ö Ü € á à Ù Ú';
end;

[mczero]

Leider gibt es damit Probleme...

Die HTML-Seite für den PageProducer hat einen META-Tag:

Code:

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

Wenn ich nun den Response ContentType auf UTF8 ändere, ist der ganze Text auf der Seite kaputt,
und wenn ich den ContentType ebenfalls auf "text/html; charset=iso-8859-1" setze, werden wieder alle möglichen
Sonderzeichen rausgeschmissen (im Value des Input-Tags).

[p80286]

Versuch es doch mal mit Zz:='&#'+ord(Z)+';' Gruß
K-H

[Thom]

Ja, das funktioniert wirklich nur, wenn der (Teil-)String 'UTF-8' im ContentType enhalten ist. Das wird vor der Codierung von TWebModule getestet (das sieht man leider nur, wenn man sich den Quelltext näher anschaut).
Delphi schreibt diese Information dann in den Antwort-Header. Gelangt jetzt diese Information ein weiteres mal an den Browser, wertet dieser meistens das letzte Vorkommen aus - das wäre in Deinem Fall "iso-8859-1". Und das ist Latin-1 und nicht UTF-8, wodurch der Browser den Inhalt falsch interpretiert.

Versuch mal, die betreffende Zeile im PageProducer-Content auszukommentieren:

Code:

<!--meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"-->

[mczero]

Vielen Dank,

ich bin leider noch nicht dazu gekommen, es auszuprobieren! Ich melde mich