IHTMStyleSheet im TWEBBrowser mit anderem IHTMLStyleSheet ersetzen

[Drops]

Guten Abend,

beim Einarbeiten in Delphi hab ich mir vorgenommen, mit dem twebbrowser zu arbeiten und lokale Webseiten vor/bei der Anzeige zu ändern. Andere Bilder, andere Sheets usw. usf..
Dabei greife ich, wie im Web belesen, auf das ihtml Konstrukt zurück.

In den Einzelschritten funktioniert das auch ganz gut, d.h. ich kann css Tags ersetzen bzw. hinzufügen. so weit, so gut.
Nun dachte ich mir, ich ändere einen kompletten Block aus einer css Datei. Dafür habe ich mir eine kleine css Datei mit ein paar Styles gebastelt, die ich auslese und in einem Array mit der Klasse IHTMLStyelSheet vorhalte und gegen die Sheets aus der Originaldatei tausche.
(Die Sheets erhalte ich per twebbrowser.document as IHTMLDocument2, dort dann per all eine IHTMLElementCollection erzeugt und die Styles rausgearbeitet. Diesen Weg: http://www.delphipraxis.net/92489-we...-auslesen.html bin ich gegangen)

Ich habe also 1 Array, mit den Sheets, die die aus der org. Datei ersetzen sollen und die OriginalSheets per IHTML...Collection, auch als IHTMLStyleSheet-Objekt.

Nun dachte ich, ich ersetz den jeweiligen Sheet mit dem Neuen, also

var vNewStyle, vOrgStyle: IHTMLStyleSheet;
...
vOrgStyle:=vStyle;
...

Dummerweise sagt der Compiler, leider zu Recht, dass ich das nicht darf, da es sich um eine Eigenschaft handelt.
Anschließend, als Ersatz, wollte ich die Eigenschaften der var vNewStyle abarbeiten und der Originalen hinzufügen. Aber ich komm nicht voran. Ich packe es nicht, das Object vNewStyle auseinander zu nehmen.

Hier also endlich die Frage:
Kann mir bitte jmd. ein Fingerzeig geben, wie ich
a) vll. die Eigenschaft doch (per Umweg vll.) manipulieren kann oder
b) das IHTMLStyleSheet-Objekt an sich auslesen (vll. per Iterator?) und damit ich die Einzelkomponenten anpassen kann oder
c) einen Tipp geben, in welcher Richtung ich mich belesen soll(te)?

Bin auf der Suche weder hier, noch sonst im Web fündig geworden, aber vll. hab ich nur die falschen Suchbegriffe verwendet.

Vielen Dank das Du den Text bis zu Ende gelesen hast

MfG Drops