HTML-Object-Parser

MrSaint · Verfasst: Di 03.01.06 12:36

Hi!

Hab den Parser auch mal getestet und hab mir dazu ein kleines Testprogramm geschrieben. Großes Problem bei folgendem Quelltext:

markieren

XML-Daten

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE> New Document </TITLE>
</HEAD>

<BODY>

<font face="Verdana">Hallo <b> du da</font><font face="Courier New"> Ich bin </b>Courier!</font>

</BODY>
</HTML>

Ausgabe: Siehe Anhang!

MrSaint

Moderiert von Christian S.: Code- durch XML-Tags ersetzt

Einloggen, um Attachments anzusehen!

_________________
"people knew how to write small, efficient programs [...], a skill that has subsequently been lost"
Andrew S. Tanenbaum - Modern Operating Systems

r4id3n · Verfasst: Di 03.01.06 17:02

Der Parser hat in der tat einige Parsingprobleme auf die ich leider auch gestoßen bin!
Auch gibt es einige Probleme mit XHTML ...

Ich werde, sobald ich wieder etwas Zeit finde, die Version 2 des Parsers hier vorstellen!

BTW: Links finden ist doch ganz einfach ;-)

markieren

Delphi-Quelltext

1:	function GetElementListByTag(Tag:String):TList;

Ruf doch die einfach mal mit

markieren

Delphi-Quelltext

1:	MeineListe:=HTMLDokument.GetElementListByTag('A');

auf !?

In der Liste befinden sich dann alle
THTMLElements mit Tag A

Wichtig allerdings!!! Die Elemente der Liste nicht freigeben! Auch stehen die Elemente nur zur Verfügung, solange HTMLDokument nicht freigegeben wurde!!!!

@MrSaint, könntest du dein Demoprogramm villeicht mal für die allgemeinheit posten? Dann brauch ich keins zu schreiben ;-)

Und danke für eure Comments ... Auch wenn die nicht immer ganz positiv waren!

MrSaint · Verfasst: So 08.01.06 12:48

Oh, öhm, das Testprogramm hat leider schon die ewigen Datengründe erreicht... War aber nichts tolles... Ein SynEdit in das der zu untersuchende HTML Code kam, ein Button zum analysieren und ein TTreeView zur Ausgabe. Beim Buttonklick habe ich den Code von deinem Parser parsen lassen und habe dann das ergebnis mit einer rekursiven Methode in dem TreeView ausgegeben... Also nichts sonderlich großes, 5-10 Minuten

MrSaint

_________________
"people knew how to write small, efficient programs [...], a skill that has subsequently been lost"
Andrew S. Tanenbaum - Modern Operating Systems

Ehemaliges Mitglied Erhaltene Danke: 1

Hi r4id3n, ich bin im Moment dabei deine Komponente zu benutzen, allerdings stellt sich mir dabei ein Problem: Ich bräuchte die Position der jeweiligen Tags (evtl. als Property von THTMLElement), damit man einfach in der Datei dahinspringen kann?
Ist das evtl. mit deiner Komponente machbar oder kann jemand eine andere Empfehlen die das beherrscht, obwohl ich schon gern bei dieser bleiben würde, da ich sie sonst recht praktisch finde...

Danke und Gruß
Benedikt

neeoo · Beiträge: 16

r4id3n:

wann können wir mit der version 2 rechnen???

neeoo

0xCC · Beiträge: 150

r4id3n hat folgendes geschrieben:

Der Parser hat in der tat einige Parsingprobleme auf die ich leider auch gestoßen bin!
Auch gibt es einige Probleme mit XHTML ...

Ich werde, sobald ich wieder etwas Zeit finde, die Version 2 des Parsers hier vorstellen!

BTW: Links finden ist doch ganz einfach ;-)

markieren

Delphi-Quelltext

1:	function GetElementListByTag(Tag:String):TList;

Ruf doch die einfach mal mit

markieren

Delphi-Quelltext

1:	MeineListe:=HTMLDokument.GetElementListByTag('A');

auf !?

In der Liste befinden sich dann alle
THTMLElements mit Tag A

Wichtig allerdings!!! Die Elemente der Liste nicht freigeben! Auch stehen die Elemente nur zur Verfügung, solange HTMLDokument nicht freigegeben wurde!!!!

@MrSaint, könntest du dein Demoprogramm villeicht mal für die allgemeinheit posten? Dann brauch ich keins zu schreiben ;-)

Und danke für eure Comments ... Auch wenn die nicht immer ganz positiv waren!

also so ?
das scheint aber irgendwie nicht zu funktionieren...

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:

procedure TForm1.Button1Click(Sender: TObject);
var doc : THTMLDocument;
    body: THTMLElement;
    i:integer;
    l:tlist;
begin
    doc.Create(readtextfile('C:\danzig.html'));
    body := doc.GetBodyElement ;
    //l := tlist.Create ;
    l :=    doc.GetElementListByTag('TABLE');

    caption := inttostr(l.Count);
    for i := 0 to l.Count - 1  do
       memo1.lines.add( THTMLElement(l.items[i]).Content );
    l.free;

    (*    doc.ToTHTMLElementList
    for i := 0 to body.ChildCount -1 do begin
       body.ChildItems[i].
    end; *)
end;

ausserdem gibts ne access violation beim schliessen des progs

7down · Hält's aus hier Beiträge: 3

Hallo,

ich weiß, der Thread is schon ein "Bisschen" alt *g*..
Aber ich bräuchte die neuste Version dieser Klasse, allerdings ist der Downloadlink tot

Oder hat/kennt jemand eine ähnliche Klasse/Komponente, die zu einer HTML-Seite den Objektbaum erstellt?

Vielen Dank schonmal

7down

Ehemaliges Mitglied Erhaltene Danke: 1

Hi,

ich hab die Komponente bei mir aufm Rechner und nutze sie auch aktiv. Wenn du willst kann ich sie dir online stellen.

MfG Benedikt Loepp

7down · Hält's aus hier Beiträge: 3

Das wär natürlich super

Danke dir schonmal!

7down · Hält's aus hier Beiträge: 3

Habe die Komponente jetzt per PN bekommen aber noch schnell für die Öffentlichkeit hochgeladen

rapidshare.com/files.../HTMLParser.rar.html

Ich guck mich jetzt mal bissel um, wenn ich noch Frage hab, werd ich euch nicht verschonen

Danke&Ciao
7down

hui1991 · Verfasst: Mo 19.02.07 22:42

Und nach 30 Tagen wenn des zeug nicht runtergeladen wird, dann ist die Datei weg.
Warum lädt ihr die Datei net einfach hier hoch?
Dann bleibt die Datei länger erhalten.
Ich lade des lieber etz hoch, bevor es keiner macht.

MfG
hui1991

Einloggen, um Attachments anzusehen!

mimi · Beiträge: 3458 Ubuntu, Win XP Lazarus

hat jemand zufällig gerade von euch ein Beispiel zur hand wie man diese Unit/klasse nutzt ?

Bin am überlegen ob ich sie bei mir unter Lazarus einsetzten könnte/sollte für ein Projekt was ich dann allerdings komplet neu erstellen müsste. Wurden denn schon die angesprochenen Fehler gefunden ?

_________________
MFG
Michael Springwald, "kann kein englisch...."

MDX · Verfasst: Mi 25.02.09 05:21

markieren

XML-Daten

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE> New Document </TITLE>
</HEAD>

<BODY>

<font face="Verdana">Hallo <b> du da</font><font face="Courier New"> Ich bin </b>Courier!</font>

</BODY>
</HTML>

Naja, ist kein Wunder das Fehler kommen, bei nem falschen HTML Code xD

Zum Thema:
Gutes "Programm"

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme