Hi bigg,
immer wenn ein Quelltext monotone Passagen aufweist, wie deiner die endlose If-Strecke, dann macht es Sinn nach einer Alternative zu suchen. Für deinen Zweck wäre ein Dictionary eine gute Lösung und die StringList bietet dir über die Objects[] sogar noch die Lookup-Funktionalität.
Wenn du die vom W3 Consortium herausgegebene
Liste der character entities für den
Ansi-Bereich (#160 bis #255 und die 5 Metazeichen quot, amp, gt, lt und apos) in eine StringList einträgst,
sl.AddObject('quot', Pointer(34));
dann kannst du zumindest den Code für die Übersetzung der named entities deutlich übersichtlicher gestalten.
Freundliche Grüße vom marabu
PS: HTML2Text ist vielleicht etwas irreführend, denn es wird ja kein markup code in Text umgewandelt. Und vergiss nicht, dass character entities auch durch " oder & #34; repräsentiert werden können.