Einzelnen Beitrag anzeigen

Linguini

Registriert seit: 19. Mai 2009
95 Beiträge
 
#8

Re: String nach Muster durchsuchen

  Alt 24. Jun 2009, 13:32
So hab mich mal in RegEx eingelesen und zumindest schon mal E-Mail Adresse raussuchen hinbekommen =)
Jetzt will ich Hyperlinks raussuchen also alles zwischen href=" und dem Ende.


Delphi-Quellcode:
begin
writeln(myFile,'Hyperlinks:');
RegExpr := nil;
  try
    RegExpr := TRegExpr.Create;
    if RegExpr <> nil then begin
      RegExpr.Expression := '|[url="(.*?)"](.*?)[/url]|' ;

      if RegExpr.Exec(memo1.text) then
        repeat
          Writeln(myFile,(RegExpr.Match[1]));
        until not RegExpr.ExecNext;

    end;
  except
  end;
  RegExpr.Free;
So wird das leider nichts...
Entdeckt jemand den Fehler bei der Expression?
  Mit Zitat antworten Zitat