Ich habe mal versucht mit der Komponente THttpProd HTML Code für Web Seiten zu erzeugen. Diese Komponente gehört zu Delphi (Tab: Internet) zumindest seit Delphi 6 Pro, ist aber wenig bekannt.

In einem Html Template gibt es Tags, die mit einem Hash beginnen, z.B. <#author>. In einem onHTMLTag Event wird nach diesen Tag gesucht und es wird durch Html Text ersetzt, z.B. so:

markieren

Delphi-Quellcode:

procedure TfrmBookDetail.ppDetailHTMLTag(Sender: TObject; Tag: TTag;
  const TagString: String; TagParams: TStrings; var ReplaceText: String);

if TagString = 'author' then begin
    ReplaceText := '<span class="author">' + mBookAuthor + ':</span>'

Das ist ganz einfach.
Für kleine Html Seiten funktioniert die Komponente gut, aber bei großen Html Seiten gibt es manchmal einen Fehler: Zeile zu lang.
Deshalb suche ich nach Alternativen.

Ich benutze Delphi 7 Pro, der Source von THttpProd ist aber für Delphi 2005 Pro derselbe. Da scheint es keine Weiterentwicklung dieser Komponente zu geben.

Benutzt jemand andere Komponenten, um mit Delphi Html Seiten zu erzeugen?

So einen String Replace könnte ich auch selbst programmieren, bevorzuge aber eine Komponente.

Hallo,

wenn es ein Fehler zur Übersetzungszeit ist, dann könnte es ein zu großes String-Literal sein. In dem Fall kannst du das Literal einfach in kleinere Portionen aufteilen und diese verketten.

Freundliche Grüße