wie benutze ich regular expressions?

[nimmersattXD]

meine version hab ich ja schon geschrieben, aber hier mal ein teil meines quellcodes

Code:

//routine zum suchen der Url in den htmls

page:=TStringList.Create;
re:=TRegExpr.Create;

try
    page.LoadFromFile(LiBoSit.Items[0]);
    re.Expression:='(.+).(jpg|png|pdf|bmp|gif)';
    if re.Exec(page.Text) then
      begin
      LbTest.Caption:=re.Match[0]
      end;
  finally
    page.Free;
    re.Free;
  end;

[nat]

also habs grad getestet, meine expr geht bei mir.
wie sieht denn dein html aus?
wie gesagt, das hier geht bei mir:

Delphi-Quellcode:

var
  Succ: Boolean;
begin
  with TRegExpr.Create do
  try
    ModifierG := false;
    Expression := '<img .*src="([^"]*)"';
    InputString := Memo1.Text;
    Succ := Exec;
    while Succ do
    begin
      showmessage(Match[1]);
      Succ := ExecNext;
    end;
  finally
    Free;
  end;
end;

[nimmersattXD]

also das is ne index.html im moment mit der ich austeste, da is auch java drin un alles! ansonsten muss ich dann auch htmlms durchsuchen!

ich hab deins jetzt noch mal bei mir eingesetzt und jetzt kommen bei mir die ganzen src tags raus, aber auch links und tabellen! das ist auf jedenfall schonmal eine verbesserung zu meinem, aba leider noch nicht das was ich brauche!

das was ich rausbekommen moechte ist konkret: bildname.jpg (zum Bleistift )

[nat]

und genau das bekomme ich bei mir
poste hier ma den quelltext von deinem html.
dann kann ich das auch mal testen.

[nimmersattXD]

mist das wuerd ich gern machen, aber ich glaub das is betriebsintern


hab das jetzt aber mal ueber ne htmlm laufen lassen und da kommt das raus:

[img]/at/app_pic/sapcer.gif[/img]</td>

[nat]

kannst du nich schnell mal n auszug nehmen und die texte/links austauschen? dann is doch nichts mehr drin!
wie gesagt, bei mir klappt das alles problemlos. du achtest auch darauf Match[1] zu nehmen statt
Match[0]? in Match[0] ist der img-tag, in Match[1] nur der dateiname!

[nimmersattXD]

aaaaaah das wusst ich nicht mit dem match[1] jetzt sieht das schon besser aus aber leider is noch der pfad mit dabei! bekomm ich den noch irgendwie weg? wenn nich muss ich damit weiterarbeiten!

[nahpets]

Hallo,

versuche es mal bitte mit

Delphi-Quellcode:

ModifierI := True; 
ModifierG := false; 
ModifierM := false; 
ModifierS := false; 
ModifierX := false; 
Expression := '<img .*src=".*"';

Zum Testen habe ich diese Seite hier aus der DP, in der wir gerade Schreiben, genommen, eventuell könnt Ihr euch zum Testen ja erstmal auf diese Seite einigen, um gleiche Ausgangsvorausetzungen zu haben.
Das Problem sind vermutlich Bilder, die gleichzeitig als Links genutzt werden, bzw. Bilder, hinter deren Tag weitere Tags folgen, die Hochkommata enthalten.

Stephan

[nat]

naja, das is ja schnell gemacht...
- letzte position von / ermitteln
- wenn gefunden von da bis ende des strings kopieren
das sollte man auch ohne regex hinkriegen

[nimmersattXD]

schnell gemacht?? sowas hab ich noch gar nich gemacht! ich hab vor kurzen ne funktion pos() gesehen! damit meinst du?