Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi IDispatch? (https://www.delphipraxis.net/33429-idispatch.html)

glkgereon 6. Nov 2004 22:43


IDispatch?
 
ich will den quelltext eines TWebBrowsers auslesen...

ich bin bei der suche auf die eigenschaft Document des Typs IDispatch gefunden, über die man laut oh den quelltext auslesen kann

nur wie geh ich damit um???

Zitat:

Über Dispatch-Schnittstellen werden die Methoden und Eigenschaften definiert, die ein Automatisierungsobjekt mithilfe der IDispatch-Schnittstelle implementiert. Aufrufe der Methoden einer Dispatch-Schnittstelle werden zur Laufzeit über die Methode Invoke von IDispatch weitergeleitet. Eine Dispatch-Schnittstelle kann nicht von einer Klasse implementiert werden.

Die Syntax zur Deklaration einer Dispatch-Schnittstelle lautet:

type Schnittstellenname = dispinterface
['{GUID}']
Elementliste
end;

Die Angabe von ['{GUID}'] optional. Elementliste besteht aus Eigenschafts- und Methodendeklarationen. Eine Dispatch-Schnittstellendeklaration hat große Ähnlichkeit mit der Deklaration einer normalen Schnittstelle, mit dem Unterschied, dass kein Vorfahr angegeben werden kann. Ein Beispiel:

type
IStringsDisp = dispinterface
['{EE05DFE2-5549-11D0-9EA9-0020AF3D82DA}']
property ControlDefault[Index: Integer]: OleVariant dispid 0; default;
function Count: Integer; dispid 1;
property Item[Index: Integer]: OleVariant dispid 2;
procedure Remove(Index: Integer); dispid 3;
procedure Clear; dispid 4;
function Add(Item: OleVariant): Integer; dispid 5;

function _NewEnum: IUnknown; dispid -4;
end;
wie bitte?

kann mir einer daraus eine function basteln die mir einfach nur den quelltext eines angegebenen frames zurückgibt?

besonders deprimierend find ich das der TWebBrowser es integriert hat das man bei rechtsklick den qt kriegt...ich brauchs aber als code :(

teebee 6. Nov 2004 22:50

Re: IDispatch?
 
Vielleicht hilft Dir das hier weiter,

Gruß, teebee


Alle Zeitangaben in WEZ +1. Es ist jetzt 15:27 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz