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:
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.