On 27/7/2012 08:51, leledumbo wrote:
try this:
type
TMyTemplate = class(TFPTemplate)
private
procedure ReplaceMyTags(Sender : TObject; Const TagString : String;
TagParams:TStringList; Out ReplaceText : String);
public
constructor Create;
end;
procedure TMyTemplate.ReplaceM
Hey, that's nice, Michael. I never think of using TTemplateParser directly as
I thought it was meant to be used internally by TFPTemplate only. Now I see
that it actually has more features through OO approach instead of event
driven.
--
View this message in context:
http://free-pascal-general.1
try this:
type
TMyTemplate = class(TFPTemplate)
private
procedure ReplaceMyTags(Sender : TObject; Const TagString : String;
TagParams:TStringList; Out ReplaceText : String);
public
constructor Create;
end;
procedure TMyTemplate.ReplaceMyTags(Sender : TObject; Const TagString :
Str