Alle Links einer HTML-Datei filtern

[Nils_13]

Hi,

um alle Links einer HTML-Datei in eine StringList oder ähnliches zu bekommen, muss man Regular Expressions benutzen. Das Suchergebnis brachte mich zu TRegExpr. Der beiliegende HyperlinkDecorator kümmert sich scheinbar darum, aus http://blubb.de oder Abwandlungen davon einen HTML-Link zusammenzubauen, also so: . Ich möchte das Gegenteil, aus einem soll der Link im Klartext werden. Könnte man nicht dafür die im letzten Link gezeigte Unit umbauen ? Ich bin irgendwie zu blöd dafür :duck:

[Die Muhkuh]

Du willst aus

bla

den Link blubb.de bekommen?

[Nils_13]

Jo.

[RWarnecke]

Dieser Link hier zu den Schweizern könnte doch etwas für Dich sein.

[Die Muhkuh]

Ich schlage mal diese RegEx vor:

#(.*?)#

[Nils_13]

Hm, den hatte ich auch schonmal, allerdings wird leider nichts ausgegeben.

Delphi-Quellcode:

for j := 0 to Pred(sl.Count) do
begin
  RegExpr.Expression := '#[url="(.*?)"](.*?)[/url]#';
  if RegExpr.Exec(sl[j]) then
  begin
    repeat
      Result.Append(RegExpr.Match[1]);
    until
      not RegExpr.ExecNext;
  end;
end;

[alcaeus]

Versuchs mal mit TRegExpr.Match(). Ich hab lang nichts mehr mit der Komponente gemacht, d.h. ich kann dir grad nicht sagen, wie du an die Matches kommst, aber in den Projekten, wo ich was matchen musste, hab ichs mit Match gemacht:

Delphi-Quellcode:

preRegExp.RegEx := '[url="(.*?)"](?:.*?)[/url]';
preRegExp.Subject := idhWebsite.Get('http://www.foo.bar');
if (not preRegExp.Match()) then
begin
  bCancelled := True;
end
else
begin
  Link := preRegExp.SubExpressions[1];
end;

Da faellt mir auf: die Komponente will die RegEx ohne Delimiter. Lass mal die # weg ;)

Greetz
alcaeus

[marabu]

Hallo,

eine Alternative wäre noch ExtractLinks(), z.B. hier: Memo nach bestimmten Links durchsuchen

Freundliche Grüße

[FAlter]

Hi,

notfalls geht es auch ohne RegEx.

Mfg
FAlter

[Nils_13]

Danke für die vielen Antworten, werde mal schauen, was sich am besten eignet und hoffentlich nicht nochmal in diesem Thema eine Frage stellen :)