Autor Beitrag
endeffects
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 41



BeitragVerfasst: Di 28.12.04 13:02 
Hallo,

ich nutze seit einiger zeit einige units die es ermöglichen
strings sehr schnell zu bearbeiten

zu finden sind diese unter: www.droopyeyes.com/d...oads/faststrings.zip

in dieser unit sammlung gibt es eine methode die es unter anderem
ermöglicht sehr schnell tags in string zu bearbeiten,
leider steh ich hier vor dem problem das ich nicht
weiß wie genau ich diese methode einbinden soll,
das problem ist nämlich das man hier zusätzlich
noch eine zweite, eigene methode einbinden muss
die dann die inhalte aus den tags bearbeitet

wenn ich mal zitieren darf:

ausblenden Quelltext
1:
2:
3:
4:
FastTagReplace. Lets you specify a TagStart and TagEnd, each 
time text is encountered with these tags surrounding them, eg 
<!UserName!> a callback procedure will be executed allowing you to 
replace the tag with some specific text.


die methode ist in der unit wie folgt deklariert:

ausblenden Delphi-Quelltext
1:
2:
function FastTagReplace(const SourceString, TagStart, TagEnd: string
  FastTagReplaceProc: TFastTagReplaceProc; const UserData: Integer): string;


nun bin ich allerdings ratlos wie meine eigene "FastTagReplaceProc"
aussehen muss und wie ich diese deklarieren soll

kann sich das bitte vielleicht mal jemand kurz anschauen?
Udontknow
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 2596

Win7
D2006 WIN32, .NET (C#)
BeitragVerfasst: Di 28.12.04 13:09 
Hallo!

Das hier ist die Definition, sie steht ebenfalls in der Unit:

ausblenden Delphi-Quelltext
1:
  TFastTagReplaceProc = procedure (var Tag: stringconst UserData: Integer);					


Also muss deine Routine in etwa so aussehen:

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
procedure ReplaceTag(var Tag:Stringconst UserData:Integer);
begin
  if lowercase(Tag)='username' then
    Tag:='Klaus'
  else
    Tag:='Tag unbekannt';
end;


Cu,
Udontknow
tommie-lie
ontopic starontopic starontopic starontopic starontopic starofftopic starofftopic starofftopic star
Beiträge: 4373

Ubuntu 7.10 "Gutsy Gibbon"

BeitragVerfasst: Di 28.12.04 13:10 
Und der passende Crosspost dazu :roll:

_________________
Your computer is designed to become slower and more unreliable over time, so you have to upgrade. But if you'd like some false hope, I can tell you how to defragment your disk. - Dilbert