Problem mit Zeichen im RichEdit

[Memnarch]

GetHTMLText?
HAbe ich das richtig verstanden, dass du eigentlich nur diesen Text anzeigen möchtest?(Also als planetext) im Richedit?

EDIT: oder filtesrt du da oben nur Bestimmte sektionen heraus o.O

MFG
Memnarch

[dor557]

der HTMLCode soll für den gewählten teil angezeigt werden, damit ich dann hinterher weiter durchsuchen kann.

so das ich nicht die Ganze datei durchsuchen muss.

Ich möchte hinterher aus der HTML datei eine Tabelle mit den Daten erstellen.

Muss das aber von hand durchsuchen da die datei sehr Komplex ist.

gruss Sascha

das ist der Teil der hinterher weiter durchsucht werden muss :

HTML-Code:

	<div id="roster" class="table">
		<table>
			<thead>
				<tr>
							<th class="name">
								<a href="javascript:;" class="sort-link">

									<span class="arrow">Name</span>
								</a>
							</th>
							<th class="race">
								<a href="javascript:;" class="sort-link">
									<span class="arrow">Volk</span>
								</a>
							</th>

							<th class="cls">
								<a href="javascript:;" class="sort-link">
									<span class="arrow">Klasse</span>
								</a>
							</th>
							<th class="lvl">
								<a href="javascript:;" class="sort-link numeric">
									<span class="arrow">Stufe</span>

								</a>
							</th>
							<th class="rank">
								<a href="javascript:;" class="sort-link numeric">
									<span class="arrow">Gildenbank</span>
								</a>
							</th>
							<th class="ach-points">

								<a href="javascript:;" class="sort-link numeric">
									<span class="arrow">Erfolgspunkte</span>
								</a>
							</th>
							<th class="lifetime">
								<a href="javascript:;" class="sort-link numeric">
									<span class="arrow">Gesamt</span>
								</a>

							</th>
							<th class="weekly">
								<a href="javascript:;" class="sort-link numeric">
									<span class="arrow">Wöchentlich</span>
								</a>
							</th>
				</tr>
			</thead>

			<tbody>

			<tr class="row1"
				 data-level="84">
				<td class="name"><a href="/wow/de/character/die-todeskrallen/wirgo/" class="color-c5">Wirgo</a></td>
				<td class="race" data-raw="untote">
					<img src="/wow/static/images/icons/race/5-0.gif" class="img" alt="" data-tooltip="Untote" />
				</td>
				<td class="cls" data-raw="priester">
					<img src="/wow/static/images/icons/class/5.gif" class="img" alt="" data-tooltip="Priester" />

				</td>
				<td class="lvl">84</td>
				<td class="rank" data-raw="2">
					<span >
							Rang 2
					</span>
				</td>
				<td class="ach-points">
					<span class="ach-icon">2610</span>

				</td>
				<td class="lifetime">1245343</td>
				<td class="weekly">677344</td>
			</tr>

			<tr class="row2"
				 data-level="83">
				<td class="name"><a href="/wow/de/character/die-todeskrallen/teglarius/" class="color-c9">Teglarius</a></td>
				<td class="race" data-raw="untote">

					<img src="/wow/static/images/icons/race/5-0.gif" class="img" alt="" data-tooltip="Untote" />
				</td>
				<td class="cls" data-raw="hexenmeister">
					<img src="/wow/static/images/icons/class/9.gif" class="img" alt="" data-tooltip="Hexenmeister" />
				</td>
				<td class="lvl">83</td>
				<td class="rank" data-raw="1">
					<span >

							Rang 1
					</span>
				</td>
				<td class="ach-points">
					<span class="ach-icon">3780</span>
				</td>
				<td class="lifetime">2248698</td>
				<td class="weekly">0</td>

			</tr>

			<tr class="row1"
				 data-level="85">
				<td class="name"><a href="/wow/de/character/die-todeskrallen/star/" class="color-c8">Star</a></td>
				<td class="race" data-raw="troll">
					<img src="/wow/static/images/icons/race/8-1.gif" class="img" alt="" data-tooltip="Troll" />
				</td>
				<td class="cls" data-raw="magier">
					<img src="/wow/static/images/icons/class/8.gif" class="img" alt="" data-tooltip="Magier" />

				</td>
				<td class="lvl">85</td>
				<td class="rank" data-raw="1">
					<span >
							Rang 1
					</span>
				</td>
				<td class="ach-points">
					<span class="ach-icon">6455</span>

				</td>
				<td class="lifetime">8251963</td>
				<td class="weekly">218510</td>
			</tr>

			<tr class="row2"
				 data-level="85">
				<td class="name"><a href="/wow/de/character/die-todeskrallen/a%c3%aaro/" class="color-c8">Aêro</a></td>
				<td class="race" data-raw="untote">

					<img src="/wow/static/images/icons/race/5-0.gif" class="img" alt="" data-tooltip="Untote" />
				</td>
				<td class="cls" data-raw="magier">
					<img src="/wow/static/images/icons/class/8.gif" class="img" alt="" data-tooltip="Magier" />
				</td>
				<td class="lvl">85</td>
				<td class="rank" data-raw="7">
					<span >

							Rang 7
					</span>
				</td>
				<td class="ach-points">
					<span class="ach-icon">4335</span>
				</td>
				<td class="lifetime">86750</td>
				<td class="weekly">0</td>

			</tr></tbody></table></div>

[dor557]

Die Daten sind nun ausgelesen. Funktioniert auch super.

Aber das Problem mit den Zeichen besteht weiterhin.

Hat keiner eine Idee ????

[alfold]

Kann es sein das die Umlaute als html zeichen so drin stehen Ö = &ouml (heute standard)
und Du das evtl erst noch Filtern musst? Irgend wo mal was gesehen darüber, weiss bloss nicht mehr wo

Gruss alfold

[dor557]

eahmmm..... Gute Frage. Im quellcode stehen die im htmlumlaut code drinnen. aber wie kann ich das dann in Delphi in den richtigen Zeichensatz umwandeln ?

geht as überhaupt ?

[alfold]

Glaube irgendwas mit AnsiToUtf8 und Utf8ToAnsi,
RichEdit1.Text := GetHtmlText(utf8toansi(tmpfile), 'roster', checkbox1.Checked); wenn es die Stelle ist wo Du die Zeilen ausliest?

Gruss alfold

[dor557]

die lösung mit dem utf8toansi hat mir den richtigen lösungsansatz gegeben.

Ich habe dann noch etwas weiter gesucht und habe dann einen Thread gefunden der mich dann endgültig auf die Endlösung brachte.

ich musste schon beim Laden der Datei vom PC die Daten convertieren.

nun sieht die Nötige Funktion nun wie folgt aus :

Delphi-Quellcode:

function GetDocumentFromFile(const markup: WideString): IDispatch;
var
  doc: OleVariant;
  f : TextFile;
  TextString : Widestring;
begin
  AssignFile(f, Markup);
  Reset(f);
  Result := CoHtmlDocument.Create;
  doc := Result;
  doc.Open;
  while not eof(f) do
  begin
    readln(f, textstring);
    textstring := Utf8Encode(textstring);
    doc.write(Utf8ToAnsi(textstring));
  end;
  doc.Close;
  CloseFile(f);
end;

und schon ist der Rest gelöst.

gruss Sascha