HTML-Code im Memo umwandeln?

[Chrissi91]

Hi,

ich schreibe gerade eine Indydemo zu POP3 SMTP etc. um, und schneide es auf meine Bedürfnise zurecht.

Allerdings sind heutzutage fast alle Emails mit HTML - Codes.

Gibt es eine Freewarekomponente für D7 PE, die wie ein Memo Text anzeigt, aber auch HTML - Codes umwandelt, dass ich es wie bei meinem EMailpostfach sehe?

[Jelly]

Vielleicht ist ja HTMLLabel was für dich, von www.tmssoftware.com

[SnuffMaster23]

Also in einem Memo wirds nicht gehen, das zeigt ja den reinen ASCII-Text an.
in D2005 gibts eine Komponente namens TWebBrowser, die stellt dir quasi Internet Explorer zur Verfügung. Obs die bei D7 auch schon gibt weiß ich nicht. Sonst wirds viel Arbeit, falls du dir nen HTML-Renderer selber schreiben willst...http://SnuffMaster23.wspace.org/smileys/Nostalgic3.gif

[Klaus01]

TWebbrowser gibt es schon mit D6 also wird es ihn in 7 auch geben.

Grüße
Klaus

[Loki77]

Hab vor kurzem ´n was gemacht;
HTML-Tags ´rausschneiden:

Delphi-Quellcode:

function StripHTML(S: Ansistring): Ansistring;
var
  TagBegin, TagEnd, TagLength : integer;

begin
  delete(s, 1, pos('<body', lowercase(s))-1);

  TagBegin := Pos( '<', S);
  while (TagBegin > 0) do begin
    TagEnd := Pos('>', S);
    TagLength := TagEnd - TagBegin + 1;
    Delete(S, TagBegin, TagLength);
    frmMain.ProgressBar.StepBy(1);
    TagBegin:= Pos( '<', S);
end;
  Result := S;
end;

Schwierig wirds nur wenn die Mail '<' oder '>' enthält(als Text).....

[Khabarakh]

Das verstehst du unter Umwandeln :roll: ?

[Loki77]

Zitat:

Zitat von Khabarakh

Das verstehst du unter Umwandeln :roll: ?

Rausschneiden, nicht umwandeln.....
Übrig bleibt der reine text, für meine zwecke reichts.....

[H4ndy]

Wenn du wirklich das HTML parsen willst, brauchst du auf alle
Fälle ein RichEdit anstelle des Memos um Textformatierungen vornehmen
zu können. Ich würde aber auch lieber den IE kapseln (TWebbrowser),
das erspart ne Menge arbeit. ( Wenn HTML parsen einfach wäre, dann
würden Browser aus dem Boden wie Pilze sprießen ;D )

[3_of_8]

TWebBrowser ist bei Delphi7 Personal dabei. Unter ActiveX. Hättest mich auch gleich fragen können. ;)