hi

gibt es eine art ReplaceAll wo ich wildcard(s) benutzen kann?

ich brauch nicht ? (ein zeichen) sondern nur * (0-ganz viele zeichen )

gibts das irgendwo?

Könntest du mir dein Prolem genauer erllären, bzw. ein Beispiel posten ?
Ich stehe gerade irgendwie auf dem Schlauch.

ich brauche eine function wie diese:

zusammenfalten · markieren

Delphi-Quellcode:

function ReplaceWildCard(ToRep, RepWith: String):Boolean;
var T:Integer;
begin
  T:=Pos(ToRep,MainString);
  if T>0 then
    begin
    Delete(T,Length(ToRep));
    Insert(T,RepWith);
    end;
  Result:=T>0;
end;

function ReplaceAllWildCards(ToRep, RepWith: String);
begin
  while ReplaceWildCard(ToRep, RepWith) do ;
end;

die halt einen String abcdefg auch ersetzt, wenn der Suchstring a*d*g ist...

Hi,

Du könntest im Forum mal nach regular expressions suchen, vielleicht sind die was für dich.

mfG
mirage228

hi

ich hab mittlerweile die function MatchesMask gefunden und mir folgende lösung zum löschen von HTML-Tags gebastelt:

zusammenfalten · markieren

Delphi-Quellcode:

function TForm1.DeleteHTMLTags(Code: String):String;
var i, j:Integer;
begin
  i:=1;
  while i<>0 do //Wenn PosEx nix mehr findet...
    begin
    j:=PosEx('>',Code,i+1);
    if j>0 then
      if MatchesMask(copy(Code,i,j-i+1),'<*>') then Delete(Code,i,j-i+1);
    i:=PosEx('<',Code,i);
    end;
  Result:=Code;
end;

nun die frage: wie schaffe ich es dass er zuerst die script-Tags löscht?

Indem du zuerst nach '<script*/script>' und danach erst nach '<*>' suchen lässt