Zitat von
nahpets:
Hallo,
ob's mit PHP-Dateien funktioniert, weiß ich nicht, kommt auf 'nen Versuch an.
TPageProducer hat ein Attribut für einen Dateinamen, dort gebe ich mein Template an.
Wenn nun TPaceProducer.Content abgerufen wird, parst er diese Datei und ersetzt die Tags.
Delphi-Quellcode:
Var
pp : TPageProducer;
sFertigeSeite :
String;
begin
pp := TPaceProducer.Create(
Nil);
pp.HTMLFile := '
MeinTemplate.html';
pp.OnHTMLTag := ppHTMLTag;
// bei dieser Zuweisung werden die Tags ersetzt.
sFertigeSeite := pp.Content;
... mach damit was Du willst ;-)
pp.Free;
end;
procedure ppHTMLTag(diverse parameter macht Dir die
IDE, hab ich gerade nicht da);
begin
if comparetext(TagString,'
1terparameter')
then begin // Tagstring ist einer der Prozedurparameter
// Über die Komponente TDataSetTableProducer können hier auch komplette Abfrageergebnisse
// von Datenbanken eingefügt werden.
// Eigentlich ist alles möglich, was als Ergebnis einen String liefert.
ReplaceText := '
Das möchte ich beim Parameter <#1terparameter> im Template stehen haben';
end else
if comparetext(TagString,'
2terparameter')
then begin
ReplaceText := '
Das möchte ich beim Parameter <#2terparameter> im Template stehen haben';
end else begin
ReplaceText := '
Upp''
s, für den Parameter <#' + TagString + '
> habe ich keinen Rückgabewert.';
end;
end;
Das ist jetzt nur so hingedaddelt, habe momentan kein Delphi zur Verfügung.
Hoffe, es wird klar was geht, Du kannst ja dann entscheiden, ob's für Dich geeignet ist.
super ... vielen dank dafür ... ich bin trotzdem noch nicht sicher ob ich es damit realisieren kann und ob es bei artisteer so gemacht wird ... hmpf
alles etwas kompiliziert ... vor allem das ganze so editierbar zu machen .... am besten wäre es wenn man jeden teil der webpage anklicken könnte so wie im firebug von firefox und dann entweder den css teil /
html teil hat oder bei grafiken diese entsprechend anpassen kann ... ich überlege noch wie ich das aufbaue