Einzelnen Beitrag anzeigen

BBoy

Registriert seit: 17. Jan 2007
418 Beiträge
 
Delphi 10 Seattle Professional
 
#3

Re: Wie am effektivsten aus diesen HTML Code Text parsen ?

  Alt 24. Apr 2010, 11:52
ok, danke. Also meine Routine um einen wert zu extrahieren sieht nun so aus:
Delphi-Quellcode:
var
string1 : String;
pos1,pos2 : Integer;
Platz : String;
begin
  memo10.lines.LoadFromFile('.\bearbeiten1.txt');
  string1 := lowercase(memo10.text);
  pos1 := posex('<div id=topcontainer>',string1,1);
  delete(string1,1,pos1);

  pos1 := posex('<div class=c1>',string1,1);
  pos2 := posex('</div>',string1,pos1);
  platz := trim(copy(string1,pos1+14,(pos2-pos1)-14));
end;
Das memo geladen wird usw entfällt später natürlich ist nur zum offline testen.
Ich finde zuerst den begin der eigentlichen topliste und lösche alles davor damit nicht fundstellen vorher schon vorkommen.
Die nächsten 2 Zeilen müsste ich dann für jeden wert den ich extrahieren will wiederholen.

Ist doch dann so ok oder ?
  Mit Zitat antworten Zitat