Thema
:
Delphi
Problem mit API-Funktion in Kombination mit tWebbrowser
Einzelnen Beitrag anzeigen
marabu
Registriert seit: 6. Apr 2005
10.109 Beiträge
#
2
Re: Problem mit API-Funktion in Kombination mit tWebbrowser
20. Jul 2005, 07:09
Hi Chris,
probiere es noch mal so:
zusammenfalten
·
markieren
Delphi-Quellcode:
var
doc: IHTMLDocument2;
cStyles: IHTMLStylesheetsCollection;
i: integer;
ss, vi: OleVariant;
begin
doc := WebBrowser.Document
as
IHTMLDocument2;
cStyles := doc.styleSheets;
// kein cast notwendig
for
i := 0
to
cStyles.length - 1
do
begin
vi := i;
ss := cStyles.item(vi);
// kein cast möglich
ShowMessage(ss.href);
end
;
end
;
Grüße vom marabu
Zitat
marabu
Öffentliches Profil ansehen
Mehr Beiträge von marabu finden